Searched refs:cmeout (Results 1 – 1 of 1) sorted by relevance
/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/CAM5_mg2_pgi/src/ |
H A D | micro_mg2_0.F90 | 229 …end, nstend, effc, effc_fn, effi, prect, preci, nevapr, evapsnow, prain, prodsnow, cmeout, deffi, & argument 316 REAL(KIND=r8), intent(out) :: cmeout(:,:) ! evap/sub of cloud (1/s) local 715 cmeout = 0._r8 1347 cmeout(i,k) = vap_dep(i,k) + ice_sublim(i,k) + mnuccd(i,k) 1852 cmeout(i,k) = cmeout(i,k)+dum
|