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 108 THSICE_READPARMS 
      i0swFrac = 0.3 _d 0
./pkg/thsice/thsice_readparms.F 278 THSICE_READPARMS 
      WRITE(iUnit,*) 'ThSI: i0swFrac  =',i0swFrac
./pkg/thsice/thsice_readparms.F 56 THSICE_READPARMS 
     &  i0swFrac, ksolar, dhSnowLin,
./pkg/thsice/thsice_solve4temp.F 262 THSICE_SOLVE4TEMP 
          fswpen = flxSW(i,j) * (1. _d 0 - frsnow) * i0swFrac