"Fossies" - the Fresh Open Source Software Archive

Member "auctex-12.3/style/mathtools.el" (18 Oct 2020, 17958 Bytes) of package /linux/misc/auctex-12.3.tar.gz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) Lisp source code syntax highlighting (style: standard) with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file. See also the latest Fossies "Diffs" side-by-side code changes report for "mathtools.el": 12.2_vs_12.3.

    1 ;;; mathtools.el --- Style hook for the LaTeX package `mathtools'.
    2 
    3 ;; Copyright (C) 2011-2020 Free Software Foundation, Inc.
    4 
    5 ;; Author: Mads Jensen <mje@inducks.org>
    6 ;; Created: 2011-02-13
    7 ;; Keywords: tex
    8 
    9 ;; This file is part of AUCTeX.
   10 
   11 ;; AUCTeX is free software; you can redistribute it and/or modify it
   12 ;; under the terms of the GNU General Public License as published by
   13 ;; the Free Software Foundation; either version 3, or (at your option)
   14 ;; any later version.
   15 
   16 ;; AUCTeX is distributed in the hope that it will be useful, but
   17 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
   18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   19 ;; General Public License for more details.
   20 
   21 ;; You should have received a copy of the GNU General Public License
   22 ;; along with AUCTeX; see the file COPYING.  If not, write to the Free
   23 ;; Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
   24 ;; 02110-1301, USA.
   25 
   26 ;;; Commentary:
   27 
   28 ;;  This file adds support for `mathtools.sty'
   29 
   30 ;;; Comments:
   31 
   32 ;;; This package serves as a wrapper for amsmath, adding more features
   33 ;;; and fixing a few bugs in amsmath.  The mathstyle argument for many
   34 ;;; of the macros is discussed at
   35 ;;; <https://www.tug.org/TUGboat/Articles/tb22-4/tb72perlS.pdf>
   36 
   37 ;;; Code:
   38 
   39 ;; Needed for auto-parsing:
   40 (require 'tex)
   41 
   42 ;; Silence the compiler:
   43 (declare-function font-latex-add-keywords
   44           "font-latex"
   45           (keywords class))
   46 
   47 (defvar LaTeX-amsmath-package-options)
   48 
   49 ;; amsmath options which can be passed directly to mathtools are
   50 ;; appended in the style hook below
   51 (defvar LaTeX-mathtools-package-options
   52   '("fixamsmath" "donotfixamsmathbugs" "allowspaces" "disallowspaces"
   53     ;; Update 2013: We now make \(\) and \[\] robust (can be disabled
   54     ;; via nonrobust package option)
   55     "nonrobust")
   56   "Package options for the mathtools package.")
   57 (TeX-load-style "amsmath")
   58 (dolist (elt LaTeX-amsmath-package-options)
   59   (add-to-list 'LaTeX-mathtools-package-options elt))
   60 
   61 (defvar LaTeX-mathtools-key-val-options
   62   '(("showonlyrefs")
   63     ("mathic" ("true" "false"))
   64     ("showmanualtags" ("true" "false"))
   65     ;; 3.4.1 Matrices
   66     ("smallmatrix-align" ("c" "l" "r"))
   67     ("smallmatrix-inner-space")
   68     ;; 3.4.2 The multlined environment
   69     ("firstline-afterskip")
   70     ("lastline-preskip")
   71     ("multlined-pos" ("c" "b" "t"))
   72     ("multlined-width")
   73     ;; 3.4.7 Centered \vdots
   74     ("shortvdotsadjustabove")
   75     ("shortvdotsadjustbelow")
   76     ;; 3.5 Intertext and short intertext
   77     ("original-intertext" ("true" "false"))
   78     ("original-shortintertext" ("true" "false"))
   79     ("above-intertext-sep")
   80     ("below-intertext-sep")
   81     ("above-shortintertext-sep")
   82     ("below-shortintertext-sep")
   83     ;; 3.7.2 Vertically centered colon
   84     ("centercolon" ("true" "false"))
   85     ;; 4.2 Left sub/superscripts
   86     ("prescript-sub-format")
   87     ("prescript-sup-format")
   88     ("prescript-arg-format"))
   89   "Options for the \\mathtoolsset command.")
   90 
   91 ;; Setup for \newtagform
   92 (TeX-auto-add-type "mathtools-newtagform" "LaTeX")
   93 
   94 (defvar LaTeX-mathtools-newtagform-regexp
   95   '("\\\\newtagform{\\([^}]+\\)}"
   96     1 LaTeX-auto-mathtools-newtagform)
   97   "Matches the first argument of \\newtagform from mathtools package.")
   98 
   99 ;; Setup for \DeclarePairedDelimiter(X)?:
  100 (TeX-auto-add-type "mathtools-DeclarePairedDelimiter" "LaTeX")
  101 
  102 (defvar LaTeX-mathtools-DeclarePairedDelimiter-regexp
  103   `(,(concat "\\\\DeclarePairedDelimiter\\(?:X\\|XPP\\)?"
  104          "{?"
  105          "\\\\\\([a-zA-Z]+\\)"
  106          "}?"
  107          "\\(?:\\[\\([0-9]+\\)\\]\\)?")
  108     (1 2) LaTeX-auto-mathtools-DeclarePairedDelimiter)
  109   "Match the arguments of \\DeclarePairedDelimiterX? from mathtools package.")
  110 
  111 ;; Setup for \newgathered
  112 (TeX-auto-add-type "mathtools-newgathered" "LaTeX")
  113 
  114 (defvar LaTeX-mathtools-newgathered-regexp
  115   '("\\\\newgathered{\\([^}]+\\)}"
  116     1 LaTeX-auto-mathtools-newgathered)
  117   "Matches the first argument of \\newgathered from mathtools package.")
  118 
  119 (defun LaTeX-mathtools-auto-prepare ()
  120   "Clear various variables for mathtools package before parsing."
  121   (setq LaTeX-auto-mathtools-newtagform             nil
  122     LaTeX-auto-mathtools-DeclarePairedDelimiter nil
  123     LaTeX-auto-mathtools-newgathered            nil))
  124 
  125 (defun LaTeX-mathtools-auto-cleanup ()
  126   "Process the parsed elements for mathtools package."
  127   (when (LaTeX-mathtools-DeclarePairedDelimiter-list)
  128     (dolist (delim (LaTeX-mathtools-DeclarePairedDelimiter-list))
  129       (let ((cmd (car delim))
  130         (arg (cadr delim)))
  131     (TeX-add-symbols `(,cmd [ LaTeX-mathtools-arg-mathsize-completion ]
  132                 ,(if (string= arg "")
  133                      1
  134                    (string-to-number arg)))
  135              `(,(concat cmd "*")
  136                ,(if (string= arg "")
  137                 1
  138                   (string-to-number arg)))))))
  139   (when (LaTeX-mathtools-newgathered-list)
  140     (dolist (env (mapcar #'car (LaTeX-mathtools-newgathered-list)))
  141       (LaTeX-add-environments env)
  142       (add-to-list 'LaTeX-item-list
  143            `(,env . LaTeX-item-equation) t)
  144       (add-to-list 'LaTeX-label-alist
  145            `(,env . LaTeX-amsmath-label) t)
  146       (when (fboundp 'reftex-add-label-environments)
  147     (reftex-add-label-environments `((,env ?e nil nil t)))))))
  148 
  149 (add-hook 'TeX-auto-prepare-hook #'LaTeX-mathtools-auto-prepare t)
  150 (add-hook 'TeX-auto-cleanup-hook #'LaTeX-mathtools-auto-cleanup t)
  151 (add-hook 'TeX-update-style-hook #'TeX-auto-parse t)
  152 
  153 (defun LaTeX-mathtools-arg-mathstyle-completion (optional)
  154   "Query and insert mathstyle argument to various commands.
  155 If OPTIONAL, insert it as optional argument in brackets."
  156   (TeX-argument-insert
  157    (completing-read
  158     (TeX-argument-prompt optional nil
  159              (concat "Math style: " TeX-esc) t)
  160     '("displaystyle" "textstyle"
  161       "scriptstyle"  "scriptscriptstyle"))
  162    optional TeX-esc))
  163 
  164 (defun LaTeX-mathtools-arg-mathsize-completion (optional)
  165   "Query and insert math size argument to various commands.
  166 If OPTIONAL, insert it as optional argument in brackets."
  167   (TeX-argument-insert
  168    (completing-read
  169     (TeX-argument-prompt optional nil
  170              (concat "Size command: " TeX-esc) t)
  171     '("big" "Big" "bigg" "Bigg"))
  172    optional TeX-esc))
  173 
  174 (defun LaTeX-mathtools-arg-declarepaireddelimiter (optional &optional X)
  175   "Query and insert various \\DeclarePairedDelimiter macros from mathtools package."
  176   (let ((cmd (TeX-read-string (concat "Command: " TeX-esc)))
  177     (arg (when X (TeX-read-string
  178               (TeX-argument-prompt t nil "Number of arguments")))))
  179     (TeX-add-symbols `(,cmd [ LaTeX-mathtools-arg-mathsize-completion ]
  180                 ,(if X
  181                  ;; This is no precaution, arg has to be > 0
  182                  (string-to-number arg)
  183                    1))
  184              `(,(concat cmd "*")
  185                ,(if X
  186                 (string-to-number arg)
  187               1)))
  188     (LaTeX-add-mathtools-DeclarePairedDelimiters
  189      `(,cmd ,(if X arg "")))
  190     (TeX-argument-insert cmd optional TeX-esc)
  191     (when arg
  192       (insert (concat LaTeX-optop arg LaTeX-optcl)))))
  193 
  194 (defun LaTeX-mathtools-env-multlined (env)
  195   "Query and insert two optional arguments for ENV multlined.
  196 If both arguments are given, insert them in brackets.  If only a
  197 width is given, insert it prefixed with a pair of empty
  198 brackets."
  199   (let ((pos (TeX-read-string
  200           (TeX-argument-prompt t nil "Position (t, b or c (default))")))
  201     (width (completing-read
  202         (TeX-argument-prompt t nil "Width")
  203         (mapcar
  204          (lambda (x) (concat TeX-esc (car x)))
  205          (LaTeX-length-list)))))
  206     (LaTeX-insert-environment
  207      env
  208      (cond (;; both arguments
  209         (and pos   (not (string= pos ""))
  210          width (not (string= width "")))
  211         (format "[%s][%s]" pos width))
  212        (;; pos not empty, width empty
  213         (and pos (not (string= pos ""))
  214          (string= width ""))
  215         (format "[%s]" pos))
  216        (;; pos empty, width not
  217         (and (string= pos "")
  218          width (not (string= width "")))
  219         (format "[][%s]" width))
  220        (t nil)))))
  221 
  222 (defun LaTeX-mathtools-env-cases (env)
  223   "Insert various cases ENVs incl. an ampersand from mathtools package."
  224   (LaTeX-insert-environment env)
  225   (save-excursion
  226     (insert ?&)))
  227 
  228 (defun LaTeX-mathtools-item-cases ()
  229   "Insert contents to terminate a line in multi-line cases environment.
  230 Put line break macro on the last line.  Next, insert an ampersand."
  231   (end-of-line 0)
  232   (just-one-space)
  233   (TeX-insert-macro "\\")
  234   (forward-line 1)
  235   (save-excursion
  236     (insert ?&)))
  237 
  238 (TeX-add-style-hook
  239  "mathtools"
  240  (lambda ()
  241 
  242    ;; Add mathtools to parser
  243    (TeX-auto-add-regexp LaTeX-mathtools-newtagform-regexp)
  244    (TeX-auto-add-regexp LaTeX-mathtools-DeclarePairedDelimiter-regexp)
  245    (TeX-auto-add-regexp LaTeX-mathtools-newgathered-regexp)
  246 
  247    ;; "default" is pre-defined
  248    (LaTeX-add-mathtools-newtagforms "default")
  249 
  250    ;; mathtools requires amsmath, as some bugs in amsmath are fixed
  251    (TeX-run-style-hooks "amsmath")
  252 
  253    (LaTeX-add-environments
  254     ;; 3.4.1 Matrices
  255     '("matrix*"  [ "Vertical alignment (l, r or c (default))" ])
  256     '("pmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  257     '("bmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  258     '("Bmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  259     '("vmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  260     '("Vmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  261     '("smallmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  262     '("psmallmatrix")
  263     '("psmallmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  264     '("bsmallmatrix")
  265     '("bsmallmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  266     '("Bsmallmatrix")
  267     '("Bsmallmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  268     '("vsmallmatrix")
  269     '("vsmallmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  270     '("Vsmallmatrix")
  271     '("Vsmallmatrix*" [ "Vertical alignment (l, r or c (default))" ])
  272     ;; 3.4.2 The multlined environment
  273     '("multlined" LaTeX-mathtools-env-multlined)
  274     ;; 3.4.3 More cases -like environments
  275     '("dcases"   LaTeX-mathtools-env-cases)
  276     '("dcases*"  LaTeX-mathtools-env-cases)
  277     '("rcases"   LaTeX-mathtools-env-cases)
  278     '("rcases*"  LaTeX-mathtools-env-cases)
  279     '("drcases"  LaTeX-mathtools-env-cases)
  280     '("drcases*" LaTeX-mathtools-env-cases)
  281     '("cases*"   LaTeX-mathtools-env-cases)
  282     ;; 4.4 Spreading equations
  283     '("spreadlines" "Spacing between lines")
  284     ;; 4.5 Gathered environments
  285     '("lgathered" ["Vertical position (t or b)"])
  286     '("rgathered" ["Vertical position (t or b)"]))
  287 
  288    (TeX-add-symbols
  289     '("mathtoolsset" (TeX-arg-key-val LaTeX-mathtools-key-val-options))
  290     ;; 3.1.1 A complement to \smash, \llap, and \rlap
  291     '("mathllap" [ LaTeX-mathtools-arg-mathstyle-completion ] t)
  292     '("mathrlap" [ LaTeX-mathtools-arg-mathstyle-completion ] t)
  293     '("mathclap" [ LaTeX-mathtools-arg-mathstyle-completion ] t)
  294     '("mathmakebox" [ (TeX-arg-length "Width") ] [ "Position" ] 1)
  295     '("clap" 1)
  296     '("mathmbox" 1)
  297     ;; 3.1.2 Forcing a cramped style
  298     '("cramped" [ LaTeX-mathtools-arg-mathstyle-completion ] 1)
  299     '("crampedllap" [ LaTeX-mathtools-arg-mathstyle-completion ] t)
  300     '("crampedrlap" [ LaTeX-mathtools-arg-mathstyle-completion ] t)
  301     '("crampedclap" [ LaTeX-mathtools-arg-mathstyle-completion ] t)
  302     ;; 3.1.3 Smashing an operator
  303     '("smashoperator" [ "Position (l, r or lr (default)" ] 1)
  304     ;; 3.1.4 Adjusting the limits of operators
  305     '("adjustlimits" t (TeX-arg-literal "_") nil nil (TeX-arg-literal "_") nil)
  306     ;; 3.1.5 Swapping space above AMS display math environments
  307     '("SwapAboveDisplaySkip" 0)
  308     ;; 3.2.1 The appearance of tags
  309     '("newtagform"
  310       (TeX-arg-eval
  311        (lambda ()
  312      (let ((newtag (TeX-read-string
  313             (TeX-argument-prompt nil nil "Name"))))
  314        (LaTeX-add-mathtools-newtagforms newtag)
  315        (format "%s" newtag))))
  316        [ "Inner format" ] "Left" "Right")
  317     '("renewtagform"
  318       (TeX-arg-eval completing-read
  319             (TeX-argument-prompt nil nil "Name")
  320             (LaTeX-mathtools-newtagform-list))
  321       [ "Inner format" ] "Left" "Right")
  322     '("usetagform"
  323       (TeX-arg-eval completing-read
  324             (TeX-argument-prompt nil nil "Name")
  325             (LaTeX-mathtools-newtagform-list)))
  326     ;; 3.2.2 Showing only referenced tags
  327     '("refeq" TeX-arg-ref)
  328     '("noeqref" TeX-arg-ref)
  329     ;; 3.3.1 Arrow-like symbols
  330     '("xleftrightarrow" ["Below"] "Above")
  331     '("xLeftarrow" ["Below"] "Above")
  332     '("xRightarrow" ["Below"] "Above")
  333     '("xLeftrightarrow" ["Below"] "Above")
  334     '("xhookleftarrow" ["Below"] "Above")
  335     '("xhookrightarrow" ["Below"] "Above")
  336     '("xmapsto" ["Below"] "Above")
  337     '("xrightharpoondown" ["Below"] "Above")
  338     '("xrightharpoonup" ["Below"] "Above")
  339     '("xleftharpoondown" ["Below"] "Above")
  340     '("xleftharpoonup" ["Below"] "Above")
  341     '("xrightleftharpoons" ["Below"] "Above")
  342     '("xleftrightharpoons" ["Below"] "Above")
  343     ;; 3.3.2 Braces and brackets
  344     '("underbracket" [ (TeX-arg-length "Rule thickness") ]
  345              [ (TeX-arg-length "Bracket height") ] t)
  346     '("overbracket"  [ (TeX-arg-length "Rule thickness") ]
  347              [ (TeX-arg-length "Bracket height") ] t)
  348     '("underbrace" 1)
  349     '("overbrace" 1)
  350     '("LaTeXunderbrace" 1)
  351     '("LaTeXoverbrace" 1)
  352     ;; 3.4.2
  353     '("shoveleft"  [ (TeX-arg-length "Dimension") ] 1)
  354     '("shoveright" [ (TeX-arg-length "Dimension") ] 1)
  355     ;; 3.4.4
  356     '("MoveEqLeft" [ "Number" ])
  357     ;; 3.4.5 Boxing a single line in an alignment
  358     '("Aboxed" 1)
  359     ;; 3.4.6 Adding arrows between lines in an alignment
  360     '("ArrowBetweenLines" [ TeX-arg-macro ] )
  361     '("ArrowBetweenLines*" [ TeX-arg-macro ] )
  362     ;; 3.4.7 Centered \vdots
  363     '("vdotswithin" "Symbol")
  364     '("shortvdotswithin" "Symbol")
  365     '("shortvdotswithin*" "Symbol")
  366     '("MTFlushSpaceAbove")
  367     '("MTFlushSpaceBelow")
  368     ;; 3.5 Intertext and short intertext
  369     ;; don't understand t, but intertext in amsmath.el uses it
  370     '("shortintertext" t)
  371     ;; 3.6 Paired delimiters
  372     '("DeclarePairedDelimiter"
  373       LaTeX-mathtools-arg-declarepaireddelimiter
  374       "Left delimiter" "Right delimiter")
  375     '("DeclarePairedDelimiterX"
  376       (LaTeX-mathtools-arg-declarepaireddelimiter t)
  377       "Left delimiter" "Right delimiter" t)
  378     '("DeclarePairedDelimiterXPP"
  379       (LaTeX-mathtools-arg-declarepaireddelimiter t)
  380       "Pre-code" "Left delimiter" "Right delimiter" 2)
  381     '("delimsize" 0)
  382     ;; 3.6.1 Expert use
  383     '("reDeclarePairedDelimiterInnerWrapper"
  384       (TeX-arg-eval
  385        (lambda ()
  386      (let ((cmd (completing-read
  387              (concat "Command: " TeX-esc)
  388              (mapcar #'car (LaTeX-mathtools-DeclarePairedDelimiter-list)))))
  389        (concat TeX-esc cmd))))
  390       (TeX-arg-eval completing-read
  391             "star or nostar: "
  392             '("star" "nostar"))
  393       t)
  394     ;; 3.7.1 Left and right parentheses
  395     '("lparen" TeX-arg-insert-right-brace-maybe)
  396     '("rparen")
  397     ;; 3.7.2 Vertically centered colon
  398     "vcentcolon" "ordinarycolon" "coloneqq" "Coloneqq"
  399     "coloneq" "Coloneq" "eqqcolon" "Eqqcolon" "eqcolon"
  400     "Eqcolon" "colonapprox" "Colonapprox" "colonsim" "Colonsim"
  401     "dblcolon"
  402     ;; 3.7.3 A few missing symbols
  403     "nuparrow" "ndownarrow" "bigtimes"
  404     ;; 4.2 Left sub/superscripts
  405     '("prescript" "Below" "Above" t)
  406     ;; 4.3 Declaring math sizes
  407     '("DeclareMathSizes" 4)
  408     ;; 4.5 Gathered environments
  409     '("newgathered"
  410       (TeX-arg-eval
  411        (lambda ()
  412      (let ((env (TeX-read-string
  413              (TeX-argument-prompt nil nil "Name"))))
  414        (LaTeX-add-environments env)
  415        (LaTeX-add-mathtools-newgathereds env)
  416        (add-to-list 'LaTeX-item-list
  417             `(,env . LaTeX-item-equation) t)
  418        (add-to-list 'LaTeX-label-alist
  419             `(,env . LaTeX-amsmath-label) t)
  420        (format "%s" env))))
  421       3)
  422     '("renewgathered"
  423       (TeX-arg-eval completing-read
  424             (TeX-argument-prompt nil nil "Name")
  425             (LaTeX-mathtools-newgathered-list))
  426       3)
  427     ;; 4.6 Split fractions
  428     '("splitfrac" 2)
  429     '("splitdfrac" 2))
  430 
  431    ;; Append delimiters to `TeX-braces-association'
  432    ;; 3.7.1 Left and right parentheses
  433    (make-local-variable 'TeX-braces-association)
  434    (add-to-list 'TeX-braces-association '("\\lparen" . "\\rparen") t)
  435 
  436    (setq LaTeX-item-list
  437      (append '(("multlined"   . LaTeX-item-equation)
  438            ("lgathered"   . LaTeX-item-equation)
  439            ("rgathered"   . LaTeX-item-equation)
  440            ("spreadlines" . LaTeX-item-equation)
  441            ("matrix*"     . LaTeX-item-equation)
  442            ("pmatrix*"    . LaTeX-item-equation)
  443            ("bmatrix*"    . LaTeX-item-equation)
  444            ("Bmatrix*"    . LaTeX-item-equation)
  445            ("vmatrix*"    . LaTeX-item-equation)
  446            ("Vmatrix*"    . LaTeX-item-equation)
  447            ("dcases"      . LaTeX-mathtools-item-cases)
  448            ("dcases*"     . LaTeX-mathtools-item-cases)
  449            ("rcases"      . LaTeX-mathtools-item-cases)
  450            ("rcases*"     . LaTeX-mathtools-item-cases)
  451            ("drcases"     . LaTeX-mathtools-item-cases)
  452            ("drcases*"    . LaTeX-mathtools-item-cases)
  453            ("cases*"      . LaTeX-mathtools-item-cases))
  454          LaTeX-item-list))
  455 
  456    (setq LaTeX-label-alist
  457      (append '(("lgathered" . LaTeX-amsmath-label)
  458            ("rgathered" . LaTeX-amsmath-label)
  459            ("multlined" . LaTeX-amsmath-label))
  460          LaTeX-label-alist))
  461 
  462    ;; RefTeX support: Add env's with `reftex-add-label-environments'
  463    (when (fboundp 'reftex-add-label-environments)
  464      (let ((envs '(("lgathered"  ?e nil nil t)
  465            ("rgathered"  ?e nil nil t)
  466            ("multlined"  ?e nil nil t))))
  467        (dolist (env envs)
  468      (reftex-add-label-environments `(,env)))))
  469 
  470    ;; Fontification
  471    (when (and (featurep 'font-latex)
  472           (eq TeX-install-font-lock 'font-latex-setup))
  473      (font-latex-add-keywords '(("mathtoolsset"  "{")
  474                 ("newtagform"    "{[{{")
  475                 ("renewtagform"  "{[{{")
  476                 ("DeclarePairedDelimiter"     "|{\\{{")
  477                 ("DeclarePairedDelimiterX"    "|{\\[{{{")
  478                 ("DeclarePairedDelimiterXPP"  "|{\\[{{{{{")
  479                 ("reDeclarePairedDelimiterInnerWrapper" "|{\\{{")
  480                 ("DeclareMathSizes"           "{{{{")
  481                 ("newgathered"                "{{{{")
  482                 ("renewgathered"              "{{{{"))
  483                   'function)
  484      (font-latex-add-keywords '(("usetagform" "{"))
  485                   'variable)
  486      (font-latex-add-keywords '(("refeq"   "{")
  487                 ("noeqref" "{"))
  488                   'reference)))
  489  LaTeX-dialect)
  490 
  491 ;;; mathtools.el ends here