remove more destructuring

main
Daniel Barlow 2023-01-23 22:41:13 +00:00
parent 65e298c82c
commit fb3be522a0
1 changed files with 1 additions and 1 deletions

View File

@ -13,7 +13,7 @@
(fn lateral? [direction] (fn lateral? [direction]
(. {:w true :e true} direction)) (. {:w true :e true} direction))
(fn try-to-drive [{: x : y : direction : stopped} distance] (fn try-to-drive [{: x : y : direction} distance]
(let [distance (let [distance
(if (lateral? direction) (if (lateral? direction)
(/ distance (math.cos (/ (* math.pi y) 180))) (/ distance (math.cos (/ (* math.pi y) 180)))