include <BOSL2/std.scad>
// oprawka

slop = 1;

d = 37 + slop;
cyl_h = 41;
top_d = 20 + slop;
top_h = 21;
top_d1 = 14 + slop;
top_d2 = 10 + slop;
h = 78;

$fn=36*2;

down(cyl_h/2) cyl(d=d, h=cyl_h);
sphere(d=d);
up(d/2) down(3) cyl(d=top_d, h=2);
up(d/2 + top_h/2) down(3) cyl(h=top_h, d1=top_d1, d2=top_d2);