fix undeclard variables

wesbarnett · Jan 23, 2018 · 8e95703 · 8e95703
1 parent 4b1ea03
commit 8e95703
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/example/main.f90 b/example/main.f90
@@ -7,6 +7,7 @@ program main
     type(Trajectory) :: trj
     real(8) :: box(6)
     real :: x(3)
+    integer :: i, j
 
     call trj%read("dump.dcd")
 
@@ -20,6 +21,9 @@ program main
 
             x = trj%x(i,j)
 
+            ! Just for testing
+            write(*,*) x
+
         end do
 
     end do