| File |
Line number |
Procedure |
Code |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
11 |
BULKF_FORMULA_LANL |
O flwupa, flha, fsha, df0dT, |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
196 |
BULKF_FORMULA_LANL |
flha = clha*delq |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
197 |
BULKF_FORMULA_LANL |
evp = -flha/lath |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
55 |
BULKF_FORMULA_LANL |
_RL flha ! latent heat flux (>0 downward) [W/m2] |
|
./pkg/bulk_force/bulkf_formula_lay.F |
11 |
BULKF_FORMULA_LAY |
O flwupa, flha, fsha, df0dT, |
|
./pkg/bulk_force/bulkf_formula_lay.F |
234 |
BULKF_FORMULA_LAY |
flha = clha*delq |
|
./pkg/bulk_force/bulkf_formula_lay.F |
235 |
BULKF_FORMULA_LAY |
evp = -flha/lath |
|
./pkg/bulk_force/bulkf_formula_lay.F |
61 |
BULKF_FORMULA_LAY |
_RL flha ! latent heat flux (>0 downward) [W/m2] |
|
./pkg/cheapaml/cheapaml.F |
354 |
CHEAPAML |
O fsha, flha, evp, xolw, ssqt, q100, cdq, |
|
./pkg/cheapaml/cheapaml.F |
380 |
CHEAPAML |
flha(i,j) = icFrac*flha(i,j) + opFrac*flha0 |
|
./pkg/cheapaml/cheapaml.F |
394 |
CHEAPAML |
O fsha(i,j), flha(i,j), evp(i,j), |
|
./pkg/cheapaml/cheapaml.F |
400 |
CHEAPAML |
O fsha(i,j), flha(i,j), evp(i,j), xolw(i,j), |
|
./pkg/cheapaml/cheapaml.F |
424 |
CHEAPAML |
xflu = ( -solar(i,j,bi,bj) + xalwu + flha(i,j) |
|
./pkg/cheapaml/cheapaml.F |
428 |
CHEAPAML |
& + fsha(i,j) + flha(i,j) |
|
./pkg/cheapaml/cheapaml.F |
464 |
CHEAPAML |
& +flha(i,j) |
|
./pkg/cheapaml/cheapaml.F |
561 |
CHEAPAML |
CALL DIAGNOSTICS_FILL( flha,'CH_LH ',0,1,2,bi,bj,myThid ) |
|
./pkg/cheapaml/cheapaml.F |
78 |
CHEAPAML |
_RL flha(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
12 |
CHEAPAML_LANL_FLUX |
O fsha, flha, evp, xolw, ssqt, q100 ) |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
194 |
CHEAPAML_LANL_FLUX |
flha = clha*delq |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
195 |
CHEAPAML_LANL_FLUX |
evp = -flha/lath |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
202 |
CHEAPAML_LANL_FLUX |
flha=-flha |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
37 |
CHEAPAML_LANL_FLUX |
_RL fsha, flha, evp, xolw, ssqt, q100 |
|
./pkg/cheapaml/cheapaml_seaice.F |
17 |
CHEAPAML_SEAICE |
O fsha, flha, evp, xolw, ssqt, q100, cdq, |
|
./pkg/cheapaml/cheapaml_seaice.F |
199 |
CHEAPAML_SEAICE |
O fsha0(i,j), flha(i,j), evp_0(i,j), xolw0(i,j), |
|
./pkg/cheapaml/cheapaml_seaice.F |
210 |
CHEAPAML_SEAICE |
O fsha(i,j), flha(i,j), evp(i,j), xolw(i,j), |
|
./pkg/cheapaml/cheapaml_seaice.F |
238 |
CHEAPAML_SEAICE |
flha(i,j) = evp_0(i,j)*LatentHeat |
|
./pkg/cheapaml/cheapaml_seaice.F |
245 |
CHEAPAML_SEAICE |
flha(i,j) = evp(i,j)*LatentHeat |
|
./pkg/cheapaml/cheapaml_seaice.F |
79 |
CHEAPAML_SEAICE |
_RL flha(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |