Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
west-public
West
Commits
c55cc339
Commit
c55cc339
authored
Aug 01, 2018
by
Marco Govoni
Browse files
Corrected typo
parent
54c4aada
Changes
1
Hide whitespace changes
Inline
Side-by-side
IO_kernel/pdep_io.f90
View file @
c55cc339
...
...
@@ -52,8 +52,8 @@ MODULE pdep_io
CHARACTER
(
LEN
=
30
)
::
endian
INTEGER
::
npwqx_g
INTEGER
,
ALLOCATABLE
::
igq_l2g_kdip
(:),
igq_l2g
(:)
LOGICAL
,
PARAMETER
::
default_iq
=
1
LOGICAL
::
iq_
INTEGER
,
PARAMETER
::
default_iq
=
1
INTEGER
::
iq_
!
IF
(
PRESENT
(
iq
)
)
THEN
iq_
=
iq
...
...
@@ -141,8 +141,8 @@ MODULE pdep_io
LOGICAL
::
found
,
isle
INTEGER
::
npwqx_g
INTEGER
,
ALLOCATABLE
::
igq_l2g_kdip
(:),
igq_l2g
(:)
LOGICAL
,
PARAMETER
::
default_iq
=
1
LOGICAL
::
iq_
INTEGER
,
PARAMETER
::
default_iq
=
1
INTEGER
::
iq_
!
IF
(
PRESENT
(
iq
)
)
THEN
iq_
=
iq
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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