Symbol Description Uses
TKEPrandtlNumber 5


File Line number Procedure Code
./pkg/ggl90/ggl90_calc.F 130 GGL90_CALC 
         TKEPrandtlNumber(I,J,K)  = 0. _d 0
./pkg/ggl90/ggl90_calc.F 180 GGL90_CALC 
         TKEPrandtlNumber(I,J,K) = MIN(10.0 _d 0,prTemp)
./pkg/ggl90/ggl90_calc.F 202 GGL90_CALC 
     &        - KappaM*Nsquare/TKEPrandtlNumber(I,J,K)
./pkg/ggl90/ggl90_calc.F 369 GGL90_CALC 
         KappaH = KappaM/TKEPrandtlNumber(I,J,K)
./pkg/ggl90/ggl90_calc.F 88 GGL90_CALC 
      _RL     TKEPrandtlNumber (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)