Symbol Description Uses
ALPHA 59


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1518 TRBFLX 
      PARAMETER ( ALPHA   = 0.1       )
./pkg/fizhi/fizhi_turb.F 1519 TRBFLX 
      PARAMETER ( HALPHA = ALPHA * 0.5 )
./pkg/fizhi/fizhi_turb.F 1784 TRBFLX 
        DZ3(I,L) = ALPHA * ADZ1(I,L)
./pkg/fizhi/fizhi_turb.F 1788 TRBFLX 
      DZ3(I,NLEV) = ALPHA * HS(I)
./pkg/fizhi/fizhi_turb.F 3852 TRBLEN 
      PARAMETER ( ALPHA   = 0.1       )
./pkg/fizhi/fizhi_turb.F 3854 TRBLEN 
      PARAMETER ( XL0CNV  = DZCNV * ALPHA )
./pkg/fizhi/update_earth_exports.F 229 SIBALB 
      _RL FAC,GAMMA,BETA,ALPHA,DX,DY,ALA,GRN (2),SNWALB(4,NTYPS)
./pkg/fizhi/update_earth_exports.F 653 SIBALB 
          ALPHA = COEFF (ALVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY)
./pkg/fizhi/update_earth_exports.F 657 SIBALB 
          AVISDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I))
./pkg/fizhi/update_earth_exports.F 658 SIBALB 
          AVISDF(I) = ALPHA-BETA
./pkg/fizhi/update_earth_exports.F 661 SIBALB 
          ALPHA = COEFF (ALIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY)
./pkg/fizhi/update_earth_exports.F 665 SIBALB 
          ANIRDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I))
./pkg/fizhi/update_earth_exports.F 666 SIBALB 
          ANIRDF(I) = ALPHA-BETA
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 220 AIM_SURF_BC 
        ALPHA= 2. _d 0*PI*(TYEAR+10. _d 0/365. _d 0)
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 221 AIM_SURF_BC 
        RZEN = COS(ALPHA) * ( -23.45 _d 0 * deg2rad)
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 89 AIM_SURF_BC 
      _RL RSD, alb_land, oceTfreez, ALBSEA1, ALPHA, CZEN, CZEN2
./pkg/aim_v23/aim_surf_bc.F 209 AIM_SURF_BC 
        ALPHA= 2. _d 0*PI*(TYEAR+10. _d 0/365. _d 0)
./pkg/aim_v23/aim_surf_bc.F 211 AIM_SURF_BC 
        RZEN = COS(ALPHA) * ( -23.45 _d 0 * deg2rad)
./pkg/aim_v23/aim_surf_bc.F 215 AIM_SURF_BC 
        ZS = - SIN(OBLIQ * deg2rad) * COS(ALPHA)
./pkg/aim_v23/aim_surf_bc.F 89 AIM_SURF_BC 
      _RL RSD, alb_land, oceTfreez, ALBSEA1, ALPHA, CZEN, CZEN2
./pkg/aim_v23/phy_radiat.F 55 SOL_OZ 
      _RL ALPHA, CSR1, CSR2, COZ1, COZ2
./pkg/aim_v23/phy_radiat.F 66 SOL_OZ 
      ALPHA = 4. _d 0*ASIN(1. _d 0)*(TYEAR+10. _d 0/365. _d 0)
./pkg/aim_v23/phy_radiat.F 68 SOL_OZ 
      CSR1=-0.796 _d 0*COS(ALPHA)
./pkg/aim_v23/phy_radiat.F 69 SOL_OZ 
      CSR2= 0.147 _d 0*COS(2. _d 0*ALPHA)-0.477 _d 0
./pkg/aim_v23/phy_radiat.F 70 SOL_OZ 
      COZ1= 1.0 _d 0 * COS(ALPHA)
./pkg/aim_v23/phy_radiat.F 77 SOL_OZ 
      SZEN = - SIN(  OBLIQ * PI/180. _d 0) * COS(ALPHA)
./pkg/aim_v23/phy_radiat.F 88 SOL_OZ 
      RZEN=-COS(ALPHA)*23.45 _d 0*ASIN(1. _d 0)/90. _d 0
