| File |
Line number |
Procedure |
Code |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
118 |
CHEAPAML_COARE3_FLUX |
Wg = 0.5 _d 0 !Gustiness factor initial guess |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
124 |
CHEAPAML_COARE3_FLUX |
Du= SQRT(u + Wg**2 ) !include gustiness in wind spd. difference |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
219 |
CHEAPAML_COARE3_FLUX |
Wg=xBeta*(Bf*zi)**.333 _d 0 |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
221 |
CHEAPAML_COARE3_FLUX |
Wg=0.2 _d 0 |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
223 |
CHEAPAML_COARE3_FLUX |
Du=SQRT(u**2 + Wg**2) !include gustiness in wind spd. |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
66 |
CHEAPAML_COARE3_FLUX |
_RL Du,Wg,Dt,Dq,u10,zo10,Cd10,Ch10 |