| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_budget_ice_if.F |
138 |
SEAICE_BUDGET_ICE_IF |
F_lh (I,J) = 0.0 _d 0 |
|
./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 |
254 |
SEAICE_BUDGET_ICE_IF |
& F_c(I,J) + F_sens(I,J) + F_lh(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 |
300 |
SEAICE_BUDGET_ICE_IF |
& F_sens(I,J) + F_lh(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
308 |
SEAICE_BUDGET_ICE_IF |
& F_sens(I,J) + F_lh(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
339 |
SEAICE_BUDGET_ICE_IF |
& F_c(I,J), F_lh(I,J), F_sens(I,J) |
|
./pkg/seaice/seaice_budget_ice_if.F |
58 |
SEAICE_BUDGET_ICE_IF |
_RL F_lh (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |