Symbol | Description | Uses |
kA | 7 |
File | Line number | Procedure | Code |
./model/src/rotate_spherical_polar_grid.F | 122 | ROTATE_SPHERICAL_POLAR_GRID |
DO kA=1,3 |
./model/src/rotate_spherical_polar_grid.F | 123 | ROTATE_SPHERICAL_POLAR_GRID |
CB (iA,jA) = CB (iA,jA) + Cinv(iA,kA)*Binv(kA,jA) |
./model/src/rotate_spherical_polar_grid.F | 129 | ROTATE_SPHERICAL_POLAR_GRID |
DO kA=1,3 |
./model/src/rotate_spherical_polar_grid.F | 130 | ROTATE_SPHERICAL_POLAR_GRID |
Ainv(iA,jA) = Ainv(iA,jA) + Dinv(iA,kA)*CB(kA,jA) |
./model/src/rotate_spherical_polar_grid.F | 61 | ROTATE_SPHERICAL_POLAR_GRID |
INTEGER I, J, iA, jA, kA |