| 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 |
195 |
BULKF_FORMULA_LANL |
fsha = csha*deltap |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
56 |
BULKF_FORMULA_LANL |
_RL fsha ! sensible 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 |
233 |
BULKF_FORMULA_LAY |
fsha = csha*delth |
|
./pkg/bulk_force/bulkf_formula_lay.F |
62 |
BULKF_FORMULA_LAY |
_RL fsha ! sensible heat flux (>0 downward) [W/m2] |
|
./pkg/cheapaml/cheapaml.F |
354 |
CHEAPAML |
O fsha, flha, evp, xolw, ssqt, q100, cdq, |
|
./pkg/cheapaml/cheapaml.F |
379 |
CHEAPAML |
fsha(i,j) = icFrac*fsha(i,j) + opFrac*fsha0 |
|
./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 |
428 |
CHEAPAML |
& + fsha(i,j) + flha(i,j) |
|
./pkg/cheapaml/cheapaml.F |
463 |
CHEAPAML |
& +fsha(i,j) |
|
./pkg/cheapaml/cheapaml.F |
560 |
CHEAPAML |
CALL DIAGNOSTICS_FILL( fsha,'CH_SH ',0,1,2,bi,bj,myThid ) |
|
./pkg/cheapaml/cheapaml.F |
77 |
CHEAPAML |
_RL fsha(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 |
193 |
CHEAPAML_LANL_FLUX |
fsha = csha*deltap |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
201 |
CHEAPAML_LANL_FLUX |
fsha=-fsha |
|
./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 |
210 |
CHEAPAML_SEAICE |
O fsha(i,j), flha(i,j), evp(i,j), xolw(i,j), |
|
./pkg/cheapaml/cheapaml_seaice.F |
215 |
CHEAPAML_SEAICE |
& - fsha(i,j) - evp(i,j)*LatentHeat |
|
./pkg/cheapaml/cheapaml_seaice.F |
237 |
CHEAPAML_SEAICE |
fsha(i,j) = fsha0(i,j) |
|
./pkg/cheapaml/cheapaml_seaice.F |
243 |
CHEAPAML_SEAICE |
fsha(i,j) = fsha(i,j) + dTsurf(i,j)*dShdTs(i,j) |
|
./pkg/cheapaml/cheapaml_seaice.F |
259 |
CHEAPAML_SEAICE |
& - fsha(i,j) - evp(i,j)*LVapor |
|
./pkg/cheapaml/cheapaml_seaice.F |
78 |
CHEAPAML_SEAICE |
_RL fsha(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |