10^3 factor missing in conversion. (D.C.)

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@4972 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
ceresoli 2008-06-10 19:36:32 +00:00
parent 6c0f156225
commit 0589e6fbd6
1 changed files with 1 additions and 1 deletions

View File

@ -247,7 +247,7 @@ subroutine hyperfine
REAL ( dp ) :: mu0_by_fpi = 1e-7
REAL ( dp ) :: mu_n = 5.05078324e-27_DP ! was: 5.051e-27
REAL ( dp ) :: Bohr_radius = BOHR_RADIUS_SI
REAL ( dp ) :: gamma_e = 28024.95364_dp ! was: 28.0e6
REAL ( dp ) :: gamma_e = 28024953.64_dp ! was: 28.0e6
REAL ( dp ) :: lambda = C_SI / 1.0e+8_dp ! was: 2.997