File |
Line number |
Procedure |
Code |
./pkg/cheapaml/cheapaml_coare3_flux.F |
137 |
CHEAPAML_COARE3_FLUX |
zot10=10. _d 0/EXP(xkar/Ct10) |
./pkg/cheapaml/cheapaml_coare3_flux.F |
145 |
CHEAPAML_COARE3_FLUX |
Ct=xkar/LOG(zt/zot10) ! Temperature transfer coefficient |
./pkg/cheapaml/cheapaml_coare3_flux.F |
165 |
CHEAPAML_COARE3_FLUX |
tsr=-(Dt)*xkar/(LOG(zt/zot10)-psit(zt/L10)) |
./pkg/cheapaml/cheapaml_coare3_flux.F |
166 |
CHEAPAML_COARE3_FLUX |
qsr=-(Dq)*xkar/(LOG(zq/zot10)-psit(zq/L10)) |
./pkg/cheapaml/cheapaml_coare3_flux.F |
239 |
CHEAPAML_COARE3_FLUX |
& *xkar/(LOG(zt/zot10)-psit(zt/L10)) |
./pkg/cheapaml/cheapaml_coare3_flux.F |
65 |
CHEAPAML_COARE3_FLUX |
_RL psiu,psit,zot10,Ct10,CC,Ribu |