Actual source code: petscdm.h90
petsc-3.11.4 2019-09-28
1: Interface
2: subroutine DMGetStratumIS(d,str,v,i,ierr)
3: use petscdmdef
4: use petscisdef
5: type(tDM), intent(in) :: d
6: character(*), intent(in) :: str
7: PetscInt, intent(in) :: v
8: type(tIS), intent(out) :: i
9: PetscErrorCode, intent(out) :: ierr
10: end Subroutine DMGetStratumIS
11: subroutine DMGetStratumSize(d,str,v,s,ierr)
12: use petscdmdef
13: type(tDM), intent(in) :: d
14: character(*), intent(in) :: str
15: PetscInt, intent(in) :: v
16: PetscInt, intent(out) :: s
17: PetscErrorCode, intent(out) :: ierr
18: end Subroutine DMGetStratumSize
19: end Interface