===================================================================
RCS file: /home/cvs/OpenXM/src/asir-contrib/packages/doc/Attic/m.oxweave,v
retrieving revision 1.2
retrieving revision 1.6
diff -u -p -r1.2 -r1.6
--- OpenXM/src/asir-contrib/packages/doc/Attic/m.oxweave	2003/05/20 23:25:28	1.2
+++ OpenXM/src/asir-contrib/packages/doc/Attic/m.oxweave	2004/03/05 15:56:40	1.6
@@ -1,15 +1,22 @@
-/* $OpenXM: OpenXM/src/asir-contrib/packages/doc/m.oxweave,v 1.1 2003/05/19 05:15:52 takayama Exp $ */
+/* $OpenXM: OpenXM/src/asir-contrib/packages/doc/m.oxweave,v 1.5 2004/03/05 15:30:50 ohara Exp $ */
 /* Use oxweave to generate documents on this source code
    Use iso-2022 to write this file. No default use of GL and GR is allowed.
 */
 
 
-/*&C-texi
+/*&C
 @c DO NOT EDIT THIS FILE   oxmath.texi  It is automatically generated
 @c from asir-contrib/packages/doc/m.oxweave
 @node Mathematica Functions,,, Top
+@menu
+* mathematica.start::
+* mathematica.tree_to_string::
+* mathematica.rtomstr::
+@end menu
+
+
 */
-/*&jp-texi
+/*&ja
 @chapter Mathematica $BH!?t(B
 
 $B$3$N@a$G$O(B Mathematica $B$N(B ox $B%5!<%P(B @code{ox_math}
@@ -20,7 +27,7 @@
 
 $BCm0U(B: @code{ox_reset} $B$OF0$+$J$$(B.
 */
-/*&eg-texi
+/*&en
 @chapter Mathematica Functions
 
 This chapter describes  interface functions for
@@ -32,7 +39,7 @@ The file @file{m} is at @file{$(OpenXM_HOME)/lib/asir-
 
 Note: @code{ox_reset} does not work.
 */
-/*&C-texi
+/*&C
 @example
 @include opening.texi
 [258] load("m")$
@@ -47,7 +54,7 @@ See OpenXM/Copyright/Copyright.mathlink  for details.
 @end example
 */
 
-/*&C-texi
+/*&C
 @noindent
 @code{Mathematica} is the trade mark of Wolfram Research Inc.
 This package requires Mathmatica Version 3.0, so you need
@@ -64,16 +71,13 @@ Author of @code{ox_math}: Katsuyoshi Ohara,  
 */
 
 
-/*&jp-texi
+/*&ja
 @section $BH!?t0lMw(B
 */ 
-/*&eg-texi
+/*&en
 @section Functions
 */ 
-/*&jp-texi
-@menu
-* mathematica.start::
-@end menu
+/*&ja
 @node mathematica.start,,, Mathematica Functions
 @subsection @code{mathematica.start}
 @findex mathematica.start
@@ -94,10 +98,7 @@ Author of @code{ox_math}: Katsuyoshi Ohara,  
 @item $B<1JLHV9f$O(B @code{M_proc} $B$K3JG<$5$l$k(B.
 @end itemize
 */
-/*&eg-texi
-@menu
-* mathematica.start::
-@end menu
+/*&en
 @node mathematica.start,,, Mathematica Functions
 @subsection @code{mathematica.start}
 @findex mathematica.start
@@ -118,18 +119,18 @@ Integer
 @item The descriptor is stored in the variable @code{M_proc}.
 @end itemize
 */
-/*&C-texi
+/*&C
 @example
 P = mathematica.start()
 @end example
 */
-/*&jp-texi
+/*&ja
 @table @t
 @item $B;2>H(B
 @code{ox_launch}
 @end table
 */
-/*&eg-texi
+/*&en
 @table @t
 @item Reference
 @code{ox_launch}
@@ -140,10 +141,7 @@ P = mathematica.start()
   $B0J2<$G(BMathematica $B$r8F$V$?$a$NJd=u4X?t$rDj5A$9$k(B.
 */
 
-/*&jp-texi
-@menu
-* mathematica.tree_to_string::
-@end menu
+/*&ja
 @node mathematica.tree_to_string,,, Mathematica Functions
 @subsection @code{mathematica.tree_to_string}
 @findex mathematica.tree_to_string
@@ -173,10 +171,7 @@ ox_math $B$NLa$9(B Mathematica $B$NLZ9=B$%G!<%?(B 
    $B$+$($k(B.
 @end itemize
 */
