| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_budget_ice_if.F |
128 |
SEAICE_BUDGET_ICE_IF |
IcePenetSWFluxFrac (I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_budget_ice_if.F |
201 |
SEAICE_BUDGET_ICE_IF |
IcePenetSWFluxFrac(I,J) = ZERO |
|
./pkg/seaice/seaice_budget_ice_if.F |
203 |
SEAICE_BUDGET_ICE_IF |
IcePenetSWFluxFrac(I,J) = |
|
./pkg/seaice/seaice_budget_ice_if.F |
208 |
SEAICE_BUDGET_ICE_IF |
& (1.0 - IcePenetSWFluxFrac(I,J)) |
|
./pkg/seaice/seaice_budget_ice_if.F |
212 |
SEAICE_BUDGET_ICE_IF |
& IcePenetSWFluxFrac(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
328 |
SEAICE_BUDGET_ICE_IF |
^ IcePenetSWFluxFrac(I,J), ALB(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
67 |
SEAICE_BUDGET_ICE_IF |
_RL IcePenetSWFluxFrac |
|
./pkg/seaice/seaice_solve4temp.F |
213 |
SEAICE_SOLVE4TEMP |
IcePenetSWFluxFrac (I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_solve4temp.F |
334 |
SEAICE_SOLVE4TEMP |
IcePenetSWFluxFrac(I,J) = 0.0 _d 0 |
|
./pkg/seaice/seaice_solve4temp.F |
336 |
SEAICE_SOLVE4TEMP |
IcePenetSWFluxFrac(I,J) = |
|
./pkg/seaice/seaice_solve4temp.F |
343 |
SEAICE_SOLVE4TEMP |
& (1.0 _d 0 - IcePenetSWFluxFrac(I,J)) |
|
./pkg/seaice/seaice_solve4temp.F |
349 |
SEAICE_SOLVE4TEMP |
& IcePenetSWFluxFrac(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
93 |
SEAICE_SOLVE4TEMP |
_RL IcePenetSWFluxFrac (1:sNx,1:sNy) |