MKLPardisoSolverClass Module


Uses


Derived Types

type, public, extends(GenericLinSolver_t) ::  MKLPardisoSolver_t

Components

Type Visibility Attributes Name Initial
class(JacobianComputer_t), public, allocatable :: Jacobian
logical, public :: converged = .FALSE.
logical, public :: withMPI = .FALSE.
integer, public :: DimPrb
integer, public :: globalDimPrb
integer, public :: niter = 0
integer, public :: JacobianComputation = NUMERICAL_JACOBIAN
type(DGSem), public, pointer :: p_sem => null()
type(csrMat_t), public :: A
type(csrMat_t), public, pointer :: ALU
type(PETSCMatrix_t), public :: PETScA
real(kind=RP), public, DIMENSION(:), ALLOCATABLE :: x
real(kind=RP), public, DIMENSION(:), ALLOCATABLE :: b
real(kind=RP), public :: Ashift
logical, public :: AIsPrealloc
logical, public :: Variable_dt
logical, public :: AIsPetsc = .false.
integer, public :: mtype
integer, public, ALLOCATABLE :: perm(:)
integer, public, POINTER :: Pardiso_iparm(:) => NULL()
integer(kind=AddrInt), public, POINTER :: Pardiso_pt(:) => NULL()

Type-Bound Procedures

procedure, public :: SetRHSValues
procedure, public :: AssemblyRHS
procedure, public :: ComputeANextStep
procedure, public :: construct => ConstructMKLContext
procedure, public :: ComputeAndFactorizeJacobian => MKL_ComputeAndFactorizeJacobian
procedure, public :: ReFactorizeJacobian => MKL_ReFactorizeJacobian
procedure, public :: solve
procedure, public :: SolveLUDirect => MKL_SolveLUDirect
procedure, public :: SetRHSValue => MKL_SetRHSValue
procedure, public :: SetRHS => MKL_SetRHS
procedure, public :: GetXValue => MKL_GetXValue
procedure, public :: GetX => MKL_GetX
procedure, public :: destroy => MKL_destroy
procedure, public :: SetOperatorDt
procedure, public :: ReSetOperatorDt
procedure, public :: ComputeJacobianMKL
procedure, public :: FactorizeJacobian => MKL_FactorizeJacobian
procedure, public :: SetJacobian => MKL_SetJacobian
procedure, public :: Getxnorm => MKL_GetXnorm
procedure, public :: Getrnorm