Commit 82a3d2ef by Francois Gygi

fixed scalapack call

git-svn-id: http://qboxcode.org/svn/qb/trunk@1456 cba15fb0-1239-40c8-b417-11db7ca47a34
parent 4c8394c6
......@@ -121,7 +121,7 @@ int main(int argc, char **argv)
// cout << a;
valarray<double> w(a.m());
DoubleMatrix asave(a);
a.syevd('u',w);
a.syev('u',w);
cout << " frequencies:" << endl;
for ( int i = 0; i < a.n(); i++ )
......@@ -133,7 +133,7 @@ int main(int argc, char **argv)
}
a = asave;
a.syevd('l',w);
a.syev('l',w);
cout << " frequencies:" << endl;
for ( int i = 0; i < a.n(); i++ )
{
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment