Search found 15 matches

by phdenis40
Sun Aug 28, 2016 7:21 am
Forum: Common Lisp
Topic: Expert System of order 0
Replies: 0
Views: 4546

Expert System of order 0

Hello all,
I'm looking for an expert system of order 0. I'm looking for Template or for some example, after a look on Google, I found the mycin.lisp example.

Do you know any other example with some explanations?

By advance, thanks for your help.
by phdenis40
Thu Jun 23, 2016 1:38 pm
Forum: Common Lisp
Topic: Lisp - consp listp
Replies: 2
Views: 4662

Lisp - consp listp

Hello all, I'm trying to find a way in order to detect the difference between these 2 forms: (setq MyLst '(word1 word2)) (cons 'word1 'word2) I've tried to use the consp macro or the listp macro in order to be able to highlight these 2 differents forms. Unfortunatelly, the result is always the same ...
by phdenis40
Sun Jun 19, 2016 12:22 am
Forum: Common Lisp
Topic: list and string
Replies: 15
Views: 20799

Re: list and string

Hello,
Sorry for the grammar.

Normally, when the code get the "." and "FIN" keywords, the infinite loop should stop.
Don't know how to detect this sequence "." and "FIN" to stop the loop. Do you have some clues or example for doing that ?
by phdenis40
Tue Jun 14, 2016 3:20 pm
Forum: Common Lisp
Topic: list and string
Replies: 15
Views: 20799

Re: list and string

Hello again, I've put some traces in the code in order to identify which part is not working correctly. I've also modified the code in order to first have a eliza version working and after that add some regexp pattern-matching features. The code is working, the only thing which is not working in thi...
by phdenis40
Sun Jun 12, 2016 3:34 am
Forum: Common Lisp
Topic: list and string
Replies: 15
Views: 20799

Re: list and string

Hello,
Thanks for your reply, I've to use pattern-matcher but it's not so easy as I though it at the beginning.
I think in my code the match function is not working correctly but it's quite not easy to debug as I haven't a IDE debbuger.
by phdenis40
Tue May 31, 2016 11:54 pm
Forum: Common Lisp
Topic: list and string
Replies: 15
Views: 20799

Re: list and string

Hello, I sent you a private message linked to this stack overflow problem. (defun MyComp (MyInp MyList) (cond ((and (not MyInp) (not MyList))) ((not MyList) nil) ((eq (car MyList) '*) (or (MyComp MyInp (cdr MyList)) (MyComp (cdr MyInp) MyList) ) ) ((not MyInp) nil) ((eq (char (string (car MyInp)) 0)...
by phdenis40
Mon May 30, 2016 2:18 pm
Forum: Common Lisp
Topic: list and string
Replies: 15
Views: 20799

Re: list and string

clisp on cygwin
by phdenis40
Mon May 30, 2016 4:40 am
Forum: Common Lisp
Topic: list and string
Replies: 15
Views: 20799

Re: list and string

Hello,

In my code, I've a stack overflow problem. Thus, I'm wondering if it exists some debuggers for Windows or Linux?
I've a computer with cygwin under Windows or Ubuntu OS.

Thanks by advance for your help.
by phdenis40
Fri May 20, 2016 10:43 am
Forum: Common Lisp
Topic: list and string
Replies: 15
Views: 20799

Re: list and string

Thanks for the answer but both solution displayed a NIL line. I don't want the NIL line Break 4 [6]> (setq mylst '(chat chien oiseau lapin)) (CHAT CHIEN OISEAU LAPIN) Break 4 [6]> (dolist (el mylst) (print el)) CHAT CHIEN OISEAU LAPIN NIL Break 4 [6]> (format t "~{~a~^ ~}" mylst) CHAT CHIEN OISEAU L...
by phdenis40
Fri May 20, 2016 4:41 am
Forum: Common Lisp
Topic: list and string
Replies: 15
Views: 20799

list and string

Hello all, I thought naively that the following code will allow me to print each element of a list and not display the nil element at the end. Is it normal ? (setq mylst '(chat chien oiseau lapin)) (loop for n from 0 to (- (length mylst) 1) do (print (nth n mylst))) Do I have to add a condition to c...