Symbol Description Uses
uPseudo 6



File Line number Procedure Code
./model/src/calc_grid_angles.F 43 CALC_GRID_ANGLES
      _RL uPseudo(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./model/src/calc_grid_angles.F 57 CALC_GRID_ANGLES
            uPseudo(i,j) =
./model/src/calc_grid_angles.F 61 CALC_GRID_ANGLES
            uPseudo(i,j) = 0.
./model/src/calc_grid_angles.F 63 CALC_GRID_ANGLES
          u2zonDir(i,j,bi,bj) = rSphere*uPseudo(i,j)
./model/src/calc_grid_angles.F 81 CALC_GRID_ANGLES
           uC = 0.5*(uPseudo(i,j) + uPseudo(i+1,j))