Symbol | Description | Uses |
Ribu | 7 |
File | Line number | Procedure | Code |
./pkg/cheapaml/cheapaml_coare3_flux.F | 148 | CHEAPAML_COARE3_FLUX |
Ribu=-gravity*zu*(Dt+0.61 _d 0*tta*Dq)/(tta*Du**2) |
./pkg/cheapaml/cheapaml_coare3_flux.F | 149 | CHEAPAML_COARE3_FLUX |
IF (Ribu.LT.0. _d 0) THEN |
./pkg/cheapaml/cheapaml_coare3_flux.F | 150 | CHEAPAML_COARE3_FLUX |
zetu=CC*Ribu/(1. _d 0+Ribu/Ribcu) ! Unstable G and F |
./pkg/cheapaml/cheapaml_coare3_flux.F | 152 | CHEAPAML_COARE3_FLUX |
zetu=CC*Ribu*(1. _d 0 +27. _d 0/9. _d 0*Ribu/CC) ! Stable |
./pkg/cheapaml/cheapaml_coare3_flux.F | 65 | CHEAPAML_COARE3_FLUX |
_RL psiu,psit,zot10,Ct10,CC,Ribu |