GAMCALC.f90#29
      REAL :: XARG , YARG , ZTMP
REFL_HT.f90#31
     &        SWREFL , UREFL , TGREFL , PTREFL , TTRAVL , BVFRQ , ZTMP ,&
#97
      ZTMP = AMAX1(HS,HEARG,1.0E-4)
#99
     &         (1.0+SWREFL*TTRAVL*(1.0/(0.72*ZTMP)+BVFRQ/(0.54*SWREFL)))
SIGZ.f90#40
      REAL :: XARG , TTRAVL , PTP , BVFRQ , ZTMP , SIGF , ALPHAB
#67
         ZTMP = AMAX1(HS,HE,1.0E-4)
#71
            SZAMB = SWEFF*TTRAVL/SQRT(1.0+SWEFF*TTRAVL*(1.0/(0.72*ZTMP))&
#76
     &              (1.0+SWEFF*TTRAVL*(1.0/(0.72*ZTMP)+BVFRQ/           &
SIGZPR.f90#28
      REAL :: XARG , TTRAVL , PTP , BVFRQ , ZTMP , SIGF , ALPHAB ,      &
#58
         ZTMP = AMAX1(ZARG,1.0E-4)
#62
            SZAMB = SWEFF*TTRAVL/SQRT(1.0+SWEFF*TTRAVL*(1.0/(0.72*ZTMP))&
#67
     &              (1.0+SWEFF*TTRAVL*(1.0/(0.72*ZTMP)+BVFRQ/           &

HyperKWIC - Version 1.00DD executed at 20:00 on  1 Mar 2018  | Personal or Academic or Evaluation User | Free for Non-Commercial, Non-Government Use