Symbol Description Uses
fswocn SW passed through ice to ocean (W m-2) 4



File Line number Procedure Code
./pkg/thsice/thsice_solve4temp.F 160 THSICE_SOLVE4TEMP
      _RL  fswocn
./pkg/thsice/thsice_solve4temp.F 254 THSICE_SOLVE4TEMP
      fswocn = fswpen * exp(-ksolar*hi)
./pkg/thsice/thsice_solve4temp.F 255 THSICE_SOLVE4TEMP
      fswint = fswpen - fswocn
./pkg/thsice/thsice_solve4temp.F 467 THSICE_SOLVE4TEMP
      flxSW(i,j) = fswocn