test/test07-math-unicode.tex

   1 %#!lualatex
   2 \documentclass{article}
   3 \usepackage[a4paper]{geometry}
   4 \usepackage{luatexja}
   5 \makeatletter\ltj@alljachar %←全部の（>=U+0080な）文字を和文文字扱いに！
   6
   7 \usepackage{fontspec,unicode-math}
   8 \ExplSyntaxOn
   9 \cs_set:Npn \um_set_mathcode:nnnn #1#2#3#4 {
  10   \Umathcode \int_eval:n {#1} =
  11     \mathchar@type#2 \csname sym#3\endcsname \int_eval:n {#4} \scan_stop:
  12   \directlua{luatexja.math.is_math_letters[\int_eval:n {#4}]=true}
  13 }
  14 \cs_set:Npn \um_set_mathcode:nnn #1#2#3 {
  15   \Umathcode \int_eval:n {#1} =
  16     \mathchar@type#2 \csname sym#3\endcsname \int_eval:n {#1} \scan_stop:
  17   \directlua{luatexja.math.is_math_letters[\int_eval:n {#1}]=true}
  18 }
  19 \cs_set:Npn \um_set_mathchar:NNnn #1#2#3#4 {
  20   \Umathchardef #1 =
  21     \mathchar@type#2 \csname sym#3\endcsname \int_eval:n {#4} \scan_stop:
  22   \directlua{luatexja.math.is_math_letters[\int_eval:n {#4}]=true}
  23 }
  24 \ExplSyntaxOff
  25
  26 \setmathfont{XITSMath}
  27
  28 \begin{document}\makeatletter
  29
  30 \[
  31  \frac1{1^2}+\frac1{2^2}+\cdots=
  32 \sum_{n=1}^\infty \frac1{n^s}=\zeta(2)=\frac{\pi^2}{6}
  33 =\frac16\cdot \pi\times\pi,\qquad a_1,\dots,a_n
  34 \]
  35 aaa○×○漢×漢\times \dots←数式外では和文文字扱いのままになっている．
  36 \end{document}