| Symbol | Description | Uses |
| psik | 6 |
| File | Line number | Procedure | Code |
| ./pkg/cheapaml/cheapaml_coare3_flux.F | 289 | CHEAPAML_COARE3_FLUX |
_RL x,y,psik,psic,f,c |
| ./pkg/cheapaml/cheapaml_coare3_flux.F | 294 | CHEAPAML_COARE3_FLUX |
psik=2.*LOG((1.+x)/2.)+LOG((1.+x*x)/2.)-2.*ATAN(x)+2.*ATAN(oneRL) |
| ./pkg/cheapaml/cheapaml_coare3_flux.F | 300 | CHEAPAML_COARE3_FLUX |
psiu = (1.-f)*psik+f*psic |
| ./pkg/cheapaml/cheapaml_coare3_flux.F | 327 | CHEAPAML_COARE3_FLUX |
_RL x,y,psik,psic,f,c |
| ./pkg/cheapaml/cheapaml_coare3_flux.F | 332 | CHEAPAML_COARE3_FLUX |
psik = 2.*LOG((1.+x)/2.) |
| ./pkg/cheapaml/cheapaml_coare3_flux.F | 338 | CHEAPAML_COARE3_FLUX |
psit = (1.-f)*psik+f*psic |