package.lisp @ d1a73b73b4c7 default tip

Dammit reddit
author Steve Losh <steve@stevelosh.com>
date Fri, 15 Jul 2016 13:07:34 +0000
parents bc2e3a4dc208
children (none)
(defpackage #:mazes.utils
  (:use
    #:cl
    #:iterate
    #:sketch
    #:mazes.quickutils)
  (:export
    #:dividesp
    #:in-context
    #:random-elt
    #:randomp
    #:zap%
    #:full-list
    #:smallest
    #:largest
    #:when-let
    #:recursively
    #:recur
    #:hash-keys
    #:make-set
    #:set-contains-p
    #:set-add
    #:set-remove
    #:set-add-all
    #:set-remove-all
    #:set-random
    #:set-pop
    #:set-empty-p
    #:hash-set
    #:set-clear
    #:averaging
    #:timing
    #:real-time
    #:run-time
    #:since-start-into
    #:per-iteration-into
    #:in-lists
    #:in-sequences
    #:%)
  (:shadowing-import-from #:iterate
    #:in))

(defpackage #:mazes.fps
  (:use
    #:cl
    #:iterate
    #:sketch
    #:mazes.quickutils
    #:mazes.utils)
  (:export
    #:with-fps
    #:draw-fps)
  (:shadowing-import-from #:iterate
    #:in))

(defpackage #:mazes.grid
  (:use
    #:cl
    #:iterate
    #:mazes.quickutils
    #:mazes.utils)
  (:export
    #:cell
    #:make-cell
    #:cell-link
    #:cell-unlink
    #:cell-linked-p
    #:cell-linked-north-p
    #:cell-linked-south-p
    #:cell-linked-east-p
    #:cell-linked-west-p
    #:cell-neighbors
    #:cell-random-neighbor
    #:cell-random-unlinked-neighbor
    #:cell-random-linked-neighbor
    #:cell-north
    #:cell-south
    #:cell-east
    #:cell-west
    #:cell-col
    #:cell-row
    #:cell-active
    #:cell-active-group
    #:cell-links
    #:grid
    #:grid-cols
    #:grid-rows
    #:grid-cells
    #:grid-ref
    #:grid-clear-active
    #:make-grid
    #:grid-size
    #:in-grid
    #:row-of-grid
    #:grid-size
    #:grid-random-cell
    #:grid-dead-end-count
    #:distance-map
    #:make-dm
    #:dm-distance
    #:dm-cells
    #:dm-max
    #:cell-distance-map
    #:dijkstra))

(defpackage #:mazes.generation
  (:use
    #:cl
    #:iterate
    #:mazes.quickutils
    #:mazes.utils
    #:mazes.grid)
  (:export
    #:binary-tree
    #:binary-tree-generator
    #:sidewinder
    #:sidewinder-generator
    #:aldous-broder
    #:aldous-broder-generator
    #:wilson
    #:wilson-generator
    #:hunt-and-kill
    #:hunt-and-kill-generator
    #:recursive-backtracker
    #:recursive-backtracker-generator
    )
  (:import-from #:snakes
    #:defgenerator
    #:do-generator
    #:yield))

(defpackage #:mazes.demo
  (:use
    #:cl
    #:sketch
    #:iterate
    #:cl-arrows
    #:mazes.grid
    #:mazes.generation
    #:mazes.quickutils
    #:mazes.utils
    #:mazes.fps)
  (:import-from #:snakes
    #:do-generator)
  (:shadowing-import-from #:iterate
    #:in))