From 188652e0dbde274f1e4f24c6a02f4564921feb27 Mon Sep 17 00:00:00 2001
From: Michael Krelin <hacker@klever.net>
Date: Sat, 11 Jun 2016 14:21:48 +0000
Subject: fix duct inner shape

---
diff --git a/fanduct.scad b/fanduct.scad
index 746f753..fa14b7a 100644
--- a/fanduct.scad
+++ b/fanduct.scad
@@ -61,9 +61,10 @@ module fanduct(type=type,ductshape=ductshape) {
     else if(ductshape=="square")
      translate([fanduct_ir+fanduct_shell,fanduct_shell])
      union() {
-      square([fanduct_w,fanduct_h/2]);
-      translate([fanduct_w/2,fanduct_h-fanduct_w/2])
-      rotate([0,0,90]) circle(d=fanduct_w,$fn=36);
+      square([sh,sv/2]);
+      translate([sh/2,sv/2])
+      scale([sh/smax,sv/smax])
+      circle(d=smax,$fn=36);
      } 
   }
  }
--
cgit v0.9.0.2