X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=commitid-best-test.scad.pl;h=b0ca1ba0aeb62be961402b0f0b0bad05dc68735d;hp=73cfd8f6dad25d6dfcd8a968733daf7b988ed51d;hb=f25e2ed27d17f0232bda728d5b4daf4f9e38d113;hpb=f4947ad0fe16b78696616f4e851f9c232d402a92

diff --git a/commitid-best-test.scad.pl b/commitid-best-test.scad.pl
index 73cfd8f..b0ca1ba 100755
--- a/commitid-best-test.scad.pl
+++ b/commitid-best-test.scad.pl
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 use strict;
 
-our @xm = qw(4.7 6.8 10 15 22 33 47 68 100);
+our @xm = qw(4.7 6.8 8.2 10 12 15 18 22 27 33 47 68 100);
 our @ym = qw(3.9 5.6 8.2 12 18 27 39 56);
 
 sub p { print @_ or die $!; }
@@ -18,7 +18,7 @@ foreach my $xm (@xm) {
 	p "   translate(-0.5*p*[1,1]) square([$xm+1,$ym+1]*p);\n";
 	p "   square([$xm,$ym]*p);\n";
 	p "  }\n";
-	p "  Commitid_BestCount_2D([$xm,$ym] * p);\n";
+	p "  Commitid_BestCount_2D([$xm,$ym] * p, margin=0.2);\n";
 	p " }\n";
 	$y += $ym + 2;
     }