Re: Mathematica　nbをLatexに変換できない

名前: 奥村晴彦
日時: 2004-08-05 21:47:04
IPアドレス: 219.113.127.*

>>30699

TeX を使ってみよう はとりあえず次の角藤さんによるパッチを当てました。

--- ptex-base.ch.orig   Fri Nov 07 17:41:06 2003
+++ ptex-base.ch        Thu Aug 05 20:55:02 2004
@@ -5159,12 +5159,11 @@
 mmode+kanji,mmode+kana,mmode+other_kchar: begin
     cx:=cur_chr; set_math_kchar(KANJI(cx));
   end;
-mmode+char_num: begin scan_char_num;
+mmode+char_num: begin scan_char_num; cur_chr:=cur_val;
   if (cur_chr>=0)and(cur_chr<256) then
-  begin cur_chr:=cur_val;
     if cur_chr<128 then set_math_char(ho(math_code(cur_chr)))
-    else set_math_char(cur_chr);
-  end else set_math_kchar(cur_chr);
+    else set_math_char(cur_chr)
+  else set_math_kchar(cur_chr);
   end;
 @z

この書き込みへの返事：