+totx_outer = 30;
+toty_outer = 25;
+totz_inner = 8;
+
+$sealingbox_wallth = wallthick;
+$sealingbox_floorth = 2.5;
+$sealingbox_ceilth = 2.5;
+$sealingbox_xbox = totx_outer;
+$sealingbox_ybox = toty_outer;
+$sealingbox_zbox = totz_inner;
+
+innertube = 1.0 + 0.2;
+lidoverlap = 1.5;
+lidoverhang = 6;
+tubesealrad = 2.0;
+ts_cnrrad = 10;
+
+include <sealing-box.scad>
+
+module TestSealBox(){ ////toplevel
+ TestSealBoxBox();
+ translate(ts_cidoff)
+ Commitid_BestCount([totx_outer,toty_outer] - 2*ts_cidoff);
+}
+
+module TestSealLid(){ ////toplevel
+ difference(){
+ TestSealBoxLid();
+
+ translate([totx_outer * .75, toty_outer/2, 0])
+ cylinder(h=100, r=5);
+
+ translate([-wallthick + ts_cnrrad*.5,
+ ts_cnrrad*.5 - wallthick,
+ totz_inner + $sealingbox_ceilth])
+ Commitid_BestCount([totx_outer * .75 - 2.5 - (ts_cnrrad*.5),
+ toty_outer - (ts_cnrrad*.5 - wallthick)*2]);
+ }
+}
+
+module TestSealLidPrint(){ ////toplevel
+ rotate([180,0,0]) TestSealLid();
+}
+
+module ProfileDemos(){ ////toplevel
+ SealingBox_WallProfile();
+ color("blue") SealingBox_FloorProfile();
+ SealingBox_LidProfile();
+ color("blue") SealingBox_CeilProfile();
+ color("red") translate([-5,0]) square([1,totz_inner]);
+}
+
+//TestWall();
+//ProfileDemos();
+//TestSealBox();
+//TestSealLid();
+//FArcSegment_mask(350);