sewing-table: FitTest: break out FitTest_general (nfc)

diff --git a/sewing-table.scad.m4 b/sewing-table.scad.m4
index af8e7367d10b7e2e0f8e3af34a031886ba0afb66..871ea7f7de85a64256fce33414fb115db790c3ae 100644 (file)
--- a/sewing-table.scad.m4
+++ b/sewing-table.scad.m4
@@ -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;