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

renamed module efield -> efield_mod to solve a conflict [Gerardo] 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@2102 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
ballabio 2005-08-17 11:53:09 +00:00
parent dd49eab404
commit 091085a057
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
PH/phcom.f90
View File

@ -111,7 +111,7 @@ MODULE eqv
END MODULE eqv
!
!
MODULE efield
MODULE efield_mod
USE kinds, ONLY : DP
!
! ... the variables for the electric field perturbation
@ -130,7 +130,7 @@ MODULE efield
zstarue0(:,:) ! 3 * nat, 3)
! the effective charges
!
END MODULE efield
END MODULE efield_mod
!
!
MODULE nlcc_ph
@ -349,7 +349,7 @@ MODULE phcom
USE dynmat
USE qpoint
USE eqv
USE efield
USE efield_mod
USE nlcc_ph
USE gc_ph
USE phus

2
PH/solve_linter.f90
View File

@ -39,7 +39,7 @@ subroutine solve_linter (irr, imode0, npe, drhoscf)
iuwfc, lrwfc, iunrec, iudvscf
USE output, ONLY : fildrho, fildvscf
USE phus, ONLY : int1, int2, int3
USE efield, ONLY : epsilon, zstareu, zstarue, zstareu0, zstarue0
USE efield_mod, ONLY : epsilon, zstareu, zstarue, zstareu0, zstarue0
USE dynmat, ONLY : dyn, dyn00
USE eqv, ONLY : dvpsi, dpsi, evq
USE qpoint, ONLY : npwq, igkq, nksq