From eed472a7436d2029c30799274545243f0ccd725d Mon Sep 17 00:00:00 2001
From: Leah Neukirchen <leah@vuxu.org>
Date: Thu, 3 Nov 2022 20:01:22 +0100
Subject: drop nth

Just having get is good enough.
---
 mew.scm | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/mew.scm b/mew.scm
index 64e2126..053ad98 100644
--- a/mew.scm
+++ b/mew.scm
@@ -12,7 +12,7 @@
      keys
      len loc
      mod
-     negate nth
+     negate
      one-of op op*
      per prn puts
      rep
@@ -93,9 +93,6 @@
   (define (dec i)
     (- i 1))
 
-  (define (nth n lst)
-    (list-ref lst n))
-
   (define <>?
     (case-lambda
       ((a b) (not (equal? a b)))
-- 
cgit 1.4.1