Actual source code: petscdt.h90
petsc-3.10.5 2019-03-28
Report Typos and Errors

      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