Symbol Description Uses
ksolar bulk solar abs coeff of sea ice [m^-1] 6



File Line number Procedure Code
./pkg/thsice/THSICE_PARAMS.h 118 NO PROCEDURE
      _RL  ksolar
./pkg/thsice/THSICE_PARAMS.h 87 NO PROCEDURE
     &  i0swFrac, ksolar, dhSnowLin,
./pkg/thsice/thsice_readparms.F 130 THSICE_READPARMS
      ksolar   = 1.5 _d 0
./pkg/thsice/thsice_readparms.F 314 THSICE_READPARMS
      WRITE(iUnit,fmtR) 'ThSI:', 'ksolar      =', ksolar
./pkg/thsice/thsice_readparms.F 59 THSICE_READPARMS
     &  i0swFrac, ksolar, dhSnowLin,
./pkg/thsice/thsice_solve4temp.F 282 THSICE_SOLVE4TEMP
          fswocn = fswpen * exp(-ksolar*hIce(i,j))