mirror of https://gitlab.com/QEF/q-e.git
Removed call to get_enciroment_variables (which is not implemented in all compilers/libraries)
git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@4417 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
parent
6b34641498
commit
9961947a35
|
@ -385,12 +385,12 @@ SUBROUTINE PAW_symmetrize(becsum)
|
|||
#endif
|
||||
|
||||
! Apply symmetrization:
|
||||
CALL get_environment_variable('DO_SYMME', do_symme)
|
||||
IF (trim(do_symme)=='.false.') THEN
|
||||
write(*,*) "**** skipping PAW symmetrization!"
|
||||
ELSE
|
||||
! CALL get_environment_variable('DO_SYMME', do_symme)
|
||||
! IF (trim(do_symme)=='.false.') THEN
|
||||
! write(*,*) "**** skipping PAW symmetrization!"
|
||||
! ELSE
|
||||
becsum(:,:,:) = becsym(:,:,:)
|
||||
ENDIF
|
||||
! ENDIF
|
||||
|
||||
CALL stop_clock('PAW_symme')
|
||||
|
||||
|
|
Loading…
Reference in New Issue