Symbol Description Uses
IcePenetSWFlux short wave heat flux under ice 5


File Line number Procedure Code
./pkg/seaice/seaice_budget_ice_if.F 10 SEAICE_BUDGET_ICE_IF 
     O     F_io_net,F_ia_net,F_ia, IcePenetSWFlux,
./pkg/seaice/seaice_budget_ice_if.F 126 SEAICE_BUDGET_ICE_IF 
        IcePenetSWFlux     (I,J) = 0. _d 0
./pkg/seaice/seaice_budget_ice_if.F 210 SEAICE_BUDGET_ICE_IF 
           IcePenetSWFlux(I,J) = -(ONE - ALB(I,J))*
./pkg/seaice/seaice_budget_ice_if.F 323 SEAICE_BUDGET_ICE_IF 
     &     IcePenetSWFlux(I,J)
./pkg/seaice/seaice_budget_ice_if.F 63 SEAICE_BUDGET_ICE_IF 
      _RL IcePenetSWFlux (1-OLx:sNx+OLx,1-OLy:sNy+OLy)