Symbol Description Uses
tempU 7



File Line number Procedure Code
./pkg/ggl90/ggl90_calc.F 438 GGL90_CALC
          tempU  = ( uVel( i ,j,km1,bi,bj) - uVel( i ,j,k,bi,bj) )
./pkg/ggl90/ggl90_calc.F 443 GGL90_CALC
     &                 ( tempU*tempU + tempUp*tempUp )*halfRL
./pkg/ggl90/ggl90_calc.F 452 GGL90_CALC
          tempU = ( ( uVel(i,j,km1,bi,bj) + uVel(i+1,j,km1,bi,bj) )
./pkg/ggl90/ggl90_calc.F 458 GGL90_CALC
          verticalShear(i,j) = tempU*tempU + tempV*tempV
./pkg/ggl90/ggl90_calc.F 94 GGL90_CALC
      _RL     tempU, tempUp, tempV, tempVp, prTemp