CCPP SciDoc v7.0.0  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ shoc_work()

subroutine shoc::shoc_work ( integer, intent(in) ix,
integer, intent(in) nx,
integer, intent(in) nzm,
integer, intent(in) nz,
real, intent(in) dtn,
real, dimension (ix,nzm), intent(in) prsl,
real, dimension (ix,nzm), intent(in) delp,
real, dimension (ix,nz ), intent(in) phii,
real, dimension (ix,nzm), intent(in) phil,
real, dimension (ix,nzm), intent(in) u,
real, dimension (ix,nzm), intent(in) v,
real, dimension (ix,nzm), intent(in) omega,
real, dimension (ix,nzm), intent(inout) tabs,
real, dimension (ix,nzm), intent(inout) qwv,
real, dimension (ix,nzm), intent(inout) qi,
real, dimension (ix,nzm), intent(inout) qc,
real, dimension (nx,nzm), intent(in) qpi,
real, dimension (nx,nzm), intent(in) qpl,
real, dimension (nx,nzm), intent(in) rhc,
real, intent(in) supice,
real, intent(in) pcrit,
real, intent(in) cefac,
real, intent(in) cesfac,
real, intent(in) tkef1,
real, intent(in) dis_opt,
real, dimension(ix,nzm), intent(out) cld_sgs,
real, dimension (ix,nzm), intent(inout) tke,
real, dimension(nx), intent(in) hflx,
real, dimension(nx), intent(in) evap,
real, dimension (nx,nzm), intent(in) prnum,
real, dimension (ix,nzm), intent(inout) tkh,
real, dimension (ix,nzm), intent(inout) wthv_sec,
integer, intent(in) ntlnc,
real, dimension (nx,nzm), intent(inout) ncpl,
real, dimension (nx,nzm), intent(inout) ncpi,
real, intent(in) cp,
real, intent(in) ggr,
real, intent(in) lcond,
real, intent(in) lfus,
real, intent(in) rv,
real, intent(in) rgas,
real, intent(in) pi,
real, intent(in) epsv,
real, intent(in) eps )
private

Definition at line 178 of file shoc.F90.

References esat().

Here is the call graph for this function: