Update screw
This commit is contained in:
parent
792c9f46f6
commit
b3436fb6e9
|
@ -618,7 +618,7 @@
|
||||||
(defn screw-insert-all-shapes [bottom-radius top-radius height]
|
(defn screw-insert-all-shapes [bottom-radius top-radius height]
|
||||||
(union (screw-insert 0 0 bottom-radius top-radius height [9 9 0])
|
(union (screw-insert 0 0 bottom-radius top-radius height [9 9 0])
|
||||||
(screw-insert 0 lastrow bottom-radius top-radius height [1 8 0])
|
(screw-insert 0 lastrow bottom-radius top-radius height [1 8 0])
|
||||||
(screw-insert 3 lastrow bottom-radius top-radius height [9 4 0])
|
(screw-insert lastcol lastrow bottom-radius top-radius height [-5 13 0])
|
||||||
(screw-insert lastcol 0 bottom-radius top-radius height [-3 6 0])
|
(screw-insert lastcol 0 bottom-radius top-radius height [-3 6 0])
|
||||||
(screw-insert 1 lastrow bottom-radius top-radius height [0 -16 0])))
|
(screw-insert 1 lastrow bottom-radius top-radius height [0 -16 0])))
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue