2:       Interface
  3:         Subroutine PetscQuadratureGetData(q,dim,nc,np,p,w,ierr)
  4:           PetscInt     dim, nc, np
  5:           PetscReal, pointer :: p(:)
  6:           PetscReal, pointer :: w(:)
  7:           PetscErrorCode ierr
  8:           PetscQuadrature q
  9:         End Subroutine
 10:       End Interface

 12:       Interface
 13:         Subroutine PetscQuadratureRestoreData(q,dim,nc,np,p,w,ierr)
 14:           PetscInt     dim, nc, np
 15:           PetscReal, pointer :: p(:)
 16:           PetscReal, pointer :: w(:)
 17:           PetscErrorCode ierr
 18:           PetscQuadrature q
 19:         End Subroutine
 20:       End Interface

 22:       Interface
 23:         Subroutine PetscQuadratureSetData(q,dim,nc,np,p,w,ierr)
 24:           PetscInt     dim, nc, np
 25:           PetscReal, pointer :: p(:)
 26:           PetscReal, pointer :: w(:)
 27:           PetscErrorCode ierr
 28:           PetscQuadrature q
 29:         End Subroutine
 30:       End Interface

 32:       Interface
 33:         Subroutine PetscDSGetTabulation(prob,f,b,bDer,ierr)
 34:           PetscInt     f
 35:           PetscReal, pointer :: b(:)
 36:           PetscReal, pointer :: bDer(:)
 37:           PetscErrorCode ierr
 38:           PetscDS prob
 39:         End Subroutine
 40:       End Interface

 42:       Interface
 43:         Subroutine PetscDSRestoreTabulation(prob,f,b,bDer,ierr)
 44:           PetscInt     f
 45:           PetscReal, pointer :: b(:)
 46:           PetscReal, pointer :: bDer(:)
 47:           PetscErrorCode ierr
 48:           PetscDS prob
 49:         End Subroutine
 50:       End Interface