yet another fix, hopefully the last, for mass conversion ...

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@2241 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
giannozz 2005-09-27 16:40:57 +00:00
parent 947b5b9d0f
commit 80733b35dd
1 changed files with 6 additions and 2 deletions

View File

@ -1397,10 +1397,14 @@ SUBROUTINE iosys()
!
END IF
!
cmass = wmass
!
ELSE
!
cmass = wmass * amconv
!
END IF
!
cmass = wmass
!
! ... unit conversion for pressure
!
press_ = press_ / uakbar