| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_get_exf.F |
113 |
THSICE_GET_EXF |
_RL htol ! stability parameter at zth [-] |
|
./pkg/thsice/thsice_get_exf.F |
334 |
THSICE_GET_EXF |
htol = huol*ht/hu |
|
./pkg/thsice/thsice_get_exf.F |
354 |
THSICE_GET_EXF |
xsq = SQRT( ABS(exf_one - htol*16. _d 0) ) |
|
./pkg/thsice/thsice_get_exf.F |
357 |
THSICE_GET_EXF |
xsq = MAX(SQRT(ABS(exf_one - htol*16. _d 0)),exf_one) |
|
./pkg/thsice/thsice_get_exf.F |
359 |
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 |
|
./pkg/exf/exf_bulkformulae.F |
200 |
EXF_BULKFORMULAE |
_RL htol ! stability parameter at zth [-] |
|
./pkg/exf/exf_bulkformulae.F |
374 |
EXF_BULKFORMULAE |
htol = huol*ht/hu |
|
./pkg/exf/exf_bulkformulae.F |
402 |
EXF_BULKFORMULAE |
xsq = SQRT( ABS(exf_one - htol*16. _d 0) ) |
|
./pkg/exf/exf_bulkformulae.F |
405 |
EXF_BULKFORMULAE |
xsq = max(sqrt(abs(exf_one - 16.*htol)),exf_one) |
|
./pkg/exf/exf_bulkformulae.F |
407 |
EXF_BULKFORMULAE |
psixh = -psim_fac*htol*stable + (exf_one-stable)* |