Function: 5x5-grid-to-vec

5x5-grid-to-vec is a byte-compiled function defined in 5x5.el.gz.

Signature

(5x5-grid-to-vec GRID)

Documentation

Convert GRID to an equivalent Calc matrix of (mod X 2) forms where X is 1 for setting a position, and 0 for unsetting a position.

Source Code

;; Defined in /usr/src/emacs/lisp/play/5x5.el.gz
;; Arithmetic solver
;;===========================================================================
(defun 5x5-grid-to-vec (grid)
  "Convert GRID to an equivalent Calc matrix of (mod X 2) forms
where X is 1 for setting a position, and 0 for unsetting a
position."
  (cons 'vec
	(mapcar (lambda (y)
		  (cons 'vec
			(mapcar (lambda (x)
				  (if x '(mod 1 2) '(mod 0 2)))
				y)))
		grid)))