minor modification in environ related input parsing

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@9299 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
oliviero 2012-08-14 16:30:09 +00:00
parent 7ec43d0600
commit ca7e08277b
1 changed files with 1 additions and 1 deletions

View File

@ -1359,7 +1359,7 @@ SUBROUTINE iosys()
call errore ('iosys','unrecognized value for assume_isolated',1)
END SELECT
#ifdef __ENVIRON
IF ( do_comp_mt .OR. env_slab_geometry ) add_jellium = .false.
IF ( do_environ .AND. (do_comp_mt .OR. env_slab_geometry) ) add_jellium = .false.
#endif
!
! ... read following cards