fortran-lapack
|
Solve a system of linear equations A * X = B. More...
Public Member Functions | |
real(sp) function, dimension(:), allocatable, target | la_ssolve_one (a, b, overwrite_a, err) |
Linear system solve, _one, real(sp) | |
real(dp) function, dimension(:), allocatable, target | la_dsolve_one (a, b, overwrite_a, err) |
Linear system solve, _one, real(dp) | |
real(qp) function, dimension(:), allocatable, target | la_qsolve_one (a, b, overwrite_a, err) |
Linear system solve, _one, real(qp) | |
complex(sp) function, dimension(:), allocatable, target | la_csolve_one (a, b, overwrite_a, err) |
Linear system solve, _one, complex(sp) | |
complex(dp) function, dimension(:), allocatable, target | la_zsolve_one (a, b, overwrite_a, err) |
Linear system solve, _one, complex(dp) | |
complex(qp) function, dimension(:), allocatable, target | la_wsolve_one (a, b, overwrite_a, err) |
Linear system solve, _one, complex(qp) | |
real(sp) function, dimension(:,:), allocatable, target | la_ssolve_multiple (a, b, overwrite_a, err) |
Linear system solve, _multiple, real(sp) | |
real(dp) function, dimension(:,:), allocatable, target | la_dsolve_multiple (a, b, overwrite_a, err) |
Linear system solve, _multiple, real(dp) | |
real(qp) function, dimension(:,:), allocatable, target | la_qsolve_multiple (a, b, overwrite_a, err) |
Linear system solve, _multiple, real(qp) | |
complex(sp) function, dimension(:,:), allocatable, target | la_csolve_multiple (a, b, overwrite_a, err) |
Linear system solve, _multiple, complex(sp) | |
complex(dp) function, dimension(:,:), allocatable, target | la_zsolve_multiple (a, b, overwrite_a, err) |
Linear system solve, _multiple, complex(dp) | |
complex(qp) function, dimension(:,:), allocatable, target | la_wsolve_multiple (a, b, overwrite_a, err) |
Linear system solve, _multiple, complex(qp) | |
Solve a system of linear equations A * X = B.
This function computes the solution to a real system of linear equations:
A \cdot X = B
where A is an n x n
square matrix, and B is either a vector (n
) or a matrix (n x nrhs
). The solution X is returned as an allocatable array.
[in,out] | A | The input square matrix of size n x n . If overwrite_a is true, the contents of A may be modified during computation. |
[in] | B | The right-hand side vector (size n ) or matrix (size n x nrhs ). |
[in] | overwrite_a | (Optional) If true, A may be overwritten and destroyed. Default is false. |
[out] | err | (Optional) A state return flag. If an error occurs and err is not provided, the function will stop execution. |
n
(for a single right-hand side) or n x nrhs
.*GESV
.overwrite_a
is enabled, the original contents of A may be lost. complex(sp) function, dimension(:,:), allocatable, target la_solve::solve::la_csolve_multiple | ( | complex(sp), dimension(:,:), intent(inout), target | a, |
complex(sp), dimension(:,:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _multiple, complex(sp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
complex(sp) function, dimension(:), allocatable, target la_solve::solve::la_csolve_one | ( | complex(sp), dimension(:,:), intent(inout), target | a, |
complex(sp), dimension(:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _one, complex(sp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
real(dp) function, dimension(:,:), allocatable, target la_solve::solve::la_dsolve_multiple | ( | real(dp), dimension(:,:), intent(inout), target | a, |
real(dp), dimension(:,:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _multiple, real(dp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
real(dp) function, dimension(:), allocatable, target la_solve::solve::la_dsolve_one | ( | real(dp), dimension(:,:), intent(inout), target | a, |
real(dp), dimension(:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _one, real(dp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
real(qp) function, dimension(:,:), allocatable, target la_solve::solve::la_qsolve_multiple | ( | real(qp), dimension(:,:), intent(inout), target | a, |
real(qp), dimension(:,:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _multiple, real(qp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
real(qp) function, dimension(:), allocatable, target la_solve::solve::la_qsolve_one | ( | real(qp), dimension(:,:), intent(inout), target | a, |
real(qp), dimension(:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _one, real(qp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
real(sp) function, dimension(:,:), allocatable, target la_solve::solve::la_ssolve_multiple | ( | real(sp), dimension(:,:), intent(inout), target | a, |
real(sp), dimension(:,:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _multiple, real(sp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
real(sp) function, dimension(:), allocatable, target la_solve::solve::la_ssolve_one | ( | real(sp), dimension(:,:), intent(inout), target | a, |
real(sp), dimension(:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _one, real(sp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
complex(qp) function, dimension(:,:), allocatable, target la_solve::solve::la_wsolve_multiple | ( | complex(qp), dimension(:,:), intent(inout), target | a, |
complex(qp), dimension(:,:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _multiple, complex(qp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
complex(qp) function, dimension(:), allocatable, target la_solve::solve::la_wsolve_one | ( | complex(qp), dimension(:,:), intent(inout), target | a, |
complex(qp), dimension(:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _one, complex(qp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
complex(dp) function, dimension(:,:), allocatable, target la_solve::solve::la_zsolve_multiple | ( | complex(dp), dimension(:,:), intent(inout), target | a, |
complex(dp), dimension(:,:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _multiple, complex(dp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |
complex(dp) function, dimension(:), allocatable, target la_solve::solve::la_zsolve_one | ( | complex(dp), dimension(:,:), intent(inout), target | a, |
complex(dp), dimension(:), intent(in) | b, | ||
logical(lk), intent(in), optional | overwrite_a, | ||
type(la_state), intent(out), optional | err ) |
Linear system solve, _one, complex(dp)
[in,out] | a | Input matrix a[n,n] |
[in] | b | Right hand side vector or array, b[n] or b[n,nrhs] |
[in] | overwrite_a | [optional] Can A data be overwritten and destroyed? |
[out] | err | [optional] state return flag. On error if not requested, the code will stop |