diff --git a/Fraktalism/mods/points3d.f90 b/Fraktalism/mods/points3d.f90
index 863fff5..0c6d301 100644
--- a/Fraktalism/mods/points3d.f90
+++ b/Fraktalism/mods/points3d.f90
@@ -22,7 +22,7 @@ subroutine list_points3d(array, start, length)
     endif
 
     ! send oi to stdout.
-    do i = start, start+length
+    do i = start, start+length-1
        print *, array(i)%x, array(i)%y, array(i)%z, array(i)%seq
     enddo