diff --git a/katex-convert-unicode.rkt b/katex-convert-unicode.rkt index d65e9e246..97d165c5a 100644 --- a/katex-convert-unicode.rkt +++ b/katex-convert-unicode.rkt @@ -1,4 +1,4 @@ -#lang racket/base +#lang at-exp racket/base (require racket/string) (provide katex-convert-unicode) @@ -27,7 +27,7 @@ (string-replace* str mathmode? - '([₀ "{}_0"] + `([₀ "{}_0"] [₁ "{}_1"] [₂ "{}_2"] [₃ "{}_3"] @@ -44,6 +44,7 @@ [ₘ "{}_m"] [ₙ "{}_n"] [ₒ "{}_o"] + [ₓ "{}_x"] [⁰ "{}^0"] [¹ "{}^1"] [² "{}^2"] @@ -61,45 +62,46 @@ [ᵐ "{}^m"] [ⁿ "{}^n"] [ᵒ "{}^o"] - [⊆ "\\subseteq" "\\ensuremath{\\subseteq}"] - [⊂ "\\subset" "\\ensuremath{\\subset}"] - [⊇ "\\supseteq" "\\ensuremath{\\supseteq}"] - [⊃ "\\supset" "\\ensuremath{\\supset}"] - [→ "\\rightarrow" "\\ensuremath{\\rightarrow}"] - [⇒ "\\Rightarrow" "\\ensuremath{\\Rightarrow}"] - [← "\\leftarrow" "\\ensuremath{\\leftarrow}"] - [⇐ "\\Leftarrow" "\\ensuremath{\\Leftarrow}"] - [↔ "\\leftrightarrow" "\\ensuremath{\\leftrightarrow}"] - [⇔ "\\Leftrightarrow" "\\ensuremath{\\Leftrightarrow}"] + [⊆ "\\subseteq{}" "\\ensuremath{\\subseteq}"] + [⊂ "\\subset{}" "\\ensuremath{\\subset}"] + [⊇ "\\supseteq{}" "\\ensuremath{\\supseteq}"] + [⊃ "\\supset{}" "\\ensuremath{\\supset}"] + [→ "\\rightarrow{}" "\\ensuremath{\\rightarrow}"] + [⇒ "\\Rightarrow{}" "\\ensuremath{\\Rightarrow}"] + [← "\\leftarrow{}" "\\ensuremath{\\leftarrow}"] + [⇐ "\\Leftarrow{}" "\\ensuremath{\\Leftarrow}"] + [↔ "\\leftrightarrow{}" "\\ensuremath{\\leftrightarrow}"] + [⇔ "\\Leftrightarrow{}" "\\ensuremath{\\Leftrightarrow}"] ;; Partially extracted from my .XCompose generator [ñ "\\tilde{n}" "{\\ifmmode\\tilde{n}\\else\\~{n}\\fi}"] [Ñ "\\tilde{N}" "{\\ifmmode\\tilde{N}\\else\\~{N}\\fi}"] - [⋆ "\\star" "\\ensuremath{\\star}"] + [⋆ "\\star{}" "\\ensuremath{\\star}"] [⍣ "\\ddot{\\star}}" "\\ensuremath{\\ddot{\\star}}"] [⃰ "^*" "^*"] - [⟨ "\\langle" "\\ensuremath{\\mathsmaller{\\raisemath{.15ex}{\\langle}}}"] - [⟩ "\\rangle" "\\ensuremath{\\mathsmaller{\\raisemath{.15ex}{\\rangle}}}"] - [⋯ "\\cdots"] - [⋮ "\\vdots"] - [⋰ "\\iddots"] - [⋱ "\\ddots"] + [⟨ "\\langle{}" "\\ensuremath{\\mathsmaller{\\raisemath{.15ex}{\\langle}}}"] + [⟩ "\\rangle{}" "\\ensuremath{\\mathsmaller{\\raisemath{.15ex}{\\rangle}}}"] + [⋯ "\\cdots{}"] + [⋮ "\\vdots{}"] + [⋰ "\\iddots{}"] + [⋱ "\\ddots{}"] [⧺ "\\mathbin{+\\mkern-6.5mu+}" "\\ensuremath{\\mathbin{+\\mkern-6.5mu+}}"] - [∅ "\\emptyset" "\\ensuremath{\\emptyset}"] + [∅ "\\emptyset{}" "\\ensuremath{\\emptyset}"] [ı⃗ "\\vec{\\i}}" "\\ensuremath{\\vec{\\i}"] - [⊕ "\\oplus" "\\ensuremath{\\oplus}"] - [⊖ "\\ominus" "\\ensuremath{\\ominus}"] - [⋓ "\\Cup" "\\ensuremath{\\Cup}"] + [⊕ "\\oplus{}" "\\ensuremath{\\oplus}"] + [⊖ "\\ominus{}" "\\ensuremath{\\ominus}"] + [⋓ "\\Cup{}" "\\ensuremath{\\Cup}"] ;[ₗ "\\ensuremath{_{l}}"] [∷ "::"] - [Λ "\\Lambda" "\\ensuremath{\\Lambda}"] - [∀ "\\forall"] - [∃ "\\exists"] - [≡ "\\equiv"] - [≢ "\not\\equiv"] - [… "\\ldots"] - [⋯ "\\cdots"] - [⋰ "\\uddots"] ;; or \iddots from package mathdots, see http://tex.stackexchange.com/a/17650 - [⋱ "\\ddots"] - [∌ "\\notni"] - [ℰ "\\mathcal{E}"])) + [Λ "\\Lambda{}" "\\ensuremath{\\Lambda}"] + [∀ "\\forall{}"] + [∃ "\\exists{}"] + [≡ "\\equiv{}"] + [≢ "\\not\\equiv{}"] + [… "\\ldots{}"] + [⋯ "\\cdots{}"] + [⋰ "\\uddots{}"] ;; or \iddots from package mathdots, see http://tex.stackexchange.com/a/17650 + [⋱ "\\ddots{}"] + [∌ "\\notni{}"] + [ℰ "\\mathcal{E}"] + )) str)) \ No newline at end of file