File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_get_exf.F |
237 |
THSICE_GET_EXF |
wsm = sh(i,j,bi,bj) |
./pkg/thsice/thsice_get_exf.F |
284 |
THSICE_GET_EXF |
wsm = sh(i,j,bi,bj) |
./pkg/thsice/thsice_get_exf.F |
285 |
THSICE_GET_EXF |
tmpbulk = cdrag_1/wsm + cdrag_2 + cdrag_3*wsm |
./pkg/thsice/thsice_get_exf.F |
295 |
THSICE_GET_EXF |
ustar(i,j) = rdn(i,j)*wsm |
./pkg/thsice/thsice_get_exf.F |
430 |
THSICE_GET_EXF |
wsm = sh(i,j,bi,bj) |
./pkg/thsice/thsice_get_exf.F |
431 |
THSICE_GET_EXF |
tau = atmrho*exf_iceCe*wsm |
./pkg/thsice/thsice_get_exf.F |
434 |
THSICE_GET_EXF |
hsLocal = atmcp*atmrho*exf_iceCh*wsm*deltap(i,j) |
./pkg/thsice/thsice_get_exf.F |
438 |
THSICE_GET_EXF |
& wsm,hlLocal,hsLocal,flxExcSw(i,j) |
./pkg/thsice/thsice_get_exf.F |
444 |
THSICE_GET_EXF |
dfshdT = -atmcp*atmrho*exf_iceCh*wsm |
./pkg/thsice/thsice_get_exf.F |
88 |
THSICE_GET_EXF |
_RL wsm ! limited wind speed [m/s] (> umin) |
./pkg/bulk_force/bulkf_formula_lay.F |
151 |
BULKF_FORMULA_LAY |
wsm = MAX(ws,umin) |
./pkg/bulk_force/bulkf_formula_lay.F |
174 |
BULKF_FORMULA_LAY |
tmpBlk = cdrag_1/wsm + cdrag_2 + cdrag_3*wsm |
./pkg/bulk_force/bulkf_formula_lay.F |
182 |
BULKF_FORMULA_LAY |
ustar=rdn*wsm |
./pkg/bulk_force/bulkf_formula_lay.F |
221 |
BULKF_FORMULA_LAY |
ustar = rd*wsm |
./pkg/bulk_force/bulkf_formula_lay.F |
84 |
BULKF_FORMULA_LAY |
_RL wsm ! limited wind speed [m/s] (> umin) |
./pkg/exf/exf_bulkformulae.F |
179 |
EXF_BULKFORMULAE |
_RL wsm ! limited wind speed [m/s] (> umin) |
./pkg/exf/exf_bulkformulae.F |
308 |
EXF_BULKFORMULAE |
wsm = sh(i,j,bi,bj) |
./pkg/exf/exf_bulkformulae.F |
310 |
EXF_BULKFORMULAE |
& ( cdrag_1/wsm + cdrag_2 + cdrag_3*wsm ) |
./pkg/exf/exf_bulkformulae.F |
312 |
EXF_BULKFORMULAE |
ustar(i,j) = rdn(i,j)*wsm |
./pkg/exf/exf_bulkformulae.F |
515 |
EXF_BULKFORMULAE |
wsm = sh(i,j,bi,bj) |
./pkg/exf/exf_bulkformulae.F |
517 |
EXF_BULKFORMULAE |
& ( cdrag_1/wsm + cdrag_2 + cdrag_3*wsm ) |