Symbol Description Uses
Dinv 11


File Line number Procedure Code
./model/src/rotate_spherical_polar_grid.F 129 ROTATE_SPHERICAL_POLAR_GRID 
         Ainv(ia,ja) = Ainv(ia,ja) + Dinv(ia,ka)*CB(ka,ja)
./model/src/rotate_spherical_polar_grid.F 64 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 77 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(1,1) =  COS(phiRad)
./model/src/rotate_spherical_polar_grid.F 78 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(1,2) = -SIN(phiRad)
./model/src/rotate_spherical_polar_grid.F 79 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(1,3) =  0. _d 0
./model/src/rotate_spherical_polar_grid.F 81 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(2,1) =  SIN(phiRad)
./model/src/rotate_spherical_polar_grid.F 82 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(2,2) =  COS(phiRad)
./model/src/rotate_spherical_polar_grid.F 83 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(2,3) =  0. _d 0
./model/src/rotate_spherical_polar_grid.F 85 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(3,1) =  0. _d 0
./model/src/rotate_spherical_polar_grid.F 86 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(3,2) =  0. _d 0
./model/src/rotate_spherical_polar_grid.F 87 ROTATE_SPHERICAL_POLAR_GRID 
      Dinv(3,3) =  1. _d 0