(defpackage #:clnl (:use :common-lisp)
- (:export #:run #:boot #:run-commands #:run-reporter #:*model-package*)
+ (:export
+ #:run #:boot #:run-commands #:run-reporter #:*model-package*
+ #:model->multi-form-lisp #:model->single-form-lisp)
(:documentation
"Main CLNL package
(defpackage #:clnl-code-parser
(:use :common-lisp)
- (:export #:parse #:globals)
+ (:export #:parse #:globals #:procedures)
(:documentation
"CLNL Code Parser
(defpackage #:clnl-random
(:use :common-lisp)
(:shadow #:export)
- (:export #:export #:set-seed #:next-int #:next-double)
+ (:export #:export #:set-seed #:next-int #:next-double #:next-long)
(:documentation
"Wrapper around mt19937.
(defpackage #:clnl-transpiler
(:use :common-lisp)
- (:export #:transpile-commands #:transpile-reporter)
+ (:export #:transpile #:reporter-p #:command-list-p)
(:documentation
"CLNL Transpiler
(defpackage #:clnl-nvm
(:use :common-lisp)
- (:export #:export-world #:create-world #:current-state
+ (:shadow #:random #:count)
+ (:export #:export-world #:create-world #:current-state #:with-stop-handler
; API as used by transpiled NetLogo programs
+ #:agent-value
#:ask
+ #:clear-all
+ #:count
#:create-turtles
#:die
+ #:display
+ #:hatch
+ #:of
#:forward
+ #:lookup-color
+ #:one-of
+ #:patches
+ #:reset-ticks
+ #:random
#:random-float
+ #:random-xcor
+ #:random-ycor
+ #:set-default-shape
+ #:setxy
#:show
- #:turtles)
+ #:stop
+ #:turtles
+ #:tick
+ #:ticks
+ #:turn-right #:turn-left
+ #:with)
(:documentation
"CLNL NVM
(defpackage #:clnl-model
(:use :common-lisp)
- (:export #:default-model #:read-from-nlogo #:world-dimensions #:globals)
+ (:export #:default-model #:read-from-nlogo #:world-dimensions #:widget-globals #:code)
(:documentation
"CLNL Model
all of the sections, and subsections held within. This package houses not only
the code to read and write .nlogo files, but also the living state of the model
as clnl runs."))
+
+(defpackage #:clnl-default-model-package
+ (:use :common-lisp)
+ (:shadow #:go))