Function: org-latex--math-table
org-latex--math-table is a byte-compiled function defined in
ox-latex.el.gz.
Signature
(org-latex--math-table TABLE INFO)
Documentation
Return appropriate LaTeX code for a matrix.
TABLE is the table type element to transcode. INFO is a plist used as a communication channel.
This function assumes TABLE has org as its :type property and
inline-math or math as its :mode attribute.
Source Code
;; Defined in /usr/src/emacs/lisp/org/ox-latex.el.gz
(defun org-latex--math-table (table info)
"Return appropriate LaTeX code for a matrix.
TABLE is the table type element to transcode. INFO is a plist
used as a communication channel.
This function assumes TABLE has `org' as its `:type' property and
`inline-math' or `math' as its `:mode' attribute."
(let* ((attr (org-export-read-attribute :attr_latex table))
(env (or (plist-get attr :environment)
(plist-get info :latex-default-table-environment)))
(contents
(mapconcat
(lambda (row)
(if (eq (org-element-property :type row) 'rule) "\\hline"
;; Return each cell unmodified.
(concat
(mapconcat
(lambda (cell)
(substring (org-element-interpret-data cell) 0 -1))
(org-element-map row 'table-cell #'identity info) "&")
(or (cdr (assoc env org-latex-table-matrix-macros)) "\\\\")
"\n")))
(org-element-map table 'table-row #'identity info) "")))
(concat
;; Prefix.
(plist-get attr :math-prefix)
;; Environment. Also treat special cases.
(cond ((member env '("array" "tabular"))
(format "\\begin{%s}{%s}\n%s\\end{%s}"
env (org-latex--align-string table info t) contents env))
((assoc env org-latex-table-matrix-macros)
(format "\\%s%s{\n%s}"
env
(or (plist-get attr :math-arguments) "")
contents))
(t (format "\\begin{%s}\n%s\\end{%s}" env contents env)))
;; Suffix.
(plist-get attr :math-suffix))))