1:       Interface
  2:       subroutine PCSetType(a,b,z)
  3:       use petscpcdef
  4:        PC a
  5:        character(*) b
  6:        integer z
  7:        end subroutine
  8:       end Interface

 10:       Interface
 11:       subroutine PCView(a,b,z)
 12:       use petscpcdef
 13:        PC a
 14:        PetscViewer b
 15:        integer z
 16:        end subroutine
 17:       end Interface