Symbol Description Uses
albNIR_fHice 4



File Line number Procedure Code
./pkg/thsice/thsice_albedo.F 146 THSICE_ALBEDO
     &         MIN( recFac_albNIR*ATAN(albNIR_fHice*hi), 1. _d 0 )
./pkg/thsice/thsice_albedo.F 86 THSICE_ALBEDO
      _RL albNIR_ice, albNIR_fHice, recFac_albNIR
./pkg/thsice/thsice_albedo.F 98 THSICE_ALBEDO
        albNIR_fHice = 4. _d 0
./pkg/thsice/thsice_albedo.F 99 THSICE_ALBEDO
        recFac_albNIR = 1. _d 0 / ATAN(albNIR_fHice*0.5 _d 0)