Fix to error checking in writing .xyz files

4 years ago · fa5047b735
parent 1c7c028dd8
commit fa5047b735
1 changed files with 1 additions and 1 deletions
--- a/src/io.f90
+++ b/src/io.f90
@ -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