SIGZ.f90#40      REAL :: XARG , TTRAVL , PTP , BVFRQ , ZTMP , SIGF , ALPHAB


#100               ALPHAB = 1.0                                             !2482586


#102               ALPHAB = 0.6 + 0.4*(CENTER/(0.1*ZI))                     !8173672


#105            SZAD1 = ALPHAB*BSUB1*WSTAR*XARG/UEFFD                       ! 10656K


#106            SZAD2 = ALPHAB*BSUB2*WSTAR*XARG/UEFFD


SIGZPR.f90#28      REAL :: XARG , TTRAVL , PTP , BVFRQ , ZTMP , SIGF , ALPHAB ,      &


#86            ALPHAB = 1.0                                                !   2674


#88            ALPHAB = 0.6 + 0.4*(ZARG/(0.1*ZI))                          !  63134


#91         SZAD = ALPHAB*SWEFF*XARG/UEFF                                  !  65808




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