REFL_HT.f90#31
     &        SWREFL , UREFL , TGREFL , PTREFL , TTRAVL , BVFRQ , ZTMP ,&
#93
      BVFRQ = SQRT(G*TGREFL/PTREFL)
#94
      IF ( BVFRQ.LT.1.0E-10 ) BVFRQ = 1.0E-10
#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
#63
         BVFRQ = SQRT(G*TGEFF/PTP)
#64
         IF ( BVFRQ.LT.1.0E-10 ) BVFRQ = 1.0E-10
#76
     &              (1.0+SWEFF*TTRAVL*(1.0/(0.72*ZTMP)+BVFRQ/           &
SIGZPR.f90#28
      REAL :: XARG , TTRAVL , PTP , BVFRQ , ZTMP , SIGF , ALPHAB ,      &
#54
         BVFRQ = SQRT(G*TGEFF/PTP)                                      ! 164418
#55
         IF ( BVFRQ.LT.1.0E-10 ) BVFRQ = 1.0E-10
#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