| 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 |
133 |
SEAICE_BUDGET_ICE_IF |
F_ia_net (I,J) = 0.0 _d 0 |
|
./pkg/seaice/seaice_budget_ice_if.F |
304 |
SEAICE_BUDGET_ICE_IF |
F_ia_net(I,J) = 0.0 |
|
./pkg/seaice/seaice_budget_ice_if.F |
307 |
SEAICE_BUDGET_ICE_IF |
F_ia_net(I,J) = F_lwd(I,J) + F_swi(I,J) + F_lwu(I,J) + |
|
./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 |
53 |
SEAICE_BUDGET_ICE_IF |
_RL F_ia_net (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_growth_if.F |
1113 |
SEAICE_GROWTH_IF |
& F_ia_net(i,j), |
|
./pkg/seaice/seaice_growth_if.F |
145 |
SEAICE_GROWTH_IF |
_RL F_ia_net (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_growth_if.F |
240 |
SEAICE_GROWTH_IF |
F_ia_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 |
459 |
SEAICE_GROWTH_IF |
F_ia_net (I,J) = 0.0 |
|
./pkg/seaice/seaice_growth_if.F |
475 |
SEAICE_GROWTH_IF |
& F_ia_net(I,J) |
|
./pkg/seaice/seaice_growth_if.F |
480 |
SEAICE_GROWTH_IF |
F_ia_net_before_snow(I,J) = F_ia_net(I,J) |
|
./pkg/seaice/seaice_growth_if.F |
497 |
SEAICE_GROWTH_IF |
PotSnowMeltRateFromSurf(I,J)= - F_ia_net(I,J)*QS |
|
./pkg/seaice/seaice_growth_if.F |
533 |
SEAICE_GROWTH_IF |
SurfHeatFluxConvergToSnowMelt(I,J) =F_ia_net(I,J) |
|
./pkg/seaice/seaice_growth_if.F |
538 |
SEAICE_GROWTH_IF |
F_ia_net(I,J) = |
|
./pkg/seaice/seaice_growth_if.F |
539 |
SEAICE_GROWTH_IF |
& F_ia_net(I,J)-SurfHeatFluxConvergToSnowMelt(I,J) |
|
./pkg/seaice/seaice_growth_if.F |
541 |
SEAICE_GROWTH_IF |
IceGrowthRateFromSurface(I,J) = F_ia_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 |
968 |
SEAICE_GROWTH_IF |
& -F_ia_net(I,J)*AREANm1(I,J,bi,bj)*FLUX_TO_DELTA_TEMP |