Actual source code: petscdmcomposite.h90

petsc-3.8.3 2017-12-09
Report Typos and Errors

  2:       Interface DMCompositeGetEntries
  3:         Subroutine DMCompositeGetEntries1(dm1, d1,ierr)
  4:           use petscdmdef
  5:           DM dm1
  6:           DM d1
  7:           PetscErrorCode ierr
  8:         End Subroutine

 10:         Subroutine DMCompositeGetEntries2(dm1, d1,d2,ierr)
 11:           use petscdmdef
 12:           DM dm1
 13:           DM d1,d2
 14:           PetscErrorCode ierr
 15:         End Subroutine

 17:         Subroutine DMCompositeGetEntries3(dm1, d1,d2,d3,ierr)
 18:           use petscdmdef
 19:           DM dm1
 20:           DM d1,d2,d3
 21:           PetscErrorCode ierr
 22:         End Subroutine

 24:         Subroutine DMCompositeGetEntries4(dm1, d1,d2,d3,d4,ierr)
 25:           use petscdmdef
 26:           DM dm1
 27:           PetscInt d2,d4
 28:           DM d1,d3
 29:           PetscErrorCode ierr
 30:         End Subroutine
 31:       End Interface

 33:       Interface DMCompositeGetAccess
 34:         Subroutine DMCompositeGetAccessvpvp(dm1, v,d1,d2,d3,d4,ierr)
 35:           use petscdmdef
 36:           DM dm1
 37:           Vec v,d1,d3
 38:           PetscScalar,pointer :: d2(:)
 39:           PetscScalar,pointer :: d4(:)
 40:           PetscErrorCode ierr
 41:         End Subroutine
 42:       End Interface

 44:       Interface DMCompositeRestoreAccess
 45:         Subroutine DMCompositeRestoreAccessvpvp(dm1, v,d1,d2,d3,d4,ierr)
 46:           use petscdmdef
 47:           DM dm1
 48:           Vec v,d1,d3
 49:           PetscScalar,pointer :: d2(:)
 50:           PetscScalar,pointer :: d4(:)
 51:           PetscErrorCode ierr
 52:         End Subroutine
 53:       End Interface