Update of /cvsroot/aimmath/AIM/WEB-INF/maple/aim
In directory sc8-pr-cvs1:/tmp/cvs-serv14699
Modified Files:
LaTeX.mpl
Log Message:
restored the previous code for `latex/latex/symbol` to fix the bug that was created when it was removed which ln to format in itialics
Index: LaTeX.mpl
===================================================================
RCS file: /cvsroot/aimmath/AIM/WEB-INF/maple/aim/LaTeX.mpl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** LaTeX.mpl 1 Sep 2003 05:55:59 -0000 1.4
--- LaTeX.mpl 1 Sep 2003 16:34:42 -0000 1.5
***************
*** 50,53 ****
--- 50,76 ----
# KM
`Package/Assign`(
+ `latex/latex/symbol`,
+ "",
+ proc(QQ)
+ local texlist, s,n,`{`, `}`, `\\_`;
+ option system, remember;
+ if assigned(`latex/special_names`[cat(``,QQ)]) then
+ texlist := `latex/special_names`[cat(``,QQ)]
+ elif member(QQ, eval(`latex/greek`, 1)) then
+ texlist := `latex/latex/copy`(cat(`\\`,QQ))
+ else
+ texlist := `latex/latex/copy`(QQ);
+ s := convert(texlist,string);
+ if s <> "" and substring(s,1..1) = "&" then
+ s := substring(s,2..-1);
+ n := convert(s,name);
+ texlist := `latex/latex/copy`(n);
+ fi;
+ fi;
+ RETURN(texlist);
+ end
+ ):
+
+ `Package/Assign`(
`latex/latex/**`,
"This function overrides the default Maple routine for
|
