Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
fleur
fleur
Commits
ae93c46d
Commit
ae93c46d
authored
Jun 21, 2016
by
Gregor Michalicek
Browse files
Small clean up in fleur_init
parent
cb78a387
Changes
1
Hide whitespace changes
Inline
Side-by-side
main/fleur_init.F90
View file @
ae93c46d
...
...
@@ -64,7 +64,6 @@
COMPLEX
::
cdum
CHARACTER
(
len
=
4
)
::
namex
CHARACTER
(
len
=
12
)
::
relcor
CHARACTER
(
len
=
8
)
::
comment
(
10
)
REAL
::
a1
(
3
),
a2
(
3
),
a3
(
3
)
REAL
::
scale
,
dtild
#ifdef CPP_MPI
...
...
@@ -129,7 +128,7 @@
CALL
w_inpXML
(&
&
atoms
,
obsolete
,
vacuum
,
input
,
stars
,
sliceplot
,
banddos
,&
&
cell
,
sym
,
xcpot
,
noco
,
jij
,
oneD
,
hybrid
,
kpts
,(/
1
,
1
,
1
/),
kpts
%
l_gamma
,&
&
noel
,
namex
,
relcor
,
a1
,
a2
,
a3
,
scale
,
dtild
,
input
%
comment
,&
!comment is 'name'. Still has to be read in!
&
noel
,
namex
,
relcor
,
a1
,
a2
,
a3
,
scale
,
dtild
,
input
%
comment
,&
&
xmlElectronStates
,
xmlPrintCoreStates
,
xmlCoreOccs
,&
&
atomTypeSpecies
,
speciesRepAtomType
,
.TRUE.
,
numSpecies
,&
&
enpara
%
el0
(:,:,
1
),
enpara
%
ello0
(:,:,
1
),
enpara
%
evac0
(:,
1
))
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment