wardrobe-hook: THookL: define it

diff --git a/wardrobe-hook.scad b/wardrobe-hook.scad
index bf5b63e357be1d9a1e3d3924ae75823cd83b13c8..9ea6a3cd0e94299a83dda251b55ecbc25a34b8f4 100644 (file)
--- a/wardrobe-hook.scad
+++ b/wardrobe-hook.scad
@@ -184,6 +184,13 @@ module TPlan(){
   }
 }
 
   }
 }
 

+module THookL(){ ///toplevel
+  intersection(){
+    linear_extrude(height=topwidth) TPlan();
+    SElevationPlaced();
+  }
+}
+

 // other toplevels etc.
 
 module HookR(){ ////toplevel
 // other toplevels etc.
 
 module HookR(){ ////toplevel