diff --git a/fortran/fourthfree b/fortran/fourthfree
index 4539bd0..d4ea724 100755
Binary files a/fortran/fourthfree and b/fortran/fourthfree differ
diff --git a/fortran/fourthfree.f90 b/fortran/fourthfree.f90
index 41f51b5..12047ff 100644
--- a/fortran/fourthfree.f90
+++ b/fortran/fourthfree.f90
@@ -116,8 +116,7 @@ implicit none
     1   format(1i10)
 
     integer (kind = 16), dimension (:), allocatable :: temp, temp2
-    integer (kind = 16) :: current, next
-    integer :: i, j, templen, ios
+    integer (kind = 16) :: current, next, i, j, templen, ios
     logical :: done
 
     templen = 0