===================================================================
RCS file: /home/cvs/OpenXM/src/asir-contrib/packages/doc/Attic/sm1.oxweave,v
retrieving revision 1.2
retrieving revision 1.4
diff -u -p -r1.2 -r1.4
--- OpenXM/src/asir-contrib/packages/doc/Attic/sm1.oxweave	2001/07/11 06:23:16	1.2
+++ OpenXM/src/asir-contrib/packages/doc/Attic/sm1.oxweave	2002/07/14 13:14:37	1.4
@@ -1,4 +1,4 @@
-/*$OpenXM: OpenXM/src/asir-contrib/packages/doc/sm1.oxweave,v 1.1 2001/07/11 01:00:23 takayama Exp $ */
+/*$OpenXM: OpenXM/src/asir-contrib/packages/doc/sm1.oxweave,v 1.3 2001/07/12 00:46:29 takayama Exp $ */
 
 /*&C-texi
 @c DO NOT EDIT THIS FILE   oxphc.texi
@@ -768,7 +768,7 @@ def sm1_isListOfVar(A) {
 @findex sm1_gb
 @findex sm1_gb_d
 @table @t
-@item sm1_gb([@var{f},@var{v},@var{w}]|proc=@var{p},sorted=@var{q})
+@item sm1_gb([@var{f},@var{v},@var{w}]|proc=@var{p},sorted=@var{q},dehomogenize=@var{r})
 ::  computes the Grobner basis of @var{f} in the ring of differential
 operators with the variable @var{v}.
 @item sm1_gb_d([@var{f},@var{v},@var{w}]|proc=@var{p})
@@ -780,7 +780,7 @@ The result will be returned as a list of distributed p
 @table @var
 @item return
 List
-@item p, q
+@item p, q, r
 Number
 @item f, v, w
 List
@@ -814,6 +814,8 @@ List
    the Grobner basis and the initial ideal
    with sums of monomials sorted by the given order.
    Each polynomial is expressed as a string temporally for now.
+   When the optional variable @var{r} is set to one,
+   the polynomials are dehomogenized (,i.e., h is set to 1).
 @end itemize
 */
 /*&jp-texi
@@ -827,7 +829,7 @@ List
 @findex sm1_gb
 @findex sm1_gb_d
 @table @t
-@item sm1_gb([@var{f},@var{v},@var{w}]|proc=@var{p},sorted=@var{q})
+@item sm1_gb([@var{f},@var{v},@var{w}]|proc=@var{p},sorted=@var{q},dehomogenize=@var{r})
 ::  @var{v} $B>e$NHyJ,:nMQAG4D$K$*$$$F(B @var{f} $B$N%0%l%V%J4pDl$r7W;;$9$k(B.
 @item sm1_gb_d([@var{f},@var{v},@var{w}]|proc=@var{p})
 ::  @var{v} $B>e$NHyJ,:nMQAG4D$K$*$$$F(B @var{f} $B$N%0%l%V%J4pDl$r7W;;$9$k(B. $B7k2L$rJ,;6B?9`<0$N%j%9%H$GLa$9(B.
@@ -836,7 +838,7 @@ List
 @table @var
 @item return
 $B%j%9%H(B
-@item p, q
+@item p, q, r
 $B?t(B
 @item f, v, w
 $B%j%9%H(B
@@ -866,6 +868,8 @@ List
     3 $BHVL\$NLa$jCM$H$7$F(B, $B%0%l%V%J4pDl$*$h$S%$%K%7%!%k$N%j%9%H$,(B
     $BM?$($i$l$?=g=x$G%=!<%H$5$l$?%b%N%_%"%k$NOB$H$7$FLa$5$l$k(B.
     $B$$$^$N$H$3$m$3$NB?9`<0$O(B, $BJ8;zNs$GI=8=$5$l$k(B.
+    $B%*%W%7%g%J%kJQ?t(B @var{r} $B$,%;%C%H$5$l$F$$$k$H$-$O(B,
+    $BLa$jB?9`<0$O(B dehomogenize $B$5$l$k(B ($B$9$J$o$A(B h $B$K(B 1 $B$,BeF~$5$l$k(B).
 @end itemize
 */
 /*&C-texi
@@ -2992,6 +2996,15 @@ microcharacteristic variety $B$,(B bihomogeneous $B
 @item $B;2>H(B
     @code{sm_gb}
 @end table
+*/
+
+
+/*&eg-texi
+@include sm1-auto-en.texi
+*/
+
+/*&jp-texi
+@include sm1-auto-ja.texi
 */