From 95dcacea5a1eabfee54c3edbe11b844bf1e5a2ec Mon Sep 17 00:00:00 2001
From: Daniel Cerqueira <dan.git@lispclub.com>
Date: Wed, 25 Feb 2026 15:13:52 +0000
Subject: replace ap function name to algo

---
 examples/speech/en-random.lali | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'examples/speech/en-random.lali')

diff --git a/examples/speech/en-random.lali b/examples/speech/en-random.lali
index feda6da..9ac271d 100755
--- a/examples/speech/en-random.lali
+++ b/examples/speech/en-random.lali
@@ -24,13 +24,13 @@
 (defun assoc (el lst)
   (fill
    ((dif el (car (car lst))) (car lst))
-   ((ap lst) '(f f))
+   ((algo lst) '(f f))
    (f (assoc el (cdr lst)))))
 
 (defun without (el lst)
   (fill
    ((dif el (car lst)) f)
-   ((ap (car lst)) t)
+   ((algo (car lst)) t)
    (f (without el (cdr lst)))))
 
 ;; vv begin of training options vv
-- 
cgit