replace ap function name to algo

1 files changed, 5 insertions, 5 deletions

diff --git a/README.md b/README.md
index d60153b..82e1f02 100644
--- a/README.md
+++ b/README.md
@@ -155,13 +155,13 @@ each of their elements satisfy the `dif` predicate, otherwise `f`:
     (space t)                 ; f
     (space '(a b))            ; f
 
-`(ap x)` returns `t` if `x` is "an existing thing" (not an empty list `()`),
+`(algo x)` returns `t` if `x` is "an existing thing" (not an empty list `()`),
 otherwise `f`:
 
-    (ap ())                   ; f
-    (ap +1)                   ; t
-    (ap t)                    ; t
-    (ap '(a b))               ; t
+    (algo ())                   ; f
+    (algo +1)                   ; t
+    (algo t)                    ; t
+    (algo '(a b))               ; t
 
 `(atom x)` returns `t` if `x` is an atom (and not an empty list `()`), otherwise
 `f`: