Add all course examples and tutorials

[TD_LISP.git] / introduction.lsp

diff --git a/introduction.lsp b/introduction.lsp
deleted file mode 100755 (executable)
index 1fe639d..0000000
--- a/introduction.lsp
+++ /dev/null
@@ -1,54 +0,0 @@
-#!/usr/bin/env newlisp
-
-(println "Hello World!")
-
-(println '(println "Hello World!"))
-
-(println (eval (quote (println "Hello World!"))))
-
-(if true (println "Hello") (println "Goodbye"))
-
-(set 'hello "Hello")
-(set 'world " World!")
-
-(println hello world)
-
-(println hello)
-(println world)
-(println 'hello)
-(println 'world)
-
-(println (eval 'z))
-
-(set 'y 'x)
-(set y 1)
-(println "x="x)
-(println "y="y)
-
-(setq y 1)
-(println "y="y)
-
-(define y 2)
-(println "y="y)
-
-(set 'x 1 'y 2)
-(println "x="x)
-(println "y="y)
-
-(setq x 3 y 4)
-(println "x="x)
-(println "y="y)
-
-(println '((x 1) (y 2)))
-
-(println (first '(x 1)))
-(println (last '(x 1)))
-
-(println (first '((x 1) (y 2))))
-
-(println "assoc:")
-(println (assoc 'x '((x 1) (y 2) (x 3))))
-(println "lookup:")
-(println (lookup 'x '((x 1) (y 2) (x 3))))
-
-(exit)