Fix to error checking in writing .xyz files
This commit is contained in:
parent
1c7c028dd8
commit
fa5047b735
@ -150,7 +150,7 @@ module io
|
||||
outn = outn + 1
|
||||
end do
|
||||
|
||||
if((outn-atom_num) /= atom_num) then
|
||||
if((outn-node_num) /= atom_num) then
|
||||
print *, "outn", (outn-node_num), " doesn't equal atom_num ", atom_num
|
||||
end if
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user