src/package.lisp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

;;;; package.lisp

(defpackage #:l-system
  (:use #:cl #:iter #:sb-cga)
  (:export #:*l-system-clauses*
	   #:l-system
	   #:map-l-system
	   #:def-l-system-clause
	   #:deflsys

	   #:turtle-system
	   #:list-of-vectors->list

	   #:mtranslate
	   #:mrotate
	   #:get-axis
	   #:get-vec

	   #:cube))