m_eigen_solver.f90 File Reference

Contains module m_eigen_solver. More...

Modules
module	m_eigen_solver
	The purpose of the module is to solve an eigenvalue problem for a complex general matrix. Subroutines are imported from EISPACK (https://netlib.org/eispack/) with minor modifications for compatibility.

Functions/Subroutines
subroutine, public	m_eigen_solver::cg (nm, nl, ar, ai, wr, wi, zr, zi, fv1, fv2, fv3, ierr)
	This subroutine calls the recommended sequence of subroutines from the eigensystem subroutine package (eispack) to find the eigenvalues and eigenvectors (if desired) of a complex general matrix.
subroutine, public	m_eigen_solver::cbal (nm, nl, ar, ai, low, igh, scale)
	This subroutine is a translation of the algol procedure cbalance, which is a complex version of balance, num. math. 13, 293-304(1969) by parlett and reinsch. handbook for auto. comp., vol.ii-linear algebra, 315-326(1971). This subroutine balances a complex matrix and isolates eigenvalues whenever possible.
subroutine, public	m_eigen_solver::corth (nm, nl, low, igh, ar, ai, ortr, orti)
	This subroutine is a translation of a complex analogue of the algol procedure orthes, num. math. 12, 349-368(1968) by martin and wilkinson. handbook for auto. comp., vol.ii-linear algebra, 339-358(1971). Given a complex general matrix, this subroutine reduces a submatrix situated in rows and columns low through igh to upper hessenberg form by unitary similarity transformations.
subroutine, public	m_eigen_solver::comqr2 (nm, nl, low, igh, ortr, orti, hr, hi, wr, wi, zr, zi, ierr)
	This subroutine is a translation of a unitary analogue of the algol procedure comlr2, num. math. 16, 181-204(1970) by peters and wilkinson. handbook for auto. comp., vol.ii-linear algebra, 372-395(1971). The unitary analogue substitutes the qr algorithm of francis (comp. jour. 4, 332-345(1962)) for the lr algorithm. This subroutine finds the eigenvalues and eigenvectors of a complex upper hessenberg matrix by the qr method. The eigenvectors of a complex general matrix can also be found if corth has been used to reduce this general matrix to hessenberg form.
subroutine	m_eigen_solver::cbabk2 (nm, nl, low, igh, scale, ml, zr, zi)
	This subroutine is a translation of the algol procedure cbabk2, which is a complex version of balbak, num. math. 13, 293-304(1969) by parlett and reinsch. handbook for auto. comp., vol.ii-linear algebra, 315-326(1971). This subroutine forms the eigenvectors of a complex general matrix by back transforming those of the correspondingbalanced matrix determined by cbal.
subroutine, public	m_eigen_solver::csroot (xr, xi, yr, yi)
subroutine, public	m_eigen_solver::cdiv (ar, ai, br, bi, cr, ci)
subroutine, public	m_eigen_solver::pythag (a, b, c)

Detailed Description

Contains module m_eigen_solver.