36 |
|
* [1] Meineke, et al., J. Comp. Chem. 26, 252-271 (2005). |
37 |
|
* [2] Fennell & Gezelter, J. Chem. Phys. 124, 234104 (2006). |
38 |
|
* [3] Sun, Lin & Gezelter, J. Chem. Phys. 128, 24107 (2008). |
39 |
< |
* [4] Vardeman & Gezelter, in progress (2009). |
39 |
> |
* [4] Kuang & Gezelter, J. Chem. Phys. 133, 164101 (2010). |
40 |
> |
* [5] Vardeman, Stocker & Gezelter, J. Chem. Theory Comput. 7, 834 (2011). |
41 |
|
*/ |
42 |
|
|
43 |
|
/** |
418 |
|
Vector3<Real> v_maxI, v_k, v_j; |
419 |
|
|
420 |
|
// diagonalize using Jacobi |
421 |
< |
jacobi(a, w, v); |
421 |
> |
SquareMatrix3<Real>::jacobi(a, w, v); |
422 |
|
// if all the eigenvalues are the same, return identity matrix |
423 |
|
if (w[0] == w[1] && w[0] == w[2] ) { |
424 |
|
v = SquareMatrix3<Real>::identity(); |