Symbol Description Uses
verticalShear 4


File Line number Procedure Code
./pkg/ggl90/ggl90_calc.F 175 GGL90_CALC 
         verticalShear = tempU*tempU + tempV*tempV
./pkg/ggl90/ggl90_calc.F 176 GGL90_CALC 
         RiNumber   = MAX(Nsquare,0. _d 0)/(verticalShear+GGL90eps)
./pkg/ggl90/ggl90_calc.F 201 GGL90_CALC 
     &        + KappaM*verticalShear
./pkg/ggl90/ggl90_calc.F 80 GGL90_CALC 
      _RL     verticalShear