Symbol Description Uses
lwave 4



File Line number Procedure Code
./pkg/cheapaml/cheapaml_coare3_flux.F 114 CHEAPAML_COARE3_FLUX
      lwave=cwave*wavesp(i,j,bi,bj)
./pkg/cheapaml/cheapaml_coare3_flux.F 179 CHEAPAML_COARE3_FLUX
        zo=(50./twoPI)*lwave*(usr/cwave)**4.5 _d 0
./pkg/cheapaml/cheapaml_coare3_flux.F 182 CHEAPAML_COARE3_FLUX
        zo=1200. _d 0*wavesh(i,j,bi,bj)*(wavesh(i,j,bi,bj)/lwave)**4.5
./pkg/cheapaml/cheapaml_coare3_flux.F 61 CHEAPAML_COARE3_FLUX
      _RL twoPI,cwave,lwave