3: Interface 4: subroutine KSPSetType(a,b,z) 5: use petsckspdef 6: KSP a 7: character(*) b 8: integer z 9: end subroutine 10: end Interface 12: Interface 13: subroutine KSPView(a,b,z) 14: use petsckspdef 15: KSP a 16: PetscViewer b 17: integer z 18: end subroutine 19: end Interface