| File |
Line number |
Procedure |
Code |
|
./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 |
206 |
SEAICE_BUDGET_ICE |
A3(I,J)=4.0 _d +00*D3*t3 + effConduct + D1*UG(I,J) |
|
./pkg/seaice/seaice_budget_ice.F |
48 |
SEAICE_BUDGET_ICE |
_RL UG (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_budget_ice.F |
8 |
SEAICE_BUDGET_ICE |
I UG, hIce, hSnwLoc, |
|
./pkg/seaice/seaice_budget_ice_if.F |
244 |
SEAICE_BUDGET_ICE_IF |
dFiDTs1 = 4.0 * D3*t3 + effConduct + D1*UG(I,J) + |
|
./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 |
251 |
SEAICE_BUDGET_ICE_IF |
F_sens(I,J) = D1 * UG(I,J) * (t1 - atempLoc(I,J)) |
|
./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 |
296 |
SEAICE_BUDGET_ICE_IF |
F_sens(I,J) = D1 * UG(I,J) * (t1 - atempLoc(I,J)) |
|
./pkg/seaice/seaice_budget_ice_if.F |
46 |
SEAICE_BUDGET_ICE_IF |
_RL UG (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_budget_ice_if.F |
8 |
SEAICE_BUDGET_ICE_IF |
I UG, HICE_ACTUAL, HSNOW_ACTUAL, |
|
./pkg/seaice/seaice_budget_ocean.F |
109 |
SEAICE_BUDGET_OCEAN |
& +D1*UG(I,J)*atempLoc(I,J)+D1W*UG(I,J)*AQH(I,J,bi,bj) |
|
./pkg/seaice/seaice_budget_ocean.F |
113 |
SEAICE_BUDGET_OCEAN |
A2(I,J)=-D1*UG(I,J)*tsurfLoc(I,J)-D1W*UG(I,J)*B(I,J) |
|
./pkg/seaice/seaice_budget_ocean.F |
43 |
SEAICE_BUDGET_OCEAN |
_RL UG (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_budget_ocean.F |
8 |
SEAICE_BUDGET_OCEAN |
I UG, |
|
./pkg/seaice/seaice_budget_ocean_if.F |
131 |
SEAICE_BUDGET_OCEAN_IF |
& +D1*UG(I,J)*atempLoc(I,J)+D1W*UG(I,J)*AQH(I,J,bi,bj) |
|
./pkg/seaice/seaice_budget_ocean_if.F |
135 |
SEAICE_BUDGET_OCEAN_IF |
A2(I,J)=-D1*UG(I,J)*tsurfLoc(I,J)-D1W*UG(I,J)*B(I,J) |
|
./pkg/seaice/seaice_budget_ocean_if.F |
45 |
SEAICE_BUDGET_OCEAN_IF |
_RL UG (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_budget_ocean_if.F |
8 |
SEAICE_BUDGET_OCEAN_IF |
I UG, |
|
./pkg/seaice/seaice_growth.F |
246 |
SEAICE_GROWTH |
UG(I,J) = MAX(SEAICE_EPS,wspeed(I,J,bi,bj)) |
|
./pkg/seaice/seaice_growth.F |
273 |
SEAICE_GROWTH |
I UG, |
|
./pkg/seaice/seaice_growth.F |
293 |
SEAICE_GROWTH |
UG(I,J)=SEAICE_EPS |
|
./pkg/seaice/seaice_growth.F |
295 |
SEAICE_GROWTH |
UG(I,J)=SQRT(SPEED_SQ) |
|
./pkg/seaice/seaice_growth.F |
316 |
SEAICE_GROWTH |
I UG, HICEP, hSnwLoc, |
|
./pkg/seaice/seaice_growth.F |
332 |
SEAICE_GROWTH |
I UG, HICE, hSnwLoc, |
|
./pkg/seaice/seaice_growth.F |
97 |
SEAICE_GROWTH |
_RL UG (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_growth_if.F |
414 |
SEAICE_GROWTH_IF |
UG(I,J) = MAX(SEAICE_EPS,wspeed(I,J,bi,bj)) |
|
./pkg/seaice/seaice_growth_if.F |
444 |
SEAICE_GROWTH_IF |
I UG, HICE_ACTUAL, HSNOW_ACTUAL, |
|
./pkg/seaice/seaice_growth_if.F |
556 |
SEAICE_GROWTH_IF |
I UG, |
|
./pkg/seaice/seaice_growth_if.F |
80 |
SEAICE_GROWTH_IF |
_RL UG (1-OLx:sNx+OLx, 1-OLy:sNy+OLy) |