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

It was not a bug, but there are still problems if ndiag /= nproc 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@6914 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
puma 2010-07-16 15:35:17 +00:00
parent 4af788a71a
commit ea47a7aa4a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
CPV/mainvar.f90
View File

@ -373,7 +373,7 @@ MODULE cp_main_variables
! bec is distributed across row processor, the first column is enough
!
IF( desc( lambda_node_ , 1 ) > 0 ) THEN
IF( desc( lambda_node_ , 1 ) > 0 .AND. ( desc( la_myc_ , 1 ) == 1 ) ) THEN
ir = desc( ilar_ , 1 )
DO i = 1, desc( nlar_ , 1 )
bec_repl( :, i + ir - 1 ) = bec_dist( :, i )