bauknecht-fan.scad

dome_height = 14.1;
dome_radius = 53;

propeller_d = 2 * dome_radius;

difference() {

union() {
scale([1,1,dome_height/dome_radius])
sphere(r=dome_radius, $fn=72);

for(i = [0:11]) {

rotate([0,0,30*i]) {
    translate([-54.5,0.6,13.0])
    rotate([90,0,0])
        cylinder(d=22, 1.2);
    
    translate([-65.5,-0.6,0])
        cube([13,1.2,13.0]);

    translate([-dome_radius,-0.6,7.0])
        cube([dome_radius-14,1.2,13.0]);

}

}

}

scale([1,1,dome_height/dome_radius])
sphere(r=dome_radius-2, $fn=72);

cylinder(d=27.2, 36, $fn=36);

translate([0,0,-(1+dome_height)])
    cylinder(d=propeller_d+1,dome_height+1);
    
*cylinder(d1=92,d2=77,5);

}

translate([0,0,5]) {
    difference() {
        cylinder(d=32.8, 15.5, $fn=36);
        translate([0,0,-0.1])
        cylinder(d=27.2, 16, $fn=36);
    }
}