| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_bulkformulae.F |
213 |
EXF_BULKFORMULAE |
_RL psimh ! momentum stability function |
|
./pkg/exf/exf_bulkformulae.F |
404 |
EXF_BULKFORMULAE |
psimh = -psim_fac*huol*stable |
|
./pkg/exf/exf_bulkformulae.F |
410 |
EXF_BULKFORMULAE |
psimh = 0. _d 0 |
|
./pkg/exf/exf_bulkformulae.F |
427 |
EXF_BULKFORMULAE |
dzTmp = (zwln-psimh)/karman |
|
./pkg/exf/exf_bulkformulae.F |
435 |
EXF_BULKFORMULAE |
usn = sh(i,j,bi,bj)/(exf_one - rdn(i,j)/karman*psimh) |
|
./pkg/exf/exf_bulkformulae.F |
446 |
EXF_BULKFORMULAE |
rd(i,j) = rdn(i,j)/(exf_one - rdn(i,j)/karman*psimh) |
|
./pkg/thsice/thsice_get_exf.F |
125 |
THSICE_GET_EXF |
_RL psimh ! momentum stability function |
|
./pkg/thsice/thsice_get_exf.F |
377 |
THSICE_GET_EXF |
psimh = -psim_fac*huol*stable |
|
./pkg/thsice/thsice_get_exf.F |
397 |
THSICE_GET_EXF |
& /( exf_one + rdn(i,j)*(zwln-psimh)/karman ) |
|
./pkg/thsice/thsice_get_exf.F |
400 |
THSICE_GET_EXF |
usn = sh(i,j,bi,bj)/(exf_one - rdn(i,j)/karman*psimh) |
|
./pkg/thsice/thsice_get_exf.F |
413 |
THSICE_GET_EXF |
rd(i,j)= rdn(i,j)/( exf_one + rdn(i,j)*(zwln-psimh)/karman ) |
|
./pkg/thsice/thsice_get_exf.F |
415 |
THSICE_GET_EXF |
rd(i,j)= rdn(i,j)/( exf_one - rdn(i,j)/karman*psimh ) |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
173 |
BULKF_FORMULA_LANL |
psimh = -5. _d 0*huol*stable + (1. _d 0-stable)* |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
181 |
BULKF_FORMULA_LANL |
rd = rdn/(1. _d 0 + rdn*(aln-psimh)/xkar) |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
94 |
BULKF_FORMULA_LANL |
_RL psimh ! momentum stability function |
|
./pkg/bulk_force/bulkf_formula_lay.F |
104 |
BULKF_FORMULA_LAY |
_RL psimh ! momentum stability function |
|
./pkg/bulk_force/bulkf_formula_lay.F |
196 |
BULKF_FORMULA_LAY |
psimh = -5. _d 0*huol*stable |
|
./pkg/bulk_force/bulkf_formula_lay.F |
206 |
BULKF_FORMULA_LAY |
usn = ws/(one + rdn/xkar*(zwln-psimh) ) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
216 |
BULKF_FORMULA_LAY |
rd = rdn/(1. _d 0 + rdn*(zwln-psimh)/xkar) |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
171 |
CHEAPAML_LANL_FLUX |
psimh = -5. _d 0*huol*stable + (1. _d 0-stable)* |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
180 |
CHEAPAML_LANL_FLUX |
rd = rdn/(1. _d 0 + rdn*(aln-psimh)/xkar) |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
72 |
CHEAPAML_LANL_FLUX |
_RL huol,stable,xsq,x,psimh,psixh |