Symbol Description Uses
Dinv 11


File Line number Procedure Code
./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 65 ROTATE_SPHERICAL_POLAR_GRID 
      _RL Ainv(3,3), Binv(3,3), Cinv(3,3), Dinv(3,3), CB(3,3)
./model/src/rotate_spherical_polar_grid.F 78 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(1,1) =  COS(phiRad)
./model/src/rotate_spherical_polar_grid.F 79 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(1,2) = -SIN(phiRad)
./model/src/rotate_spherical_polar_grid.F 80 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(1,3) =  0. _d 0
./model/src/rotate_spherical_polar_grid.F 82 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(2,1) =  SIN(phiRad)
./model/src/rotate_spherical_polar_grid.F 83 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(2,2) =  COS(phiRad)
./model/src/rotate_spherical_polar_grid.F 84 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(2,3) =  0. _d 0
./model/src/rotate_spherical_polar_grid.F 86 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(3,1) =  0. _d 0
./model/src/rotate_spherical_polar_grid.F 87 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(3,2) =  0. _d 0
./model/src/rotate_spherical_polar_grid.F 88 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(3,3) =  1. _d 0