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 109 THSICE_READPARMS
      ksolar   = 1.5 _d 0
./pkg/thsice/thsice_readparms.F 279 THSICE_READPARMS
      WRITE(iUnit,*) 'ThSI: ksolar    =',ksolar
./pkg/thsice/thsice_readparms.F 56 THSICE_READPARMS
     &  i0swFrac, ksolar, dhSnowLin,
./pkg/thsice/thsice_solve4temp.F 263 THSICE_SOLVE4TEMP
          fswocn = fswpen * exp(-ksolar*hIce(i,j))