Symbol Description Uses
albsno albedo of snow 5



File Line number Procedure Code
./pkg/thsice/thsice_albedo.F 46 THSICE_ALBEDO
      _RL albsno, albice
./pkg/thsice/thsice_albedo.F 71 THSICE_ALBEDO
      albsno = albOldSnow
./pkg/thsice/thsice_albedo.F 74 THSICE_ALBEDO
      albedo = albsno + (albice-albsno)*exp(-hs/hAlbSnow)
./pkg/thsice/thsice_albedo.F 77 THSICE_ALBEDO
        print*,'QQ - albedo problem', albedo, age, hs, albsno