Symbol Description Uses
op25 8



File Line number Procedure Code
./pkg/gmredi/GMREDI.h 44 NO PROCEDURE
      _RL op25
./pkg/gmredi/GMREDI.h 46 NO PROCEDURE
      PARAMETER( op25 = 0.25D0 )
./pkg/gmredi/gmredi_calc_tensor.F 180 GMREDI_CALC_TENSOR
        dSigmaDx(i,j)=op25*( sigmaX(i+1, j ,k-1) +sigmaX(i,j,k-1)
./pkg/gmredi/gmredi_calc_tensor.F 183 GMREDI_CALC_TENSOR
        dSigmaDy(i,j)=op25*( sigmaY( i ,j+1,k-1) +sigmaY(i,j,k-1)
./pkg/gmredi/gmredi_calc_tensor.F 331 GMREDI_CALC_TENSOR
        dSigmaDy(i,j)=op25*( sigmaY(i-1,j+1,k) +sigmaY(i,j+1,k)
./pkg/gmredi/gmredi_calc_tensor.F 334 GMREDI_CALC_TENSOR
        dSigmaDr(i,j)=op25*( sigmaR(i-1,j, k ) +sigmaR(i,j, k )
./pkg/gmredi/gmredi_calc_tensor.F 412 GMREDI_CALC_TENSOR
        dSigmaDx(i,j)=op25*( sigmaX(i, j ,k) +sigmaX(i+1, j ,k)
./pkg/gmredi/gmredi_calc_tensor.F 417 GMREDI_CALC_TENSOR
        dSigmaDr(i,j)=op25*( sigmaR(i,j-1, k ) +sigmaR(i,j, k )