Function: 5x5-make-random-grid

5x5-make-random-grid is a byte-compiled function defined in 5x5.el.gz.

Signature

(5x5-make-random-grid &optional MOVE)

Documentation

Make a random grid.

Source Code

;; Defined in /usr/src/emacs/lisp/play/5x5.el.gz
(defun 5x5-make-random-grid (&optional move)
  "Make a random grid."
  (setq move (or move (symbol-function '5x5-flip-cell)))
  (let ((grid (5x5-make-new-grid)))
    (dotimes (y 5x5-grid-size)
      (dotimes (x 5x5-grid-size)
        (if (zerop (random 2))
            (funcall move grid y x))))
    grid))