- syntax error fixed in scalar compilation

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@3612 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
cavazzon 2006-12-18 09:26:53 +00:00
parent 3c26c23a7a
commit 4230054c57
1 changed files with 1 additions and 1 deletions

View File

@ -201,7 +201,7 @@ SUBROUTINE task_groups_init( dffts )
CALL MPI_ALLGATHER(num_planes, 1, MPI_INTEGER, tmp_npp, 1, MPI_INTEGER, intra_image_comm, IERR)
#else
tmp_nsw(1) = num_sticks
tmp_npp(1) = num_num_planes
tmp_npp(1) = num_planes
#endif
ENDIF