X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=ksafe-base.scad;h=2866278a2a7e9021af044eec63bed9f59f22c7ed;hp=973ec8d3bd49478493628caf3a4558351e539874;hb=37e6240dbeb35539d789f702ebb41d2cae072a6d;hpb=f25e2ed27d17f0232bda728d5b4daf4f9e38d113

diff --git a/ksafe-base.scad b/ksafe-base.scad
index 973ec8d..2866278 100644
--- a/ksafe-base.scad
+++ b/ksafe-base.scad
@@ -151,11 +151,15 @@ module WebProfile(){
   }
 }
 
+module SomeBaseProfile(I, F){
+  polygon([ I,
+	    F,
+	    [ hsz+1, F[1] ],
+	    [ hsz+1, I[1] ] ]);
+}
+
 module BaseProfile(){
-  polygon([ $xppI,
-	    $xppF,
-	    [ hsz+1, $xppF[1] ],
-	    [ hsz+1, $xppI[1] ] ]);
+  SomeBaseProfile($xppI, $xppF);
 }
 
 module SWalls(ymin, ymax, t_bevel) {