Searched refs:areflz (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
363 REAL(KIND=r8), intent(out) :: areflz(:,:) ! average reflectivity in z. local
769 areflz = 0._r8
2074 areflz(i,k) = refl(i,k) * precip_frac(i,k)
2087 areflz(i,k) = 0._r8
|