** License
-Copyright © 2014-2018 Phil Hagelberg and contributors
+Copyright © 2014-2020 Phil Hagelberg and contributors
Released under the [[https://www.gnu.org/licenses/gpl.html][GNU GPL version 3]]
#lang racket
;; Atreus 2 case design
-;; Copyright © 2019 Phil Hagelberg and contributors
+;; Copyright © 2019-2020 Phil Hagelberg and contributors
;; released under the GPLv3 or later
-;; TODO:
-;; * port notch on bottom plate and spacer
-;; * top layer
-
(require xml)
;; glowforge uses 96 dpi, 25.4 mm in an inch
(define angle (degrees->radians 10))
(define corner-radius 6.0)
-(define alps-switch-width 15.887)
-(define alps-switch-height 13.087)
+(define alps-switch-width 15.34)
+(define alps-switch-height 12.49)
(define cherry-switch-width 13.62)
(define cherry-switch-height 13.72)
(define cherry? false)