Symbol Description Uses
IcePenetSWFluxFrac 7


File Line number Procedure Code
./pkg/seaice/seaice_budget_ice_if.F 127 SEAICE_BUDGET_ICE_IF 
        IcePenetSWFluxFrac (I,J) = 0. _d 0
./pkg/seaice/seaice_budget_ice_if.F 200 SEAICE_BUDGET_ICE_IF 
           IcePenetSWFluxFrac(I,J) = ZERO
./pkg/seaice/seaice_budget_ice_if.F 202 SEAICE_BUDGET_ICE_IF 
           IcePenetSWFluxFrac(I,J) =
./pkg/seaice/seaice_budget_ice_if.F 207 SEAICE_BUDGET_ICE_IF 
     &        (1.0 - IcePenetSWFluxFrac(I,J))
./pkg/seaice/seaice_budget_ice_if.F 211 SEAICE_BUDGET_ICE_IF 
     &        IcePenetSWFluxFrac(I,J)
./pkg/seaice/seaice_budget_ice_if.F 327 SEAICE_BUDGET_ICE_IF 
     ^      IcePenetSWFluxFrac(I,J), ALB(I,J)
./pkg/seaice/seaice_budget_ice_if.F 65 SEAICE_BUDGET_ICE_IF 
      _RL IcePenetSWFluxFrac