calc_psi_vmu Subroutine

private recursive subroutine calc_psi_vmu(jj, nn, ll, isa, isb, psij)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	jj
integer,	intent(in)			::	nn
integer,	intent(in)			::	ll
integer,	intent(in)			::	isa
integer,	intent(in)			::	isb
real,	intent(out),		dimension(-nzgrid:nzgrid)	::	psij