typo!
This commit is contained in:
parent
b502300ffc
commit
2c0264191e
|
@ -2326,7 +2326,7 @@ function getlabels(active,potential,system,structure) result(labels)
|
||||||
integer :: i,j
|
integer :: i,j
|
||||||
integer :: &
|
integer :: &
|
||||||
a, & !< index of active system
|
a, & !< index of active system
|
||||||
p, & !< index in complete system matrix
|
p, & !< index in potential system matrix
|
||||||
f, & !< index of my family
|
f, & !< index of my family
|
||||||
s !< index of my system in current family
|
s !< index of my system in current family
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue