summaryrefslogtreecommitdiff
path: root/examples/speech
diff options
context:
space:
mode:
Diffstat (limited to 'examples/speech')
-rwxr-xr-xexamples/speech/en-random.lali4
-rwxr-xr-xexamples/speech/en-random_more.lali4
-rwxr-xr-xexamples/speech/pt-fixed_answer.lali4
-rwxr-xr-xexamples/speech/pt-identify.lali2
-rwxr-xr-xexamples/speech/pt-random.lali4
-rwxr-xr-xexamples/speech/pt-random_more.lali4
6 files changed, 11 insertions, 11 deletions
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
diff --git a/examples/speech/en-random_more.lali b/examples/speech/en-random_more.lali
index 01a3cf8..fd94c6e 100755
--- a/examples/speech/en-random_more.lali
+++ b/examples/speech/en-random_more.lali
@@ -38,13 +38,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
diff --git a/examples/speech/pt-fixed_answer.lali b/examples/speech/pt-fixed_answer.lali
index a50820d..0002672 100755
--- a/examples/speech/pt-fixed_answer.lali
+++ b/examples/speech/pt-fixed_answer.lali
@@ -19,13 +19,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
diff --git a/examples/speech/pt-identify.lali b/examples/speech/pt-identify.lali
index aac6416..bef74ef 100755
--- a/examples/speech/pt-identify.lali
+++ b/examples/speech/pt-identify.lali
@@ -13,7 +13,7 @@
(defun assoc (number lst)
(fill
((dif number (car (car lst))) (car lst))
- ((ap lst) f)
+ ((algo lst) f)
(f (assoc number (cdr lst)))))
(defun train-ups-and-downs ()
diff --git a/examples/speech/pt-random.lali b/examples/speech/pt-random.lali
index 6ff31fb..1b3407c 100755
--- a/examples/speech/pt-random.lali
+++ b/examples/speech/pt-random.lali
@@ -25,13 +25,13 @@
(defun assoc (el lst)
(fill
((dif el (car (car lst))) (car lst))
- ((ap lst) '(f f f))
+ ((algo lst) '(f 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
diff --git a/examples/speech/pt-random_more.lali b/examples/speech/pt-random_more.lali
index 37155e1..0c91c2c 100755
--- a/examples/speech/pt-random_more.lali
+++ b/examples/speech/pt-random_more.lali
@@ -38,13 +38,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