Searched refs:nprai (Results 1 – 2 of 2) sorted by relevance
| /dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/CAM5_mg2_pgi/src/ |
| H A D | micro_mg_utils.F90 | 811 … elemental SUBROUTINE accrete_cloud_ice_snow(t, rho, asn, qiic, niic, qsic, lams, n0s, prai, nprai) argument
824 REAL(KIND=r8), intent(out) :: nprai ! Number local
830 nprai = accrete_rate * niic
833 nprai = 0._r8
|
| H A D | micro_mg2_0.F90 | 498 REAL(KIND=r8) :: nprai(mgncol,nlev) ! number concentration local
1069 prai(:,k), nprai(:,k))
1072 nprai(:,k) = 0._r8
1245 … ((-nnucct(i,k)-tmpfrz-nnudep(i,k)-nsacwi(i,k))*lcldm(i,k)+(nprci(i,k)+ nprai(i,k)&
1249 …dm(i,k)+ nnuccri(i,k)*precip_frac(i,k))/ ((nprci(i,k)+nprai(&
1252 nprai(i,k) = nprai(i,k)*ratio
1394 …*lcldm(i,k)+(nsubi(i,k)-nprci(i,k)- nprai(i,k))*icldm(i,k)+nnuccri(i,k)*precip_fra…
|