| subroutine qshep_oct_m::qs3grd::qs3grd  | 
          ( | 
          real(real64)  | 
          px,  | 
         
        
           | 
           | 
          real(real64)  | 
          py,  | 
         
        
           | 
           | 
          real(real64)  | 
          pz,  | 
         
        
           | 
           | 
          integer(int64)  | 
          n,  | 
         
        
           | 
           | 
          real(real64), dimension(n)  | 
          x,  | 
         
        
           | 
           | 
          real(real64), dimension(n)  | 
          y,  | 
         
        
           | 
           | 
          real(real64), dimension(n)  | 
          z,  | 
         
        
           | 
           | 
          real(real64), dimension(n)  | 
          f,  | 
         
        
           | 
           | 
          integer(int64)  | 
          nr,  | 
         
        
           | 
           | 
          integer(int64), dimension(nr, nr, nr)  | 
          lcell,  | 
         
        
           | 
           | 
          integer(int64), dimension(n)  | 
          lnext,  | 
         
        
           | 
           | 
          real(real64), dimension(3)  | 
          xyzmin,  | 
         
        
           | 
           | 
          real(real64), dimension(3)  | 
          xyzdel,  | 
         
        
           | 
           | 
          real(real64)  | 
          rmax,  | 
         
        
           | 
           | 
          real(real64), dimension(n)  | 
          rsq,  | 
         
        
           | 
           | 
          real(real64), dimension(9, n)  | 
          a,  | 
         
        
           | 
           | 
          real(real64)  | 
          q,  | 
         
        
           | 
           | 
          real(real64)  | 
          qx,  | 
         
        
           | 
           | 
          real(real64)  | 
          qy,  | 
         
        
           | 
           | 
          real(real64)  | 
          qz,  | 
         
        
           | 
           | 
          integer(int64)  | 
          ier  | 
         
        
           | 
          ) | 
           |  | 
         
       
   | 
  
private   |