calc_eff_radius()

subroutine, public module_mp_nssl_2mom::calc_eff_radius	(	integer	nx,
		integer	ny,
		integer	nz,
		integer	na,
		integer	jyslab,
		integer	nor,
		integer	norz,
		real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz), optional	t1,
		real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz), optional	t2,
		real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz), optional	t3,
		real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz), optional	t4,
		real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz), optional	t5,
		real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz), optional	t6,
		logical, optional	f_t4,
		logical, optional	f_t5,
		logical, optional	f_t6,
		real, dimension(nx,nz), optional	qcw,
		real, dimension(nx,nz), optional	qci,
		real, dimension(nx,nz), optional	qsw,
		real, dimension(nx,nz), optional	qrw,
		real, dimension(nx,nz), optional	ccw,
		real, dimension(nx,nz), optional	cci,
		real, dimension(nx,nz), optional	csw,
		real, dimension(nx,nz), optional	crw,
		real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz,na), optional	an,
		real, dimension(-nor+1:nx+nor,-nor+1:ny+nor,-norz+1:nz+norz)	dn
	)

Definition at line 5866 of file module_mp_nssl_2mom.F90.

References gamma_sp().

Referenced by nssl_2mom_driver().

Here is the call graph for this function:

Here is the caller graph for this function: