diff --git a/genplotting.f90 b/genplotting.f90
index 641e95e..827c8bf 100644
--- a/genplotting.f90
+++ b/genplotting.f90
@@ -80,14 +80,14 @@ subroutine genp_end (foo)
   integer, intent(in)    :: foo
 
   write (0, '("--- genp_end ---")')
-  write (0, '("minmax X", 2F16.5)') xmin, xmax
-  write (0, '("minmax Y", 2F16.5)') ymin, ymax
+  write (0, '("minmax X ", 2F18.5)') xmin, xmax
+  write (0, '("minmax Y ", 2F18.5)') ymin, ymax
 
-  write (outunit, '(2F16.5, I6)') xmin*1.05, ymin*1.05, -1
-  write (outunit, '(2F16.5, I6)') xmin*1.05, ymax*1.05,  0
-  write (outunit, '(2F16.5, I6)') xmax*1.05, ymax*1.05,  0
-  write (outunit, '(2F16.5, I6)') xmax*1.05, ymin*1.05,  0
-  write (outunit, '(2F16.5, I6)') xmin*1.05, ymin*1.05,  0
+  write (outunit, '(2F18.5, I6)') xmin*1.05, ymin*1.05, -1
+  write (outunit, '(2F18.5, I6)') xmin*1.05, ymax*1.05,  0
+  write (outunit, '(2F18.5, I6)') xmax*1.05, ymax*1.05,  0
+  write (outunit, '(2F18.5, I6)') xmax*1.05, ymin*1.05,  0
+  write (outunit, '(2F18.5, I6)') xmin*1.05, ymin*1.05,  0
   close (outunit)
 
   if (6 .ne. outunit) then