The Open FUSION Toolkit 1.0.0-8905cc5
Modeling tools for plasma and fusion research and engineering
Loading...
Searching...
No Matches
Public Member Functions | Public Attributes | List of all members
oft_lusolver Type Referenceabstract

Detailed Description

LU solver class.

Inheritance diagram for oft_lusolver:
Inheritance graph
[legend]

Public Member Functions

procedure apply (self, u, g)
 Solve linear system.
 
procedure(solver_apply), deferred apply (self, u, g)
 Solve system.
 
procedure check_thread (self)
 Check thread safety.
 
procedure check_thread (self)
 Check thread safety.
 
procedure delete (self)
 Clean-up internal storage.
 
procedure(solver_delete), deferred delete (self)
 Clean-up internal storage.
 
procedure setup_from_xml (self, solver_node, level)
 Setup solver from XML node.
 
procedure setup_from_xml (self, solver_node, level)
 Setup solver from XML node.
 
procedure update (self, new_pattern)
 Update solver with new settings/operators and refactor.
 
procedure update (self, new_pattern)
 Update solver with new settings/operators.
 
procedure view (self)
 Print solver information.
 

Public Attributes

class(oft_matrix), pointer a => NULL()
 Matrix to be inverted.
 
real(r8), dimension(:,:), pointer atmp => NULL()
 Local dense matrix ("lapack" only)
 
real(r8) atol = 1.d-14
 Absolute convergence tolerance \( |res| < atol \).
 
class(oft_solver_bc), pointer bc => NULL()
 Boundary condition.
 
integer(i4) cits = 0
 Number of iteractions to convergence.
 
logical full_residual = .TRUE.
 Output true residual on exit.
 
logical initialized = .FALSE.
 Solver has been constructed.
 
integer(i4), dimension(:), pointer ipiv => NULL()
 Row pivot array ("lapack" only)
 
logical(kind=c_bool) iter_refine = .FALSE.
 Perform iterative refinement.
 
integer(i4) itplot =10
 Output frequency for iterative solvers when pm=.TRUE.
 
integer(i4) its = -1
 Maximum iteration count.
 
integer(i4) nrhs = 1
 Number of right hand sides.
 
character(len=7) package = DEF_LU_PACK
 Factorization package.
 
logical pm = .FALSE.
 Performance monitor override.
 
class(oft_solver), pointer pre => NULL()
 Preconditioner.
 
logical refactor = .TRUE.
 Refactor solution on next application.
 
real(r8) rtol = 1.d-14
 Relative convergence tolerance \( |res|/|res_0| < rtol \).
 
real(r8), dimension(:,:), pointer sec_rhs => NULL()
 Storage for additional RHS data.
 
logical update_graph = .TRUE.
 Perform full factorization including symbolic steps.
 

Member Function/Subroutine Documentation

◆ apply() [1/2]

procedure apply ( class(oft_lusolver), intent(inout)  self,
class(oft_vector), intent(inout)  u,
class(oft_vector), intent(inout)  g 
)

Solve linear system.

Parameters
[in,out]uGuess/Solution field
[in,out]gRHS/Residual field

◆ apply() [2/2]

procedure(solver_apply), deferred apply ( class(oft_solver), intent(inout)  self,
class(oft_vector), intent(inout)  u,
class(oft_vector), intent(inout)  g 
)
pure virtualinherited

Solve system.

Parameters
[in,out]selfSolver object
[in,out]uGuess/Solution field
[in,out]gRHS/Residual field

◆ check_thread() [1/2]

procedure check_thread ( class(oft_lusolver), intent(inout)  self)

Check thread safety.

◆ check_thread() [2/2]

procedure check_thread ( class(oft_solver), intent(inout)  self)
inherited

Check thread safety.

Parameters
[in,out]selfSolver object

◆ delete() [1/2]

procedure delete ( class(oft_lusolver), intent(inout)  self)

Clean-up internal storage.

◆ delete() [2/2]

procedure(solver_delete), deferred delete ( class(oft_solver), intent(inout)  self)
pure virtualinherited

Clean-up internal storage.

Parameters
[in,out]selfSolver object

◆ setup_from_xml() [1/2]

procedure setup_from_xml ( class(oft_lusolver), intent(inout)  self,
type(xml_node), intent(in), pointer  solver_node,
integer(i4), intent(in), optional  level 
)

Setup solver from XML node.

Parameters
[in]solver_nodeXML node containing solver definition
[in]levelLevel in MG hierarchy (optional)

◆ setup_from_xml() [2/2]

procedure setup_from_xml ( class(oft_solver), intent(inout)  self,
type(xml_node), intent(in), pointer  solver_node,
integer(i4), intent(in), optional  level 
)
inherited

Setup solver from XML node.

Note
This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized solvers
Parameters
[in,out]selfSolver object
[in]solver_nodeXML element containing solver definition
[in]levelLevel in MG hierarchy (optional)

◆ update() [1/2]

procedure update ( class(oft_lusolver), intent(inout)  self,
logical, intent(in), optional  new_pattern 
)

Update solver with new settings/operators and refactor.

Parameters
[in]new_patternUpdate matrix pattern (optional)

◆ update() [2/2]

procedure update ( class(oft_solver), intent(inout)  self,
logical, intent(in), optional  new_pattern 
)
inherited

Update solver with new settings/operators.

Note
This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized solvers
Parameters
[in,out]selfSolver object
[in]new_patternUpdate matrix non-zero pattern? (optional)

◆ view()

procedure view ( class(oft_solver), intent(inout)  self)
inherited

Print solver information.

Note
This subroutine is a dummy routine used to specify the interface of the member function and catch errors in uninitialized solvers
Parameters
[in,out]selfSolver object

Member Data Documentation

◆ a

class(oft_matrix), pointer a => NULL()
inherited

Matrix to be inverted.

◆ atmp

real(r8), dimension(:,:), pointer atmp => NULL()

Local dense matrix ("lapack" only)

◆ atol

real(r8) atol = 1.d-14
inherited

Absolute convergence tolerance \( |res| < atol \).

◆ bc

class(oft_solver_bc), pointer bc => NULL()
inherited

Boundary condition.

◆ cits

integer(i4) cits = 0
inherited

Number of iteractions to convergence.

◆ full_residual

logical full_residual = .TRUE.
inherited

Output true residual on exit.

◆ initialized

logical initialized = .FALSE.
inherited

Solver has been constructed.

◆ ipiv

integer(i4), dimension(:), pointer ipiv => NULL()

Row pivot array ("lapack" only)

◆ iter_refine

logical(kind=c_bool) iter_refine = .FALSE.

Perform iterative refinement.

◆ itplot

integer(i4) itplot =10
inherited

Output frequency for iterative solvers when pm=.TRUE.

◆ its

integer(i4) its = -1
inherited

Maximum iteration count.

◆ nrhs

integer(i4) nrhs = 1

Number of right hand sides.

◆ package

character(len=7) package = DEF_LU_PACK

Factorization package.

◆ pm

logical pm = .FALSE.
inherited

Performance monitor override.

◆ pre

class(oft_solver), pointer pre => NULL()
inherited

Preconditioner.

◆ refactor

logical refactor = .TRUE.

Refactor solution on next application.

◆ rtol

real(r8) rtol = 1.d-14
inherited

Relative convergence tolerance \( |res|/|res_0| < rtol \).

◆ sec_rhs

real(r8), dimension(:,:), pointer sec_rhs => NULL()

Storage for additional RHS data.

◆ update_graph

logical update_graph = .TRUE.

Perform full factorization including symbolic steps.

The documentation for this type was generated from the following file:
Generated by doxygen 1.9.8