| File |
Line number |
Procedure |
Code |
|
./model/src/rotate_spherical_polar_grid.F |
62 |
ROTATE_SPHERICAL_POLAR_GRID |
_RL phiRad, thetaRad, psiRad |
|
./model/src/rotate_spherical_polar_grid.F |
73 |
ROTATE_SPHERICAL_POLAR_GRID |
thetaRad = thetaEuler*deg2rad |
|
./model/src/rotate_spherical_polar_grid.F |
94 |
ROTATE_SPHERICAL_POLAR_GRID |
Cinv(2,2) = COS(thetaRad) |
|
./model/src/rotate_spherical_polar_grid.F |
95 |
ROTATE_SPHERICAL_POLAR_GRID |
Cinv(2,3) = -SIN(thetaRad) |
|
./model/src/rotate_spherical_polar_grid.F |
98 |
ROTATE_SPHERICAL_POLAR_GRID |
Cinv(3,2) = SIN(thetaRad) |
|
./model/src/rotate_spherical_polar_grid.F |
99 |
ROTATE_SPHERICAL_POLAR_GRID |
Cinv(3,3) = COS(thetaRad) |