From 8ceddddfb93c382ec5e00c2c30e80b485cf432a2 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 2 Oct 2012 18:26:54 +0100
Subject: [PATCH] pawn wip introduce d

---
 pawn.scad | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/pawn.scad b/pawn.scad
index 994ce56..4153639 100644
--- a/pawn.scad
+++ b/pawn.scad
@@ -32,11 +32,13 @@ x6 = x5 - h6 * tan(a6);
 htotal = r1 - z6;
 echo("height", htotal);
 
+d = 0.01;
+
 $fa=1;
 $fs=0.1;
 
 module SegmentBasisSquare(zmin, zmax, xmin){
-  translate([xmin, zmin-0.01]) square([-xmin+0.01, zmax-zmin+0.02]);
+  translate([xmin, zmin-d]) square([-xmin+d, zmax-zmin+d*2]);
 }
 module ConvexSegment(xc, zc, r, zmin, zmax){
   intersection(){
@@ -58,9 +60,9 @@ module PawnTemplate(){
   ConcaveSegment( x3 - r4,  z3,   r4, z4, z3);
   ConvexSegment(  xc5,      zc5,  r5, z5, z4);
   polygon([[x6, z6],
-	   [x5, z5+0.01],
-	   [0.01, z5],
-	   [0.01, z6]]);
+	   [x5, z5+d],
+	   [d, z5],
+	   [d, z6]]);
 }
 
 module Pawn(h=htotal){
-- 
2.30.2