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

more init_pool calls removed (already contained in startup) 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@696 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
degironc 2004-03-05 17:42:40 +00:00
parent 60306ef550
commit e202a83f07
2 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
D3/d3_readin.f90
View File

@ -108,7 +108,6 @@ subroutine d3_readin
#ifdef __PARA #ifdef __PARA
400 continue 400 continue
call bcast_d3_input call bcast_d3_input
call init_pool
#endif #endif
xqq (:) = xq(:) xqq (:) = xq(:)
! !

3
PP/start_postproc.f90
View File

@ -18,8 +18,5 @@ subroutine start_postproc (nodenumber)
character(len=9) :: code = 'POST-PROC' character(len=9) :: code = 'POST-PROC'
! !
call startup (nodenumber, code, version_number) call startup (nodenumber, code, version_number)
#ifdef __PARA
call init_pool
#endif
return return
end subroutine start_postproc end subroutine start_postproc