chiark / gitweb /
sewing-table: FitTest: break out FitTest_general (nfc)
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 3 Jun 2017 13:44:57 +0000 (14:44 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 3 Jun 2017 16:50:37 +0000 (17:50 +0100)
sewing-table.scad.m4

index af8e736..871ea7f 100644 (file)
@@ -551,9 +551,7 @@ m4_dnl    expands to two comma-separated corners:
 m4_dnl    that denoted by ix, and the next one anticlockwise
 m4_define(`R_EDGE',`$1[$2],$1[(($2)+1)%4]')
 
-module FitTest(){ ////toplevel
-  sz = [275,180];
-  c0 = [-40,-80];
+module FitTest_general(c0,sz){
   c = Rectangle_corners(c0, sz);
   brace = [7,7,9];
   difference(){
@@ -572,6 +570,10 @@ module FitTest(){ ////toplevel
   }
 }
 
+module FitTest(){ ////toplevel
+  FitTest_general([-40,-80], [275,180]);
+}
+
 module Tile02(){ ////toplevel
   sz = [100,170];
   c0 = tile02_tr + -sz;