X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=bike-lipo-box.scad.m4;h=60c11659ff0ed313529d0bc2ebf92f6631f28342;hb=a8c7b695c0a0e5abe9d6e0adcfabcf5e45ff5895;hp=39bbf2e4e8636ab4b5979b47583847486e7f915e;hpb=5da04aaa672ad9f9991ecd2e8afb5ef73bd67c99;p=reprap-play.git

diff --git a/bike-lipo-box.scad.m4 b/bike-lipo-box.scad.m4
index 39bbf2e..60c1165 100644
--- a/bike-lipo-box.scad.m4
+++ b/bike-lipo-box.scad.m4
@@ -158,6 +158,11 @@ module LidProfile(){
   }
 }
 
+module CeilProfile(){
+  translate([0, ts_zbox])
+    square([wallthick*2, ceilth]);
+}
+
 module TestSealBox(){
   TestSealDoBoxShape(WallProfile(););
   hull(){ TestSealDoBoxShape(FloorProfile();); }
@@ -165,9 +170,9 @@ module TestSealBox(){
 
 module ProfileDemos(){
   WallProfile();
-  color("blue")
-    FloorProfile();
+  color("blue") FloorProfile();
   LidProfile();
+  color("blue") CeilProfile();
 }
 			  
 //TestWall();