Symbol Description Uses
GGL90eps 4



File Line number Procedure Code
./pkg/ggl90/GGL90.h 53 NO PROCEDURE
      _RL    GGL90eps
./pkg/ggl90/GGL90.h 54 NO PROCEDURE
      PARAMETER ( GGL90eps = 2.23D-16 )
./pkg/ggl90/ggl90_calc.F 193 GGL90_CALC
     &        SQRTTKE(i,j,k)/SQRT( MAX(Nsquare(i,j,k),GGL90eps) )
./pkg/ggl90/ggl90_calc.F 403 GGL90_CALC
         RiNumber = MAX(Nsquare(i,j,k),0. _d 0)/(verticalShear+GGL90eps)