Function: math-mimic-ident

math-mimic-ident is an autoloaded and byte-compiled function defined in calc-vec.el.gz.

Signature

(math-mimic-ident A M)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-vec.el.gz
(defun math-mimic-ident (a m)
  (if (math-square-matrixp m)
      (calcFunc-idn a (1- (length m)))
    (if (math-vectorp m)
	(if (math-zerop a)
            (cons 'vec (mapcar (lambda (x)
                                 (if (math-vectorp x)
                                     (math-mimic-ident a x)
                                   a))
			       (cdr m)))
	  (math-dimension-error))
      (calcFunc-idn a))))