Calculates the eigenvalues of a symmetric 3x3 matrix A using Cardano's analytical algorithm. Only the diagonal and upper triangular parts of A are accessed. The access is read-only.
Copyright (C) 2006 Joachim Kopp
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=RP), | intent(in), | DIMENSION(3,3) | :: | A | ||
| real(kind=RP), | intent(out), | DIMENSION(3) | :: | W(3) |