Commit 1e5bb80e authored by Daniel Wortmann's avatar Daniel Wortmann
Browse files

Bugfix: cpp_cholesky ->CPP_CHOLESKY

parent d6499911
...@@ -122,10 +122,10 @@ CONTAINS ...@@ -122,10 +122,10 @@ CONTAINS
! The only reason having them is that the Scalapack counterpart ! The only reason having them is that the Scalapack counterpart
! PDPOTRF very often fails on higher processor numbers for unknown reasons! ! PDPOTRF very often fails on higher processor numbers for unknown reasons!
#ifdef CPP_ELPA_NEW #ifdef CPP_ELPA_NEW
CALL CPP_cholesky (m,bsca,SIZE(bsca,1),nb, mpi_comm_rows,mpi_comm_cols,ok) CALL CPP_CHOLESKY (m,bsca,SIZE(bsca,1),nb, mpi_comm_rows,mpi_comm_cols,ok)
CALL CPP_invert_trm(m, bsca, SIZE(bsca,1), nb, mpi_comm_rows, mpi_comm_cols,ok) CALL CPP_invert_trm(m, bsca, SIZE(bsca,1), nb, mpi_comm_rows, mpi_comm_cols,ok)
#else #else
CALL CPP_cholesky(m,bsca,SIZE(bsca,1),nb, mpi_comm_rows,mpi_comm_cols) CALL CPP_CHOLESKY (m,bsca,SIZE(bsca,1),nb, mpi_comm_rows,mpi_comm_cols)
CALL CPP_invert_trm(m, bsca, SIZE(bsca,1), nb, mpi_comm_rows, mpi_comm_cols) CALL CPP_invert_trm(m, bsca, SIZE(bsca,1), nb, mpi_comm_rows, mpi_comm_cols)
#endif #endif
......
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