Symbol Description Uses
uNorm 7



File Line number Procedure Code
./model/src/calc_grid_angles.F 45 CALC_GRID_ANGLES
      _RL uC, vC, uNorm, tmpVal
./model/src/calc_grid_angles.F 83 CALC_GRID_ANGLES
           uNorm = SQRT(uC*uC+vC*vC)
./model/src/calc_grid_angles.F 84 CALC_GRID_ANGLES
           IF ( uNorm .NE. 0. _d 0 ) uNorm = 1. _d 0/uNorm
./model/src/calc_grid_angles.F 85 CALC_GRID_ANGLES
           angleCosC(i,j,bi,bj) =  uC*uNorm
./model/src/calc_grid_angles.F 86 CALC_GRID_ANGLES
           angleSinC(i,j,bi,bj) = -vC*uNorm