[Axiom-developer] patch to tex.spad.pamphlet

[Bill Page]

David,

The following patch to src/algebra/tex.spad.pamphlet
generates \sqrt[n]{x} instead of \root{n} \of {x}.
This form is converted properly by texmacs and corrects
the problem with the display of

  integrate(x**(1/3),x)

that you mentioned in a previous email. Since TEX is
in layer15 of the algebra Makefile, re-building Axiom
doesn't take very long and you can simply patch
tex.spad.pamphlet and re-run make from your AXIOM root
directory.

Cheers,
Bill Page.

--- oldsrc/algebra/tex.spad.pamphlet    2003-09-28 20:11:16.000000000
-0400
+++ src/algebra/tex.spad.pamphlet       2003-09-28 20:53:47.000000000
-0400
@@ -27,6 +27,7 @@
 ++   03/09/92 RSS Handle explicit blank appearing in the input.
 ++   11/28/93 JHD Added code for the VCONCAT and TAG operations.
 ++   06/27/95 RSS Change back to $$ and \leqno for Saturn
+++   09/28/03 WSP Changed \root{n} \of {x} to \sqrt[n]{x}
 ++ Basic Operations: coerce, convert, display, epilogue,
 ++   tex, new, prologue, setEpilogue!, setTex!, setPrologue!
 ++ Related Constructors: TexFormat1
@@ -374,7 +375,7 @@
         tmp : S := group formatTex(first args, minPrec)
         null rest args => group concat ["\sqrt ",tmp]
         group concat
-          ["\root ",group formatTex(first rest args, minPrec)," \of
",tmp]
+          ["\sqrt[",formatTex(first rest args, minPrec),"]",tmp]
       op = "SEGMENT" =>
         tmp : S := concat [formatTex(first args, minPrec),".."]
         group