[Cl-irc-cvs] CVS update: cl-irc/example/eliza-rules.lisp
Brian Mastenbrook
bmastenbrook at common-lisp.net
Tue Jul 20 19:18:43 UTC 2004
Update of /project/cl-irc/cvsroot/cl-irc/example
In directory common-lisp.net:/home/bmastenbrook/cl-irc/example
Modified Files:
eliza-rules.lisp
Log Message:
add inscruitable song reference requested by nyef
Date: Tue Jul 20 12:18:43 2004
Author: bmastenbrook
Index: cl-irc/example/eliza-rules.lisp
diff -u cl-irc/example/eliza-rules.lisp:1.5 cl-irc/example/eliza-rules.lisp:1.6
--- cl-irc/example/eliza-rules.lisp:1.5 Tue Jul 6 14:30:44 2004
+++ cl-irc/example/eliza-rules.lisp Tue Jul 20 12:18:43 2004
@@ -20,7 +20,27 @@
((more (?* ?x))
(?x me harder))
-
+
+ ((what s the difference between (?* ?x) and (?* ?y))
+ (?x has similar features but longer hair)
+ (?y has similar features but longer hair))
+
+ ((what are the differences between (?* ?x) and (?* ?y))
+ (?x has similar features but longer hair)
+ (?y has similar features but longer hair))
+
+ ((what is the difference between (?* ?x) and (?* ?y))
+ (?x has similar features but longer hair)
+ (?y has similar features but longer hair))
+
+ ((the difference between (?* ?x) and (?* ?y))
+ (?x has similar features but longer hair)
+ (?y has similar features but longer hair))
+
+ ((the differences between (?* ?x) and (?* ?y))
+ (?x has similar features but longer hair)
+ (?y has similar features but longer hair))
+
(((?* ?x) you (?* ?y) written (?* ?z))
(|I'm| written in Common Lisp))
More information about the cl-irc-cvs
mailing list