| 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 |
132 |
SEAICE_BUDGET_ICE_IF |
F_io_net (I,J) = 0.0 _d 0 |
|
./pkg/seaice/seaice_budget_ice_if.F |
303 |
SEAICE_BUDGET_ICE_IF |
F_io_net(I,J) = -F_c(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
306 |
SEAICE_BUDGET_ICE_IF |
F_io_net(I,J) = 0.0 |
|
./pkg/seaice/seaice_budget_ice_if.F |
343 |
SEAICE_BUDGET_ICE_IF |
& F_io_net(I,J), F_ia_net(I,J), F_ia(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
52 |
SEAICE_BUDGET_ICE_IF |
_RL F_io_net (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_growth_if.F |
1114 |
SEAICE_GROWTH_IF |
& F_io_net(i,j) |
|
./pkg/seaice/seaice_growth_if.F |
147 |
SEAICE_GROWTH_IF |
_RL F_io_net (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_growth_if.F |
242 |
SEAICE_GROWTH_IF |
F_io_net (I,J) = 0.0 |
|
./pkg/seaice/seaice_growth_if.F |
446 |
SEAICE_GROWTH_IF |
O F_io_net,F_ia_net,F_ia, QSWI, |
|
./pkg/seaice/seaice_growth_if.F |
461 |
SEAICE_GROWTH_IF |
F_io_net(I,J) = 0.0 |
|
./pkg/seaice/seaice_growth_if.F |
491 |
SEAICE_GROWTH_IF |
IceGrowthRateUnderExistingIce(I,J)=F_io_net(I,J)*QI |
|
./pkg/seaice/seaice_growth_if.F |
891 |
SEAICE_GROWTH_IF |
& (F_ia_net(I,J) + F_io_net(I,J) + QSWI(I,J)) |
|
./pkg/seaice/seaice_growth_if.F |
965 |
SEAICE_GROWTH_IF |
& -F_io_net(I,J)*AREANm1(I,J,bi,bj)*FLUX_TO_DELTA_TEMP |