| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_budget_ice_if.F |
220 |
SEAICE_BUDGET_ICE_IF |
effConduct = XKI * XKS / |
|
./pkg/seaice/seaice_budget_ice_if.F |
245 |
SEAICE_BUDGET_ICE_IF |
dFiDTs1 = 4.0 * D3*t3 + effConduct + D1*UG(I,J) + |
|
./pkg/seaice/seaice_budget_ice_if.F |
250 |
SEAICE_BUDGET_ICE_IF |
F_c(I,J) = -effConduct * (TB - t1) |
|
./pkg/seaice/seaice_budget_ice_if.F |
295 |
SEAICE_BUDGET_ICE_IF |
F_c(I,J) = -effConduct * (TB - t1) |
|
./pkg/seaice/seaice_budget_ice_if.F |
79 |
SEAICE_BUDGET_ICE_IF |
_RL effConduct |
|
./pkg/seaice/seaice_budget_ocean_if.F |
61 |
SEAICE_BUDGET_OCEAN_IF |
_RL effConduct |
|
./pkg/seaice/seaice_solve4temp.F |
121 |
SEAICE_SOLVE4TEMP |
_RL effConduct(1:sNx,1:sNy) |
|
./pkg/seaice/seaice_solve4temp.F |
363 |
SEAICE_SOLVE4TEMP |
effConduct(I,J)= |
|
./pkg/seaice/seaice_solve4temp.F |
367 |
SEAICE_SOLVE4TEMP |
effConduct(I,J) = XKI * XKS / |
|
./pkg/seaice/seaice_solve4temp.F |
387 |
SEAICE_SOLVE4TEMP |
& HICE_ACTUAL(I,J), effConduct(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
441 |
SEAICE_SOLVE4TEMP |
F_c(I,J) = -effConduct(I,J)*(TB(I,J)-tsurfLoc(I,J)) |
|
./pkg/seaice/seaice_solve4temp.F |
445 |
SEAICE_SOLVE4TEMP |
A3(I,J) = 4.0 _d 0 * D3 * t3 + effConduct(I,J) + D1*UG(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
456 |
SEAICE_SOLVE4TEMP |
dFiDTs1 = 4.0 _d 0 * D3*t3 + effConduct(I,J) + D1*UG(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
573 |
SEAICE_SOLVE4TEMP |
F_c(I,J) = -effConduct(I,J) * (TB(I,J) - t1) |