Symbol Description Uses
i0swFrac fraction of penetrating solar rad 6


File Line number Procedure Code
./pkg/thsice/THSICE_PARAMS.h 117 NO PROCEDURE 
      _RL  i0swFrac
./pkg/thsice/THSICE_PARAMS.h 87 NO PROCEDURE 
     &  i0swFrac, ksolar, dhSnowLin,
./pkg/thsice/thsice_readparms.F 129 THSICE_READPARMS 
      i0swFrac = 0.3 _d 0
./pkg/thsice/thsice_readparms.F 313 THSICE_READPARMS 
      WRITE(iUnit,fmtR) 'ThSI:', 'i0swFrac    =', i0swFrac
./pkg/thsice/thsice_readparms.F 59 THSICE_READPARMS 
     &  i0swFrac, ksolar, dhSnowLin,
./pkg/thsice/thsice_solve4temp.F 281 THSICE_SOLVE4TEMP 
          fswpen = flxSW(i,j) * (1. _d 0 - frsnow) * i0swFrac