06941f562ecc3bfb85b12ee2ad0d27253b88772d
[clnl] / src / main / nvm / utils.lisp
1 (in-package #:clnl-nvm)
2
3 (defun min-pxcor () (getf (clnl-model:world-dimensions *model*) :xmin))
4 (defun max-pxcor () (getf (clnl-model:world-dimensions *model*) :xmax))
5 (defun min-pycor () (getf (clnl-model:world-dimensions *model*) :ymin))
6 (defun max-pycor () (getf (clnl-model:world-dimensions *model*) :ymax))