| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_budget_ice.F |
102 |
SEAICE_BUDGET_ICE |
D1I=SEAICE_latentIce |
|
./pkg/seaice/seaice_budget_ice.F |
165 |
SEAICE_BUDGET_ICE |
& +D1*UG(I,J)*atempLoc(I,J)+D1I*UG(I,J)*AQH(I,J,bi,bj) |
|
./pkg/seaice/seaice_budget_ice.F |
171 |
SEAICE_BUDGET_ICE |
& +D1*UG(I,J)*atempLoc(I,J)+D1I*UG(I,J)*AQH(I,J,bi,bj) |
|
./pkg/seaice/seaice_budget_ice.F |
199 |
SEAICE_BUDGET_ICE |
A2(I,J)=-D1*UG(I,J)*t1-D1I*UG(I,J)*qhIce-D3*t4 |
|
./pkg/seaice/seaice_budget_ice.F |
65 |
SEAICE_BUDGET_ICE |
_RL QS1, C1, C2, C3, C4, C5, TB, D1, D1I, D3 |
|
./pkg/seaice/seaice_budget_ice_if.F |
109 |
SEAICE_BUDGET_ICE_IF |
D1I=SEAICE_latentIce |
|
./pkg/seaice/seaice_budget_ice_if.F |
245 |
SEAICE_BUDGET_ICE_IF |
& D1I*UG(I,J)*dqhice_dTice |
|
./pkg/seaice/seaice_budget_ice_if.F |
248 |
SEAICE_BUDGET_ICE_IF |
F_lh(I,J) = D1I * UG(I,J) * (qhice_mm(I,J)-AQH(I,J,bi,bj)) |
|
./pkg/seaice/seaice_budget_ice_if.F |
293 |
SEAICE_BUDGET_ICE_IF |
F_lh(I,J) = D1I * UG(I,J) * (qhice_mm(I,J)-AQH(I,J,bi,bj)) |
|
./pkg/seaice/seaice_budget_ice_if.F |
75 |
SEAICE_BUDGET_ICE_IF |
_RL QS1, C1, C2, C3, C4, C5, TB, D1, D1I, D3,IAN1 |