File |
Line number |
Procedure |
Code |
./pkg/exf/exf_bulkformulae.F |
209 |
EXF_BULKFORMULAE |
_RL htol ! stability parameter at zth [-] |
./pkg/exf/exf_bulkformulae.F |
390 |
EXF_BULKFORMULAE |
htol = huol*ht/hu |
./pkg/exf/exf_bulkformulae.F |
414 |
EXF_BULKFORMULAE |
xsq = SQRT( ABS(exf_one - htol*16. _d 0) ) |
./pkg/exf/exf_bulkformulae.F |
417 |
EXF_BULKFORMULAE |
xsq = MAX(SQRT(ABS(exf_one - 16.*htol)),exf_one) |
./pkg/exf/exf_bulkformulae.F |
419 |
EXF_BULKFORMULAE |
psixh = -psim_fac*htol*stable + (exf_one-stable)* |
./pkg/thsice/thsice_get_exf.F |
121 |
THSICE_GET_EXF |
_RL htol ! stability parameter at zth [-] |
./pkg/thsice/thsice_get_exf.F |
364 |
THSICE_GET_EXF |
htol = huol*ht/hu |
./pkg/thsice/thsice_get_exf.F |
384 |
THSICE_GET_EXF |
xsq = SQRT( ABS(exf_one - htol*16. _d 0) ) |
./pkg/thsice/thsice_get_exf.F |
387 |
THSICE_GET_EXF |
xsq = MAX(SQRT(ABS(exf_one - htol*16. _d 0)),exf_one) |
./pkg/thsice/thsice_get_exf.F |
389 |
THSICE_GET_EXF |
psixh = -psim_fac*htol*stable |
./pkg/bulk_force/bulkf_formula_lay.F |
101 |
BULKF_FORMULA_LAY |
_RL htol ! stability parameter at zth [-] |
./pkg/bulk_force/bulkf_formula_lay.F |
200 |
BULKF_FORMULA_LAY |
htol = huol*zth/zwd |
./pkg/bulk_force/bulkf_formula_lay.F |
201 |
BULKF_FORMULA_LAY |
xsq = SQRT( ABS(one - htol*16. _d 0) ) |
./pkg/bulk_force/bulkf_formula_lay.F |
202 |
BULKF_FORMULA_LAY |
psixh = -5. _d 0*htol*stable |