Actual source code: petscpc.h90

  1:       Interface
  2:       subroutine PCSetType(a,b,z)
  3:       import tPC
  4:        PC a
  5:        character(*) b
  6:        PetscErrorCode z
  7:        end subroutine
  8:       end Interface

 10:       Interface
 11:       subroutine PCView(a,b,z)
 12:       import tPC,tPetscViewer
 13:        PC a
 14:        PetscViewer b
 15:        PetscErrorCode z
 16:        end subroutine
 17:       end Interface

 19:       Interface
 20:       subroutine PCFieldSplitSetIS(a,b,c,z)
 21:       import tPC,tIS
 22:        PC a
 23:        character(*)  b
 24:        IS c
 25:        PetscErrorCode z
 26:        end subroutine
 27:       end Interface

 29:       Interface
 30:       subroutine PCFieldSplitGetIS(a,b,c,z)
 31:       import tPC,tIS
 32:        PC a
 33:        character(*)  b
 34:        IS c
 35:        PetscErrorCode z
 36:        end subroutine
 37:       end Interface