Symbol Description Uses
CSR2 6



File Line number Procedure Code
./pkg/aim/phy_radiat.F 45 SOL_OZ
      _RL ALPHA, CSR1, CSR2, COZ1, COZ2
./pkg/aim/phy_radiat.F 53 SOL_OZ
      CSR2= 0.147 _d 0*COS(2. _d 0*ALPHA)-0.477 _d 0
./pkg/aim/phy_radiat.F 64 SOL_OZ
     &             1. _d 0+CSR1*FMU(I2,1,myThid)+CSR2*FMU(I2,2,myThid))
./pkg/aim_v23/phy_radiat.F 54 SOL_OZ
      _RL ALPHA, CSR1, CSR2, COZ1, COZ2
./pkg/aim_v23/phy_radiat.F 62 SOL_OZ
      CSR2= 0.147 _d 0*COS(2. _d 0*ALPHA)-0.477 _d 0
./pkg/aim_v23/phy_radiat.F 83 SOL_OZ
     &     MAX( 0. _d 0, 1. _d 0+CSR1*SLAT(J)+CSR2*FLAT2 )