X-Git-Url: https://www.fi.muni.cz/~kas/git//home/kas/public_html/git/?a=blobdiff_plain;f=quasar-triangle.scad;h=c3759df1cfa0dd98b78a068d004e1358717d349d;hb=638c0b3b31cdd2da858b237ba9441b2dbc1288ec;hp=4ed5f32acbea3e874462a13cf1b502f1a83c0572;hpb=229cf16e0964440f2f931a738d9031d00ec32332;p=things.git

diff --git a/quasar-triangle.scad b/quasar-triangle.scad
index 4ed5f32..c3759df 100644
--- a/quasar-triangle.scad
+++ b/quasar-triangle.scad
@@ -24,28 +24,25 @@ module side_cube() {
 		cube([infty, infty, body_h+2*eps]);
 }
 
+module left_side(w, h) {
+	for (i=[0:$children]) {
+		translate([w/2, 0, 0])
+		rotate([0, 0, 90+atan(w/(2*h))])
+		translate([infty/5, 0, 0])
+			child(i);
+	}
+}
+
 module triangle(w, h) {
 	intersection() {
 		union() {
 			tbar();
-			translate([w/2, 0, 0])
-			rotate([0, 0, 90+atan(w/(2*h))])
-			translate([infty/5, 0, 0])
-				tbar();
-			translate([-w/2, 0, 0])
-			rotate([0, 0, -90-atan(w/(2*h))])
-			translate([-infty/5, 0, 0])
-				tbar();
+			left_side(w, h) tbar();
+			scale([-1, 1, 1]) left_side(w, h) tbar();
 		}
 			side_cube();
-			translate([w/2, 0, 0])
-			rotate([0, 0, 90+atan(w/(2*h))])
-			translate([infty/5, 0, 0])
-				side_cube();
-			translate([-w/2, 0, 0])
-			rotate([0, 0, -90-atan(w/(2*h))])
-			translate([-infty/5, 0, 0])
-				side_cube();
+			left_side(w, h) side_cube();
+			scale([-1, 1, 1]) left_side(w, h) side_cube();
 	}
 }