-/*&eg-texi
-@menu
-* mathematica.tree_to_string::
-@end menu
+/*&en
 @node mathematica.tree_to_string,,, Mathematica Functions
 @subsection @code{mathematica.tree_to_string}
 @findex mathematica.tree_to_string
@@ -210,7 +205,7 @@ be understandable by @code{asir}.
   @code{m_(the key word)}.
 @end itemize
 */
-/*&C-texi
+/*&C
 @example
 [267] mathematica.start();
 0
@@ -224,7 +219,7 @@ be understandable by @code{asir}.
 x^2-2*x+1
 @end example
 */
-/*&C-texi
+/*&C
 @example
 [259] mathematica.tree_to_string(["List",1,2]);
 [1 , 2]
@@ -235,16 +230,16 @@ mathematica.complex(2.3 , 4.55)
 [362] mathematica.tree_to_string(["Plus",["Complex",1.2,3.5],1/2]);
 (mathematica.complex(1.2 , 3.5))+(1/2)
 [380] eval_str(@@);
-(1.7+3.5*@i)
+(1.7+3.5*@@i)
 @end example
 */
-/*&jp-texi
+/*&ja
 @table @t
 @item $B;2>H(B
 @code{ox_pop_cmo}, @code{eval_str}, @code{mathematica.rtomstr}
 @end table
 */
-/*&eg-texi
+/*&en
 @table @t
 @item Reference
 @code{ox_pop_cmo}, @code{eval_str}, @code{mathematica.rtomstr}
@@ -261,10 +256,7 @@ mathematica.complex(2.3 , 4.55)
    $BJQ$($k(B.
 */
 
-/*&jp-texi
-@menu
-* mathematica.rtomstr::
-@end menu
+/*&ja
 @node mathematica.rtomstr,,, Mathematica Functions
 @subsection @code{mathematica.rtomstr}
 @findex mathematica.rtomstr
@@ -287,10 +279,7 @@ mathematica.complex(2.3 , 4.55)
    $B$3$N4X?t$O$3$NJQ49$r$*$3$J$&(B.
 @end itemize
 */
-/*&eg-texi
-@menu
-* mathematica.rtomstr::
-@end menu
+/*&en
 @node mathematica.rtomstr,,, Mathematica Functions
 @subsection @code{mathematica.rtomstr}
 @findex mathematica.rtomstr
@@ -315,15 +304,15 @@ but @code{Mathematica} uses @code{@{}, @code{@}}.
 This function makes this sort of translations.
 @end itemize
 */
-/*&C-texi
+/*&C
 @example
 [259] mathematica.rtomstr([1,2,3]);
-{1,2,3}
+@{1,2,3@}
 [260] mathematica.rtomstr([[1,x,x^2],[1,y,y^2]]);
 @{@{1,x,x^2@},@{1,y,y^2@}@}
 @end example
 */
-/*&jp-texi
+/*&ja
 $B$b$&0l$DNc$r$"$2$h$&(B.
 $B<!$N4X?t(B @code{mathematica.inverse(M)} $B$O(B @code{ox_math}
 $B$r$h$s$G9TNs(B @code{M} $B$N5U9TNs$r7W;;$9$k4X?t$G$"$k(B.
@@ -332,7 +321,7 @@ asir $B$N9TNs$r(B Mathematica $B7A<0$KJQ49$7$F$+$i
 @code{ox_execute_string} $B$G(B Mathematica $B$K5U9TNs$r7W;;(B
 $B$5$;$F$$$k(B.
 */
-/*&eg-texi
+/*&en
 Let us see one more example.
 The following function @code{mathematica.inverse(M)} outputs
 the inverse matrix of the matrix @code{M} by calling @code{ox_math}.
@@ -341,7 +330,7 @@ by @code{r_tostr(M)}
 and makes Mathematica compute the inverse matrix of @code{M} by
 @code{ox_execute_string}.
 */
-/*&C-texi
+/*&C
 @example
 def inverse(M) @{
   P = 0;
@@ -359,14 +348,14 @@ def inverse(M) @{
 (z*y)/(x^2+(-y-z)*x+z*y)
 @end example
 */
-/*&jp-texi
+/*&ja
 @table @t
 @item $B;2>H(B
 @code{ox_execute_string}, @code{ToExpression}(Mathematica),
 @code{mathematica.tree_to_string}
 @end table
 */
-/*&eg-texi
+/*&en
 @table @t
 @item Reference
 @code{ox_execute_string}, @code{ToExpression}(Mathematica),