Add stippling, tests
| author |
Steve Losh <steve@stevelosh.com> |
| date |
Fri, 23 Mar 2018 23:14:07 -0400 |
| parents |
(none) |
| children |
ebe16cb914fb |
(ql:quickload '(:flax :losh))
(defun check (loom)
(terpri)
(losh:pr 'checking loom)
(funcall loom nil "out" (losh:random-elt '(:png :svg :plot)) 500 500)
(losh:pr 'ok))
(progn
(check #'flax.looms.001-triangles:loom)
(check #'flax.looms.002-wobbly-lines:loom)
(check #'flax.looms.003-basic-l-systems:loom)
(check #'flax.looms.004-turtle-curves:loom)
(check #'flax.looms.005-simple-triangulations:loom)
(check #'flax.looms.006-tracing-lines:loom)
(check #'flax.looms.007-stipple:loom))