;; this file:
;;   https://dataswamp.org/~incal/common-lisp/general-base/math.lisp

(defun random-limit (&optional (limit 2.0))
  (- (random (* 2 limit)) limit) )

(defun random-xyz (&optional (limit 2.0))
  `(,(random-limit limit)
    ,(random-limit limit)
    ,(random-limit limit) ))