compute_sl_sq_nest Subroutine

public subroutine compute_sl_sq_nest(field, sl, sq, zlevel, indexh, ztot)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	field(0:nxmaxn-1,0:nymaxn-1,ztot,numwfmem,numbnests)
real,	intent(inout)			::	sl
real,	intent(inout)			::	sq
integer,	intent(in)			::	zlevel
integer,	intent(in)			::	indexh
integer,	intent(in)			::	ztot