| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_bulkformulae.F |
191 |
EXF_BULKFORMULAE |
_RL rd (1:sNx,1:sNy) ! = sqrt(Cd) [-] |
|
./pkg/exf/exf_bulkformulae.F |
444 |
EXF_BULKFORMULAE |
rd(i,j) = rdn(i,j)/(exf_one + rdn(i,j)*dzTmp) |
|
./pkg/exf/exf_bulkformulae.F |
446 |
EXF_BULKFORMULAE |
rd(i,j) = rdn(i,j)/(exf_one - rdn(i,j)/karman*psimh) |
|
./pkg/exf/exf_bulkformulae.F |
448 |
EXF_BULKFORMULAE |
ustar(i,j) = rd(i,j)*sh(i,j,bi,bj) |
|
./pkg/exf/exf_bulkformulae.F |
451 |
EXF_BULKFORMULAE |
tau(i,j) = atmrho_loc(i,j)*rd(i,j)*wspeed(i,j,bi,bj) |
|
./pkg/exf/exf_bulkformulae.F |
453 |
EXF_BULKFORMULAE |
tau(i,j) = atmrho*rd(i,j)*wspeed(i,j,bi,bj) |
|
./pkg/exf/exf_bulkformulae.F |
507 |
EXF_BULKFORMULAE |
tmpbulk = tau(i,j)*rd(i,j) |
|
./pkg/streamice/adstreamice_invert_surf_forthick.F |
117 |
ADSTRMICE_H_INV |
rd (i,j,bi,bj) = |
|
./pkg/streamice/adstreamice_invert_surf_forthick.F |
118 |
ADSTRMICE_H_INV |
& rd (i,j,bi,bj) - |
|
./pkg/thsice/thsice_get_exf.F |
104 |
THSICE_GET_EXF |
_RL rd (1-OLx:sNx+OLx,1-OLy:sNy+OLy) ! = sqrt(Cd) [-] |
|
./pkg/thsice/thsice_get_exf.F |
193 |
THSICE_GET_EXF |
rd(i,j) = 0. _d 0 |
|
./pkg/thsice/thsice_get_exf.F |
413 |
THSICE_GET_EXF |
rd(i,j)= rdn(i,j)/( exf_one + rdn(i,j)*(zwln-psimh)/karman ) |
|
./pkg/thsice/thsice_get_exf.F |
415 |
THSICE_GET_EXF |
rd(i,j)= rdn(i,j)/( exf_one - rdn(i,j)/karman*psimh ) |
|
./pkg/thsice/thsice_get_exf.F |
421 |
THSICE_GET_EXF |
ustar(i,j) = rd(i,j)*sh(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_exf.F |
435 |
THSICE_GET_EXF |
tau = atmrho_loc(i,j)*rd(i,j)*wspeed(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_exf.F |
437 |
THSICE_GET_EXF |
tau = atmrho*rd(i,j)*wspeed(i,j,bi,bj) |
|
./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 |
185 |
BULKF_FORMULA_LANL |
ustar = rd*usm |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
192 |
BULKF_FORMULA_LANL |
csha = rhoa*cpair*us*rh*rd |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
193 |
BULKF_FORMULA_LANL |
clha = rhoa*lath*us*re*rd |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
86 |
BULKF_FORMULA_LANL |
_RL rd ! = sqrt(Cd) [-] |
|
./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 |
221 |
BULKF_FORMULA_LAY |
ustar = rd*wsm |
|
./pkg/bulk_force/bulkf_formula_lay.F |
228 |
BULKF_FORMULA_LAY |
tau = rhoA*rd*ws |
|
./pkg/bulk_force/bulkf_formula_lay.F |
236 |
BULKF_FORMULA_LAY |
ust = tau*rd*uw |
|
./pkg/bulk_force/bulkf_formula_lay.F |
237 |
BULKF_FORMULA_LAY |
vst = tau*rd*vw |
|
./pkg/bulk_force/bulkf_formula_lay.F |
95 |
BULKF_FORMULA_LAY |
_RL rd ! = sqrt(Cd) [-] |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
180 |
CHEAPAML_LANL_FLUX |
rd = rdn/(1. _d 0 + rdn*(aln-psimh)/xkar) |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
184 |
CHEAPAML_LANL_FLUX |
ustar = rd*usm |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
190 |
CHEAPAML_LANL_FLUX |
csha = rhoa*cpair*usm*rh*rd |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
191 |
CHEAPAML_LANL_FLUX |
clha = rhoa*lath*usm*re*rd |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
69 |
CHEAPAML_LANL_FLUX |
_RL rd,re,rh,tta,ttas,toa,ttt |