use <threads.scad>
$fn=180;

// Adapter für Staubsaugerdüse:

intersection() {
  difference() {
    union(){
      cylinder(d1=31, d2=29, h=25);
      translate([0,0,9]) cylinder(d=23.7, h=2.65);
    }
    translate([0,0,-0.001]) union(){
      metric_thread (diameter=25, pitch=1, length=8, internal=true, test=false);
      translate([0,0,8-0.001]) cylinder(d=24, h=35);
      cylinder(d=24.5, h=1);
    }
  }
  // Für Test, ob Gewinde passt, kurz abschneiden:
  translate([0,0,-0.001]) cylinder(d=40, h=9);
}