use <threads.scad>
// Für BRS-7 Kocher

$fn=36;
D_Schlauch = 6;

difference(){
	union() {
		translate([0,0,0]) metric_thread (diameter=11.0, pitch=1, length=12, test=false);
		translate([0,0,12]) union() {
			D=20; H=6;
			cylinder(d=D, h=H);
			for(i=[0:360/24:359]) rotate([0,0,i]) translate([D/2,0,0]) cylinder(h=H, $fn=4, d=1);
			//translate([D/2,0,H/2]) scale([0.5,1,1.9]) sphere(d=H/2);
		}
		translate([0,0,18]) union() {
			H=4;
			cylinder(d1=D_Schlauch*1.5, d2=D_Schlauch, h=H);
			for(i=[1:1:4]) {
				translate([0,0,H*i]) cylinder(d1=D_Schlauch+0.5, d2=D_Schlauch, h=H);
			}
		}
	}
	translate([0,0,-5]) cylinder(d=4, h=50);
	translate([0,0,-0.01]) cylinder($fn=6, r=4/sqrt(3), h=14);
}