P46
(de truthTable (Fun) (for X '(T NIL) (for Y '(T NIL) (println X Y (Fun X Y)) ) ) )
http://picolisp.com/wiki/?99p46
10jul10 | abu |
(de truthTable (Fun) (for X '(T NIL) (for Y '(T NIL) (println X Y (Fun X Y)) ) ) )
http://picolisp.com/wiki/?99p46
10jul10 | abu |