Actual source code: petscdmcomposite.h90

petsc-3.13.6 2020-09-29
Report Typos and Errors

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

 10:         Interface DMCompositeGetEntries
 11:         Subroutine DMCompositeGetEntries1(dm1, d1,ierr)
 12:           use petscdmdef
 13:           DM dm1
 14:           DM d1
 15:           PetscErrorCode ierr
 16:         End Subroutine

 18:         Subroutine DMCompositeGetEntries2(dm1, d1,d2,ierr)
 19:           use petscdmdef
 20:           DM dm1
 21:           DM d1,d2
 22:           PetscErrorCode ierr
 23:         End Subroutine

 25:         Subroutine DMCompositeGetEntries3(dm1, d1,d2,d3,ierr)
 26:           use petscdmdef
 27:           DM dm1
 28:           DM d1,d2,d3
 29:           PetscErrorCode ierr
 30:         End Subroutine

 32:         Subroutine DMCompositeGetEntries4(dm1, d1,d2,d3,d4,ierr)
 33:           use petscdmdef
 34:           DM dm1
 35:           PetscInt d2,d4
 36:           DM d1,d3
 37:           PetscErrorCode ierr
 38:         End Subroutine
 39:       End Interface

 41:       Interface DMCompositeGetAccess
 42:         Subroutine DMCompositeGetAccessvpvp(dm1, v,d1,d2,d3,d4,ierr)
 43:           use petscdmdef
 44:           DM dm1
 45:           Vec v,d1,d3
 46:           PetscScalar,pointer :: d2(:)
 47:           PetscScalar,pointer :: d4(:)
 48:           PetscErrorCode ierr
 49:         End Subroutine
 50:       End Interface

 52:       Interface DMCompositeRestoreAccess
 53:         Subroutine DMCompositeRestoreAccessvpvp(dm1, v,d1,d2,d3,d4,ierr)
 54:           use petscdmdef
 55:           DM dm1
 56:           Vec v,d1,d3
 57:           PetscScalar,pointer :: d2(:)
 58:           PetscScalar,pointer :: d4(:)
 59:           PetscErrorCode ierr
 60:         End Subroutine
 61:       End Interface

 63:       Interface DMCompositeGetAccessArray
 64:         Subroutine DMCompositeGetAccessArray(a,b,c,d,e,z)
 65:           use petscdmdef
 66:           DM a
 67:           Vec b
 68:           PetscInt c,d(*)
 69:           Vec e(*)
 70:           PetscErrorCode z
 71:         End Subroutine
 72:       End Interface

 74:       Interface DMCompositeRestoreAccessArray
 75:         Subroutine DMCompositeRestoreAccessArray(a,b,c,d,e,z)
 76:           use petscdmdef
 77:           DM a
 78:           Vec b
 79:           PetscInt c,d(*)
 80:           Vec e(*)
 81:           PetscErrorCode z
 82:         End Subroutine
 83:       End Interface

 85:       Interface DMCompositeGetLocalAccessArray
 86:         Subroutine DMCompositeGetLocalAccessArray(a,b,c,d,e,z)
 87:           use petscdmdef
 88:           DM a
 89:           Vec b
 90:           PetscInt c,d(*)
 91:           Vec e(*)
 92:           PetscErrorCode z
 93:         End Subroutine
 94:       End Interface

 96:       Interface DMCompositeRestoreLocalAccessArray
 97:         Subroutine DMCompositeRestoreLocalAccessArray(a,b,c,d,e,z)
 98:           use petscdmdef
 99:           DM a
100:           Vec b
101:           PetscInt c,d(*)
102:           Vec e(*)
103:           PetscErrorCode z
104:         End Subroutine
105:       End Interface

107:       Interface DMCompositeGetGlobalISs
108:         Subroutine DMCompositeGetGlobalISs(a,b,z)
109:           use petscdmdef
110:           DM a
111:           IS b(*)
112:           PetscErrorCode z
113:         End Subroutine
114:       End Interface