Searched refs:rercld (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 | 233 …nrout, nsout, refl, arefl, areflz, frefl, csrfl, acsrfl, fcsrfl, rercld, ncai, ncal, qrout2, qsout… argument
368 … REAL(KIND=r8), intent(out) :: rercld(:,:) ! effective radius calculation for rain + cloud local
707 rercld = 0._r8
1428 CALL calc_rercld(lamr, n0r, lamc, pgam, qric, qcic, ncic, rercld)
2115 elemental SUBROUTINE calc_rercld(lamr, n0r, lamc, pgam, qric, qcic, ncic, rercld) argument
2123 REAL(KIND=r8), intent(inout) :: rercld ! effective radius calculation for rain + cloud local
2137 rercld = rercld + 3._r8 *(qric + qcic) / (4._r8 * rhow * atmp)
|