Symbol Description Uses
IcePenetSW short wave heat flux transmitted through ice (+=upward) 6


File Line number Procedure Code
./pkg/seaice/seaice_solve4temp.F 226 SEAICE_SOLVE4TEMP 
        IcePenetSW(I,J)= 0. _d 0
./pkg/seaice/seaice_solve4temp.F 22 SEAICE_SOLVE4TEMP 
     O   F_ia, IcePenetSW,
./pkg/seaice/seaice_solve4temp.F 317 SEAICE_SOLVE4TEMP 
         IcePenetSW(I,J) = -(1.0 _d 0 - ALB(I,J))
./pkg/seaice/seaice_solve4temp.F 480 SEAICE_SOLVE4TEMP 
          IcePenetSW(I,J)= 0. _d 0
./pkg/seaice/seaice_solve4temp.F 558 SEAICE_SOLVE4TEMP 
     &         SWDOWN(I,J,bi,bj), IcePenetSW(I,J)
./pkg/seaice/seaice_solve4temp.F 83 SEAICE_SOLVE4TEMP 
      _RL IcePenetSW  (1:sNx,1:sNy)