From 3925e3973723d0969db922d8d5da41fa089df95b Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Mon, 20 May 2024 22:14:21 -0400
Subject: [PATCH] Remove unused procedures.

---
 modules/game/actors.scm | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/modules/game/actors.scm b/modules/game/actors.scm
index dde0007..bac87ce 100644
--- a/modules/game/actors.scm
+++ b/modules/game/actors.scm
@@ -176,10 +176,6 @@
        (not (null? ($ (grid-ref grid x y)))))))
   (define grid-info (spawn ^grid-info))
 
-  (define (wrap-x x)
-    (modulo x width))
-  (define (wrap-y y)
-    (modulo y height))
   (define (delq item lst)
     (let lp ((lst lst))
       (match lst