| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_budget_ice_if.F |
139 |
SEAICE_BUDGET_ICE_IF |
F_lh (I,J) = 0.0 _d 0 |
|
./pkg/seaice/seaice_budget_ice_if.F |
249 |
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 |
255 |
SEAICE_BUDGET_ICE_IF |
& F_c(I,J) + F_sens(I,J) + F_lh(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
294 |
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 |
301 |
SEAICE_BUDGET_ICE_IF |
& F_sens(I,J) + F_lh(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
309 |
SEAICE_BUDGET_ICE_IF |
& F_sens(I,J) + F_lh(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
340 |
SEAICE_BUDGET_ICE_IF |
& F_c(I,J), F_lh(I,J), F_sens(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
61 |
SEAICE_BUDGET_ICE_IF |
_RL F_lh (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_solve4temp.F |
222 |
SEAICE_SOLVE4TEMP |
F_lh (I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_solve4temp.F |
442 |
SEAICE_SOLVE4TEMP |
F_lh(I,J) = D1I*UG(I,J)*(qhice(I,J)-AQH(I,J,bi,bj)) |
|
./pkg/seaice/seaice_solve4temp.F |
464 |
SEAICE_SOLVE4TEMP |
& F_c(I,J) + F_sens(I,J) + F_lh(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
572 |
SEAICE_SOLVE4TEMP |
F_lh(I,J) = D1I * UG(I,J)*(qhice(I,J)-AQH(I,J,bi,bj)) |
|
./pkg/seaice/seaice_solve4temp.F |
580 |
SEAICE_SOLVE4TEMP |
& F_sens(I,J) + F_lh(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
613 |
SEAICE_SOLVE4TEMP |
FWsublim(I,J) = F_lh(I,J)/SEAICE_lhSublim |
|
./pkg/seaice/seaice_solve4temp.F |
88 |
SEAICE_SOLVE4TEMP |
_RL F_lh (1:sNx,1:sNy) |