scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Obscure error messages slightly clarified 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@5094 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2008-07-31 15:59:22 +00:00
parent 09e514737c
commit 42f4956103
4 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PW/cdiagh.f90
View File

@ -152,7 +152,7 @@ SUBROUTINE cdiagh( n, h, ldh, e, v )
!
CALL ZHEEV( 'V', 'U', n, v, ldh, e, work, lwork, rwork, info )
!
CALL errore( 'cdiagh', 'info =/= 0', ABS( info ) )
CALL errore( 'cdiagh', 'diagonalization (ZHEEV) failed', ABS( info ) )
!
! ... deallocate workspace
!

2
PW/cdiaghg.f90
View File

@ -174,7 +174,7 @@ SUBROUTINE cdiaghg( n, m, h, s, ldh, e, v )
DEALLOCATE( rwork )
DEALLOCATE( work )
!
CALL errore( 'cdiaghg', 'info =/= 0', ABS( info ) )
CALL errore( 'cdiaghg', 'diagonalization (ZHEGV*) failed', ABS( info ) )
!
! ... restore input S matrix from saved diagonal and lower triangle
!

2
PW/rdiagh.f90
View File

@ -134,7 +134,7 @@ SUBROUTINE rdiagh( n, h, ldh, e, v )
!
CALL DSYEV( 'V', 'U', n, v, ldh, e, work, lwork, info )
!
CALL errore( 'rdiagh', 'info =/= 0', ABS( info ) )
CALL errore( 'rdiagh', 'diagonalization (DSYEV) failed', ABS( info ) )
!
! ... deallocate workspace
!

4
PW/rdiaghg.f90
View File

@ -137,8 +137,8 @@ SUBROUTINE rdiaghg( n, m, h, s, ldh, e, v )
!
DEALLOCATE( work )
!
CALL errore( 'rdiaghg', 'info =/= 0', ABS( info ) )
!
CALL errore( 'rdiaghg', 'diagonalization (DSYGV*) failed', ABS( info ) )
! ... restore input S matrix from saved diagonal and lower triangle
!
DO i = 1, n