Symbol Description Uses
TKEPrandtlNumber 5


File Line number Procedure Code
./pkg/ggl90/ggl90_calc.F 128 GGL90_CALC 
         TKEPrandtlNumber(I,J,K)  = 0. _d 0
./pkg/ggl90/ggl90_calc.F 177 GGL90_CALC 
         TKEPrandtlNumber(I,J,K) = MIN(10.,prTemp)
./pkg/ggl90/ggl90_calc.F 198 GGL90_CALC 
     &        - KappaM*Nsquare/TKEPrandtlNumber(I,J,K)
./pkg/ggl90/ggl90_calc.F 365 GGL90_CALC 
         KappaH = KappaM/TKEPrandtlNumber(I,J,K)
./pkg/ggl90/ggl90_calc.F 87 GGL90_CALC 
      _RL     TKEPrandtlNumber (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)