Prims - Implement color, label, label-color, size

[clnl] / src / main / main.lisp

diff --git a/src/main/main.lisp b/src/main/main.lisp
index 09244a02229c2f11e8c54799557cef8dae6985a3..eee8e48f48b6e7930f5cff269f6b378a7825b058 100644 (file)
--- a/src/main/main.lisp
+++ b/src/main/main.lisp
@@ -1,26 +1,5 @@
 (in-package #:clnl)
 
-(defvar *model-package* (find-package :cl-user)
- "*MODEL-PACKAGE*
-
-VALUE TYPE:
-
-  a package
-
-INITIAL VALUE:
-
-  The common-lisp-user package
-
-DESCRIPTION:
-
-  *MODEL-PACKAGE* is used for interning symbols as a NetLogo code
-  gets compiled.
-
-  Any local symbols are interned in this package, for use either
-  by other code, or in order to have all symbols interned in the
-  same placakge.  This is also the package in which a model should
-  be run, whether by clnl code or independently.")
-
 (defun e (ast) ast)
 
 (defun r (str)