Symbol Description Uses
verticalShear 4


File Line number Procedure Code
./pkg/ggl90/ggl90_calc.F 172 GGL90_CALC 
         verticalShear = tempU*tempU + tempV*tempV
./pkg/ggl90/ggl90_calc.F 173 GGL90_CALC 
         RiNumber   = MAX(Nsquare,0. _d 0)/(verticalShear+GGL90eps)
./pkg/ggl90/ggl90_calc.F 197 GGL90_CALC 
     &        + KappaM*verticalShear
./pkg/ggl90/ggl90_calc.F 79 GGL90_CALC 
      _RL     verticalShear