Commit | Line | Data |
---|---|---|
d3618a65 NZ |
1 | $fn=50; |
2 | ||
3 | thingwall = 0.75; | |
4 | bearing= 13; | |
5 | clearence = 0.6; | |
6 | ||
7 | difference(){ | |
8 | union(){ | |
9 | cylinder(h=7.5, r=((bearing+clearence)/2+thingwall+clearence/2)+thingwall); | |
10 | cylinder(h=0.8, r=10); | |
11 | } | |
12 | translate([0,0,1]) | |
13 | cylinder(h=8, r=(bearing+clearence)/2+thingwall+clearence/2); | |
14 | cylinder(h=8, r=4.5); | |
15 | ||
16 | } | |
17 | ||
18 | translate([22,0,0]) difference(){ | |
19 | union(){ | |
20 | cylinder(h=7.5, r=(bearing+clearence)/2+thingwall); | |
21 | cylinder(h=0.8, r=10); | |
22 | } | |
23 | translate([0,0,1]) | |
24 | cylinder(h=8, r=(bearing+clearence)/2); | |
25 | cylinder(h=8, r=4.5); | |
26 | ||
27 | } |