| Symbol | Description | Uses |
| hypotxy | 4 |
| File | Line number | Procedure | Code |
| ./model/src/rotate_spherical_polar_grid.F | 160 | ROTATE_SPHERICAL_POLAR_GRID |
hypotxy = SQRT( ABS(XYZgeo(1))*ABS(XYZgeo(1)) |
| ./model/src/rotate_spherical_polar_grid.F | 170 | ROTATE_SPHERICAL_POLAR_GRID |
IF(hypotxy .EQ. 0. _d 0 .AND. XYZgeo(3) .EQ. 0. _d 0)THEN |
| ./model/src/rotate_spherical_polar_grid.F | 174 | ROTATE_SPHERICAL_POLAR_GRID |
Y(I,J,bi,bj) = ATAN2(XYZgeo(3),hypotxy)/deg2rad |
| ./model/src/rotate_spherical_polar_grid.F | 69 | ROTATE_SPHERICAL_POLAR_GRID |
_RL hypotxy |