pawn wip introduce d

diff --git a/pawn.scad b/pawn.scad
index 994ce56..4153639 100644 (file)
--- a/pawn.scad
+++ b/pawn.scad
@@ -32,11 +32,13 @@ x6 = x5 - h6 * tan(a6);
 htotal = r1 - z6;
 echo("height", htotal);
 
 htotal = r1 - z6;
 echo("height", htotal);
 

+d = 0.01;
+

 $fa=1;
 $fs=0.1;
 
 module SegmentBasisSquare(zmin, zmax, xmin){
 $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(){
 }
 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],
   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){
 }
 
 module Pawn(h=htotal){