File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_get_exf.F |
109 |
THSICE_GET_EXF |
_RL usn, usm ! neutral, zref (=10m) wind-speed (+limited) |
./pkg/thsice/thsice_get_exf.F |
366 |
THSICE_GET_EXF |
usn = wspeed(i,j,bi,bj) |
./pkg/thsice/thsice_get_exf.F |
370 |
THSICE_GET_EXF |
usn = sh(i,j,bi,bj)/(exf_one - rdn(i,j)/karman*psimh) |
./pkg/thsice/thsice_get_exf.F |
372 |
THSICE_GET_EXF |
usm = MAX(usn, umin) |
./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 |
207 |
BULKF_FORMULA_LAY |
usm = MAX(usn, umin) |
./pkg/bulk_force/bulkf_formula_lay.F |
85 |
BULKF_FORMULA_LAY |
_RL usn ! neutral, zref (=10m) wind speed [m/s] |
./pkg/exf/exf_bulkformulae.F |
197 |
EXF_BULKFORMULAE |
_RL usn, usm |
./pkg/exf/exf_bulkformulae.F |
417 |
EXF_BULKFORMULAE |
usn = wspeed(i,j,bi,bj)/(exf_one + rdn(i,j)*dzTmp ) |
./pkg/exf/exf_bulkformulae.F |
424 |
EXF_BULKFORMULAE |
usn = sh(i,j,bi,bj)/(exf_one - rdn(i,j)/karman*psimh) |
./pkg/exf/exf_bulkformulae.F |
426 |
EXF_BULKFORMULAE |
usm = MAX(usn, umin) |