Actual source code: petscksp.h90

petsc-3.14.0 2020-09-29
Report Typos and Errors


  3:       Interface
  4:       subroutine KSPSetType(a,b,z)
  5:       use petsckspdef
  6:        KSP a
  7:        character(*) b
  8:        PetscErrorCode 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:        PetscErrorCode z
 18:        end subroutine
 19:       end Interface

 21:       Interface PCBJacobiGetSubKSP
 22:       subroutine PCBJacobiGetSubKSP1(a,b,c,d,z)
 23:        use petsckspdef
 24:        PC a ! PC
 25:        PetscInt b ! PetscInt
 26:        PetscInt c ! PetscInt
 27:        KSP d ! KSP
 28:        PetscErrorCode z
 29:       end subroutine
 30:       subroutine PCBJacobiGetSubKSP2(a,b,c,d,z)
 31:        use petsckspdef
 32:        PC a ! PC
 33:        PetscInt b ! PetscInt
 34:        PetscInt c ! PetscInt
 35:        KSP d(*) ! KSP
 36:        PetscErrorCode z
 37:       end subroutine
 38:       end Interface

 40:       Interface PCASMGetSubKSP
 41:       subroutine PCASMGetSubKSP1(a,b,c,d,z)
 42:        use petsckspdef
 43:        PC a ! PC
 44:        PetscInt b ! PetscInt
 45:        PetscInt c ! PetscInt
 46:        KSP d ! KSP
 47:        PetscErrorCode z
 48:       end subroutine
 49:       subroutine PCASMGetSubKSP2(a,b,c,d,z)
 50:        use petsckspdef
 51:        PC a ! PC
 52:        PetscInt b ! PetscInt
 53:        PetscInt c ! PetscInt
 54:        KSP d(*) ! KSP
 55:        PetscErrorCode z
 56:       end subroutine
 57:       end Interface

 59:       Interface PCGASMGetSubKSP
 60:       subroutine PCGASMGetSubKSP1(a,b,c,d,z)
 61:        use petsckspdef
 62:        PC a ! PC
 63:        PetscInt b ! PetscInt
 64:        PetscInt c ! PetscInt
 65:        KSP d ! KSP
 66:        PetscErrorCode z
 67:       end subroutine
 68:       subroutine PCGASMGetSubKSP2(a,b,c,d,z)
 69:        use petsckspdef
 70:        PC a ! PC
 71:        PetscInt b ! PetscInt
 72:        PetscInt c ! PetscInt
 73:        KSP d(*) ! KSP
 74:        PetscErrorCode z
 75:       end subroutine
 76:       end Interface