Move screw
This commit is contained in:
parent
c386971a78
commit
8bbaa58798
|
@ -648,7 +648,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 [11 10 0])
|
(union (screw-insert 0 0 bottom-radius top-radius height [11 10 0])
|
||||||
(screw-insert 0 lastrow bottom-radius top-radius height [1 8 0])
|
(screw-insert 0 lastrow bottom-radius top-radius height [0 0 0])
|
||||||
; (screw-insert lastcol lastrow bottom-radius top-radius height [-5 13 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 lastcol lastrow bottom-radius top-radius height [0 12 0])
|
(screw-insert lastcol lastrow bottom-radius top-radius height [0 12 0])
|
||||||
|
|
Loading…
Reference in a new issue