Computer Science @ Marlboro |
Artificial Intelligence, Spring 2003 |
[you@yourComputer]$ ssh you@cs.marlboro.edu [you@cs you]$ cd /usr/local/apache/htdocs/term/spring03/ [you@cs you]$ cd ai-stuff/textbook-lisp-code/ [you@cs you]$ lisp -quiet * (load "aima.lisp") T * (aima-load 'agents) T * (test 'agents) ... it prints a bunch of stuff ...
(setf people '(jon mary ringo)) people (first people) (rest people) (cons '(a b c) '(d e f)) (append '(a b c) '(d e f)) (list '(a b c) '(d e f)) (push 'frank people) people (setf folks (pop (pop people))) people (length people)
* (eval *package*) * (eval :jim) * (list-all-packages)
(cl:defpackage "MY-VERY-OWN-PACKAGE" (:size 496) (:nicknames "MY-PKG" "MYPKG" "MVOP") (:use "COMMON-LISP") (:shadow "CAR" "CDR") (:shadowing-import-from "BRAND-X-LISP" "CONS") (:import-from "BRAND-X-LISP" "GC" "BLINK-FRONT-PANEL-LIGHTS") (:export "EQ" "CONS" "MY-VERY-OWN-FUNCTION"))