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

 52:       Interface
 53:         Subroutine PetscFECreateDefault(c,d,n,i,str,o,f,ierr)
 54:           use petscdmdef
 55:           MPI_Comm, intent(in) :: c
 56:           PetscInt, intent(in) :: d,n
 57:           PetscBool, intent(in) :: i
 58:           character(len=*), intent(in) ::str
 59:           PetscInt, intent(in) :: o
 60:           PetscFE, intent(out) :: f
 61:           PetscErrorCode, intent(out) ::  ierr
 62:         End Subroutine
 63:       End Interface