Update of /cvsroot/aimmath/AIM/WEB-INF/maple/aim
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv26961
Modified Files:
Inert.mpl
Log Message:
fixed a bug in Inert/Times
Index: Inert.mpl
===================================================================
RCS file: /cvsroot/aimmath/AIM/WEB-INF/maple/aim/Inert.mpl,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** Inert.mpl 12 Jan 2004 06:02:18 -0000 1.11
--- Inert.mpl 14 Feb 2004 17:55:08 -0000 1.12
***************
*** 748,753 ****
t:=`aim/LaTeX/CleanNonprinting`(TeX(args[i]));
if length(u)>0 and length(t)>0 and
! `Util/Numeric`(u[-1..-1])
! then
if `Util/Numeric`(t[1..1]) then
s:=cat(s,"\\cdot{}",TeX(args[i]));
--- 748,752 ----
t:=`aim/LaTeX/CleanNonprinting`(TeX(args[i]));
if length(u)>0 and length(t)>0 and
! `Util/Numeric`(u[-1..-1]) then
if `Util/Numeric`(t[1..1]) then
s:=cat(s,"\\cdot{}",TeX(args[i]));
***************
*** 759,763 ****
fi:
else
! s:=cat(s,"\\,",TeX(args[i]));
fi:
else
--- 758,767 ----
fi:
else
! if t[1..1]="-" then
! s:=cat(s,"\\cdot{}\\left(",
! TeX(args[i]),"\\right)");
! else
! s:=cat(s,"\\,",TeX(args[i]));
! fi:
fi:
else
|
