| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_get_exf.F |
197 |
THSICE_GET_EXF |
rdn = SQRT(tmpbulk) |
|
./pkg/thsice/thsice_get_exf.F |
203 |
THSICE_GET_EXF |
ustar = rdn*wsm |
|
./pkg/thsice/thsice_get_exf.F |
256 |
THSICE_GET_EXF |
usn = ws/( exf_one + rdn*(zwln-psimh)/karman ) |
|
./pkg/thsice/thsice_get_exf.F |
262 |
THSICE_GET_EXF |
rdn = SQRT(tmpbulk) |
|
./pkg/thsice/thsice_get_exf.F |
267 |
THSICE_GET_EXF |
rd = rdn/( exf_one + rdn*(zwln-psimh)/karman ) |
|
./pkg/thsice/thsice_get_exf.F |
86 |
THSICE_GET_EXF |
_RL rdn, ren, rhn ! neutral, zref (=10m) values of rd, re, rh |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
157 |
BULKF_FORMULA_LANL |
rdn=xkar/(log(zref/zice)) |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
158 |
BULKF_FORMULA_LANL |
rhn=rdn |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
159 |
BULKF_FORMULA_LANL |
ren=rdn |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
161 |
BULKF_FORMULA_LANL |
ustar=rdn*usm |
|
./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 |
89 |
BULKF_FORMULA_LANL |
_RL rdn, ren, rhn ! initial (neutral) values of rd, re, rh |
|
./pkg/bulk_force/bulkf_formula_lay.F |
175 |
BULKF_FORMULA_LAY |
rdn = SQRT(tmpBlk) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
182 |
BULKF_FORMULA_LAY |
ustar=rdn*wsm |
|
./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 |
211 |
BULKF_FORMULA_LAY |
rdn = SQRT(tmpBlk) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
216 |
BULKF_FORMULA_LAY |
rd = rdn/(1. _d 0 + rdn*(zwln-psimh)/xkar) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
98 |
BULKF_FORMULA_LAY |
_RL rdn, ren, rhn ! neutral, zref (=10m) values of rd, re, rh |
|
./pkg/cheapaml/cheapaml.F |
293 |
CHEAPAML |
rdn=xkar/(log(zref/zice)) |
|
./pkg/cheapaml/cheapaml.F |
294 |
CHEAPAML |
rhn=rdn |
|
./pkg/cheapaml/cheapaml.F |
295 |
CHEAPAML |
ren=rdn |
|
./pkg/cheapaml/cheapaml.F |
297 |
CHEAPAML |
ustar=rdn*usm |
|
./pkg/cheapaml/cheapaml.F |
318 |
CHEAPAML |
rd = rdn/(1. _d 0 + rdn*(aln-psimh)/xkar) |
|
./pkg/cheapaml/cheapaml.F |
86 |
CHEAPAML |
_RL rdn,ren,rhn,xkar,zice,zref |
|
./pkg/exf/exf_bulkformulae.F |
186 |
EXF_BULKFORMULAE |
_RL rdn (1:sNx,1:sNy) ! neutral, zref (=10m) values of rd |
|
./pkg/exf/exf_bulkformulae.F |
311 |
EXF_BULKFORMULAE |
rdn(i,j) = SQRT(tmpbulk) |
|
./pkg/exf/exf_bulkformulae.F |
312 |
EXF_BULKFORMULAE |
ustar(i,j) = rdn(i,j)*wsm |
|
./pkg/exf/exf_bulkformulae.F |
335 |
EXF_BULKFORMULAE |
rdn (i,j) = 0. _d 0 |
|
./pkg/exf/exf_bulkformulae.F |
414 |
EXF_BULKFORMULAE |
usn = wspeed(i,j,bi,bj)/(exf_one + rdn(i,j)*dzTmp ) |
|
./pkg/exf/exf_bulkformulae.F |
421 |
EXF_BULKFORMULAE |
usn = sh(i,j,bi,bj)/(exf_one - rdn(i,j)/karman*psimh) |
|
./pkg/exf/exf_bulkformulae.F |
428 |
EXF_BULKFORMULAE |
rdn(i,j) = SQRT(tmpbulk) |
|
./pkg/exf/exf_bulkformulae.F |
430 |
EXF_BULKFORMULAE |
rd(i,j) = rdn(i,j)/(exf_one + rdn(i,j)*dzTmp) |
|
./pkg/exf/exf_bulkformulae.F |
432 |
EXF_BULKFORMULAE |
rd(i,j) = rdn(i,j)/(exf_one - rdn(i,j)/karman*psimh) |