./pkg/exf/exf_zenithangle.F 144 EXF_ZENITHANGLE 
        ALPHA= 2. _d 0*PI*TYEAR
./pkg/exf/exf_zenithangle.F 146 EXF_ZENITHANGLE 
     &       - 0.399912 _d 0 * cos ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 147 EXF_ZENITHANGLE 
     &       + 0.070257 _d 0 * sin ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 148 EXF_ZENITHANGLE 
     &       - 0.006758 _d 0 * cos ( 2. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 149 EXF_ZENITHANGLE 
     &       + 0.000907 _d 0 * sin ( 2. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 150 EXF_ZENITHANGLE 
     &       - 0.002697 _d 0 * cos ( 3. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 151 EXF_ZENITHANGLE 
     &       + 0.001480 _d 0 * sin ( 3. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 252 EXF_ZENITHANGLE 
        ALPHA= 2. _d 0*PI*TYEAR
./pkg/exf/exf_zenithangle.F 253 EXF_ZENITHANGLE 
        ALPHA= 2. _d 0*PI*TYEAR
./pkg/exf/exf_zenithangle.F 255 EXF_ZENITHANGLE 
     &       - 0.399912 _d 0 * cos ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 256 EXF_ZENITHANGLE 
     &       + 0.070257 _d 0 * sin ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 257 EXF_ZENITHANGLE 
     &       - 0.006758 _d 0 * cos ( 2. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 258 EXF_ZENITHANGLE 
     &       + 0.000907 _d 0 * sin ( 2. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 259 EXF_ZENITHANGLE 
     &       - 0.002697 _d 0 * cos ( 3. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 260 EXF_ZENITHANGLE 
     &       + 0.001480 _d 0 * sin ( 3. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 262 EXF_ZENITHANGLE 
     &         + 0.034221 _d 0 * cos ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 263 EXF_ZENITHANGLE 
     &         + 0.001280 _d 0 * sin ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 264 EXF_ZENITHANGLE 
     &         + 0.000719 _d 0 * cos ( 2. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 265 EXF_ZENITHANGLE 
     &         + 0.000077 _d 0 * sin ( 2. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle.F 51 EXF_ZENITHANGLE 
      _RL TDAY, TYEAR, ALBSEA1, ALPHA, CZEN, CZEN2
./pkg/exf/exf_zenithangle_table.F 44 EXF_ZENITHANGLE_TABLE 
      _RL LLLAT, TYEAR, TDAY, ALPHA, CZEN, ALBSEA1
./pkg/exf/exf_zenithangle_table.F 65 EXF_ZENITHANGLE_TABLE 
        ALPHA= 2. _d 0*PI*TYEAR
./pkg/exf/exf_zenithangle_table.F 67 EXF_ZENITHANGLE_TABLE 
     &       - 0.399912 _d 0 * cos ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle_table.F 68 EXF_ZENITHANGLE_TABLE 
     &       + 0.070257 _d 0 * sin ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle_table.F 69 EXF_ZENITHANGLE_TABLE 
     &       - 0.006758 _d 0 * cos ( 2. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle_table.F 70 EXF_ZENITHANGLE_TABLE 
     &       + 0.000907 _d 0 * sin ( 2. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle_table.F 71 EXF_ZENITHANGLE_TABLE 
     &       - 0.002697 _d 0 * cos ( 3. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle_table.F 72 EXF_ZENITHANGLE_TABLE 
     &       + 0.001480 _d 0 * sin ( 3. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle_table.F 85 EXF_ZENITHANGLE_TABLE 
     &         + 0.034221 _d 0 * cos ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle_table.F 86 EXF_ZENITHANGLE_TABLE 
     &         + 0.001280 _d 0 * sin ( 1. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle_table.F 87 EXF_ZENITHANGLE_TABLE 
     &         + 0.000719 _d 0 * cos ( 2. _d 0 * ALPHA )
./pkg/exf/exf_zenithangle_table.F 88 EXF_ZENITHANGLE_TABLE 
     &         + 0.000077 _d 0 * sin ( 2. _d 0 * ALPHA )