Actual source code: petscdmcomposite.h90
petsc-3.8.4 2018-03-24
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