From 8e957037419d6a02135fa6f5d74e02e3c63d3f5a Mon Sep 17 00:00:00 2001 From: James Barnett Date: Tue, 23 Jan 2018 15:19:30 -0500 Subject: [PATCH] fix undeclard variables --- example/main.f90 | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/example/main.f90 b/example/main.f90 index 516a87f..9831594 100644 --- 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