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

Temporary hack until GIPAW becomes more ``dynamic''. (D.C.) 

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@4437 c92efa57-630b-4861-b058-cf58834340f0
This commit is contained in:
ceresoli 2007-11-16 10:50:27 +00:00
parent aa5cdab4c7
commit 95d12a59bc
3 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
GIPAW/Makefile
View File

@ -72,6 +72,7 @@ MODULES = \
../Modules/parallel_include.o \
../Modules/parameters.o \
../Modules/parser.o \
../Modules/paw_variables.o \
../Modules/printout_base.o \
../Modules/pseudo_types.o \
../Modules/ptoolkit.o \

1
GIPAW/make.depend
View File

@ -141,7 +141,6 @@ paw_gipaw.o : ../Modules/pseudo_types.o
paw_gipaw.o : ../Modules/radial_grids.o
paw_gipaw.o : ../Modules/read_upf.o
paw_gipaw.o : ../Modules/splinelib.o
paw_gipaw.o : gipaw_module.o
stop_code.o : ../Modules/kind.o
stop_code.o : ../Modules/mp.o
stop_code.o : ../Modules/parallel_include.o

4
GIPAW/paw_gipaw.f90
View File

@ -10,7 +10,7 @@ MODULE paw_gipaw
USE kinds, ONLY: DP
USE parameters, ONLY: npsx
use radial_grids, ONLY: ndmx
use gipaw_module, ONLY: nbrx
!!use gipaw_module, ONLY: nbrx
!
! ... These parameters are needed for the paw variables
!
@ -74,6 +74,8 @@ MODULE paw_gipaw
!
! INTEGER, ALLOCATABLE :: gipaw_ncore_orbital ( : )
! REAL(dp), ALLOCATABLE :: gipaw_core_orbital ( :, :, : )
integer, parameter :: nbrx = 20
INTEGER :: &
paw_nkb, & ! total number of beta functions, with st.fact.