From cee75e57560b77e8ec0a394c1d3c98b9839be80e Mon Sep 17 00:00:00 2001 From: Gene Pasquet Date: Thu, 15 May 2025 13:46:26 +0200 Subject: Refactor!! --- src/macroknight/utils.hy | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 src/macroknight/utils.hy (limited to 'src/macroknight/utils.hy') diff --git a/src/macroknight/utils.hy b/src/macroknight/utils.hy new file mode 100644 index 0000000..a857d02 --- /dev/null +++ b/src/macroknight/utils.hy @@ -0,0 +1,14 @@ +(defn neg [value] + (* -1 value)) + +(defn invert [move] + #((neg (get move 0)) + (neg (get move 1)))) + +(defn merge-moves [moves] + (let [end-move #(0 0)] + (for [move moves] + (setv end-move + #((+ (get end-move 0) (get move 0)) + (+ (get end-move 1) (get move 1))))) + end-move)) -- cgit v1.2.3