diff options
author | Tom Short <tshort.rlists@gmail.com> | 2017-04-02 14:21:35 -0400 |
---|---|---|
committer | Tom Short <tshort.rlists@gmail.com> | 2017-04-02 14:21:35 -0400 |
commit | db1cad5635b68945830e4c02447299fb89306750 (patch) | |
tree | 047cfc1edbc58aa9565ab2a0af57dff9f35253a4 | |
parent | a8184af44016f9a8c5b05a8c68a5ef3939f5d34c (diff) |
Add another screw insert
-rw-r--r-- | src/dactyl_keyboard/dactyl.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/dactyl_keyboard/dactyl.clj b/src/dactyl_keyboard/dactyl.clj index 816bff8..8f84fb6 100644 --- a/src/dactyl_keyboard/dactyl.clj +++ b/src/dactyl_keyboard/dactyl.clj @@ -656,8 +656,8 @@ ))) (defn screw-insert-all-shapes [bottom-radius top-radius height] - (union ; (screw-insert 0 0 bottom-radius top-radius height) - (screw-insert 0 1 bottom-radius top-radius height) + (union (screw-insert 0 0 bottom-radius top-radius height) + (screw-insert 0 lastrow bottom-radius top-radius height) (screw-insert 3 lastrow bottom-radius top-radius height) (screw-insert 3 0 bottom-radius top-radius height) (screw-insert lastcol 1 bottom-radius top-radius height) |