Home
last modified time | relevance | path

Searched refs:minrefl (Results 1 – 1 of 1) sorted by relevance

/dports/math/libpgmath/flang-d07daf3/test/ncar_kernels/CAM5_mg2_pgi/src/
H A Dmicro_mg2_0.F90143 REAL(KIND=r8), parameter :: minrefl = 1.26e-10_r8 ! minrefl = 10._r8**(mindbz/10._r8) variable
2076 IF (refl(i,k).gt.minrefl) THEN