/* [OpenSCAD] */
$fn = 60;

/* [Teil] */
// Durchmesser innen/aussen
D = [6, 8];
Scale = 1.0; // [0.5:0.05:1.0]

/* [Hidden] */
Delta = 0.001;

intersection() {
	scale([1,1,Scale]) sphere(d=D[1]);
	translate([0,0,D[1]/2]) cube(D[1], center=true);
}
mirror([0,0,1]) {
	Fase=0.5;
	cylinder(d=D[0], h=D[0]-1);
	translate([0,0,D[0]-1]) cylinder(d1=D[0], d2=D[0]-2*Fase, h=Fase);
}