Page 1 of 1

Fuzzy logic using newLISP

Posted: Mon May 21, 2007 11:36 pm
by Fanda
Just in case you want to play with fuzzy logic, take a peek:
http://www.intricatevisions.com/index.cgi?page=nlfuzzy

You will find a fuzzy logic library and an example of water temperature regulation.

Fanda

Posted: Tue May 22, 2007 2:33 am
by rickyboy
Neat! I don't know when I'll ever get to check it out in earnest (I only now just scanned the code), but thanks for showing it. It looks like a good size effort. You never disappoint, Fanda!

Posted: Tue May 22, 2007 11:53 am
by Fanda
I added some charts - now it's colorful and scientific ;-)

Fanda

Posted: Tue May 22, 2007 5:00 pm
by didi
This looks very interesting , 13 pages of code , a lot of work to program !!and some work to understand it .
Now i'll go and get my old fuzzy-books ;-)

Posted: Thu May 24, 2007 9:25 pm
by newdep
Great Job Fanda !!! very nice!

Re: Fuzzy logic using newLISP

Posted: Sun Sep 01, 2013 8:33 am
by hilti
Fanda wrote:Just in case you want to play with fuzzy logic, take a peek:
http://www.intricatevisions.com/index.cgi?page=nlfuzzy

You will find a fuzzy logic library and an example of water temperature regulation.

Fanda
Hi!

Does anyone have a copy of this library? The website seems to be down and I'm interested in some fuzzy logic examples in newLISP.

Thanks in advance.
Marc

Re: Fuzzy logic using newLISP

Posted: Sun Sep 08, 2013 11:03 am
by cormullion
Some of the files are still available, at http://web.archive.org/web/200709070107 ... ge=nlfuzzy. The test function isn't there, but could probably be re-built. It's something like:

Code: Select all

(define (print-test-fn )
  (println (args 0))
  (dolist (a (rest (args)))
     (dolist (a1 a)
         (print " " (pop a1))
           (while a1 
            (print "  "(first a1) " : result " (eval (pop a1)) ", expected " (pop a1) "\n")))))
although that goes wrong towards the end.

But hurry, before the wayback machine loses its way back, or before Lutz obsoletes any more keywords... :)