From c7b2c982004e350f5e3032321baadfc9021b6bad Mon Sep 17 00:00:00 2001
From: dozens
Date: Thu, 20 Jun 2024 09:17:06 -0600
Subject: 🗄️ big tidy up

- isolate core game logic and move it to src/game.fnl
- main.fnl should be just the ui now
- move all table funcs into lib/table
- move all (1) string funcs into lib/string
- move all game funcs into lib/game/
---
 lib/space-is-neighbor.fnl | 18 ------------------
 1 file changed, 18 deletions(-)
 delete mode 100644 lib/space-is-neighbor.fnl

(limited to 'lib/space-is-neighbor.fnl')

diff --git a/lib/space-is-neighbor.fnl b/lib/space-is-neighbor.fnl
deleted file mode 100644
index 380607c..0000000
--- a/lib/space-is-neighbor.fnl
+++ /dev/null
@@ -1,18 +0,0 @@
-(local {: contains} (require :lib.contains))
-(local {: head} (require :lib.head))
-(local {: tail} (require :lib.tail))
-
-(lambda space-is-neighbor? [all-neighbors from to]
-  ;; i have learned to check that i'm passing the correct type of move
-  ;; i.e. a number and not a string
-  (assert (= "number" (type from)) "from must be a number")
-  (assert (= "number" (type to)) "to must be a number")
-  (assert (= "table" (type all-neighbors)) "all-neighbors must be a table")
-
-  (let [neighborhood-list (icollect [_ n (ipairs all-neighbors)] (if (= from (head n)) n))
-        neighborhood (head neighborhood-list)
-        neighbors (tail neighborhood)
-        is-neighbor (contains neighbors to)]
-    is-neighbor))
-
-{: space-is-neighbor?}
-- 
cgit 1.4.1-2-gfad0