[BACK]Return to exp-ja.texi CVS log [TXT][DIR] Up to [local] / OpenXM / src / asir-doc / exp

Diff for /OpenXM/src/asir-doc/exp/exp-ja.texi between version 1.6 and 1.13

version 1.6, 2004/04/16 01:57:51 version 1.13, 2004/07/09 02:17:45
Line 1 
Line 1 
 %% $OpenXM: OpenXM/src/asir-doc/exp/exp-ja.texi,v 1.5 2004/03/27 05:58:50 takayama Exp $  %% $OpenXM: OpenXM/src/asir-doc/exp/exp-ja.texi,v 1.12 2004/07/07 02:58:45 takayama Exp $
 \input texinfo  \input texinfo
 @iftex  @iftex
 @catcode`@#=6  @catcode`@#=6
Line 38 
Line 38 
 @title $B<B83E*;EMM$N4X?t(B  @title $B<B83E*;EMM$N4X?t(B
 @subtitle Risa/Asir $B<B83E*;EMM4X?t@bL@=q(B  @subtitle Risa/Asir $B<B83E*;EMM4X?t@bL@=q(B
 @subtitle 1.0 $BHG(B  @subtitle 1.0 $BHG(B
 @subtitle 2004 $BG/(B 4 $B7n(B  @subtitle 2004 $BG/(B 6 $B7n(B
   
 @author  by Risa/Asir comitters  @author  by Risa/Asir comitters
 @page  @page
Line 116  ChangeLog $B$N9`L\$O(B www.openxm.org $B$N(B cvswe
Line 116  ChangeLog $B$N9`L\$O(B www.openxm.org $B$N(B cvswe
 * dp_initial_term::  * dp_initial_term::
 * dp_order::  * dp_order::
 * dp_weyl_gr_main::  * dp_weyl_gr_main::
   * list::
   * mapat::
   * set_print_function::
   * small_jacobi::
   * flatten_quote::
 @end menu  @end menu
   
 @comment --- $B"~"~"~"~(B  $B4X?t(B quotetotex, quotetotex_env $B$N@bL@(B $B"~"~"~"~(B  @comment --- $B"~"~"~"~(B  $B4X?t(B quotetotex, quotetotex_env $B$N@bL@(B $B"~"~"~"~(B
Line 454  Sugar strategy $B$rE,MQ$9$k$H$-$N(B weight vector. 
Line 459  Sugar strategy $B$rE,MQ$9$k$H$-$N(B weight vector. 
  dp_gr_main $B$N?7$7$$%$%s%?%U%'!<%9$G$O=g=x$r$"$kJ8K!$K=>$$;XDj$9$k(B.   dp_gr_main $B$N?7$7$$%$%s%?%U%'!<%9$G$O=g=x$r$"$kJ8K!$K=>$$;XDj$9$k(B.
 @comment  ~taka/this03/misc-2003/A2/dp  @comment  ~taka/this03/misc-2003/A2/dp
 @item $B=g=x(B order $B$O<!$NJ8K!$GDj5A$9$k(B.  @{, @} $B$O(B 0 $B2s0J>e$N7+$jJV$7$r0UL#$9$k(B.  @item $B=g=x(B order $B$O<!$NJ8K!$GDj5A$9$k(B.  @{, @} $B$O(B 0 $B2s0J>e$N7+$jJV$7$r0UL#$9$k(B.
 @verbatim  @example
   order         : '[' orderElement { ',' orderElement } ']'    order         : '[' orderElement { ',' orderElement } ']'
   orderElement   :  weightVec | builtinOrder    orderElement   :  weightVec | builtinOrder
   weightVec     : '[' weightElement { ',' weightElement } ']'    weightVec     : '[' weightElement { ',' weightElement } ']'
   builtiniOrder : '[' orderName  ',' setOfVariables ']'    builtiniOrder : '[' orderName  ',' setOfVariables ']'
   weightElement :   NUMBER | setOfVariables ',' NUMBER    weightElement :   NUMBER | setOfVariables ',' NUMBER
   setOfVariables:  V | range(V,V)    setOfVariables:  V | range(V,V)
   orderName    : @grlex | @glex | @lex    orderName    : @@grlex | @@glex | @@lex
 @end verbatim  @end example
 $B$3$3$G(B @code{V} $B$O(B $BJQ?tL>(B, @code{NUMBER} $B$O@0?t$r$"$o$i$9(B.  $B$3$3$G(B @code{V} $B$O(B $BJQ?tL>(B, @code{NUMBER} $B$O@0?t$r$"$o$i$9(B.
 $BNc(B1:  @code{v=[x,y,z,u,v], order=[[x,10,y,5,z,1],[@@grlex,range(x,v)]]}  $BNc(B1:  @code{v=[x,y,z,u,v], order=[[x,10,y,5,z,1],[@@grlex,range(x,v)]]}
 $B$O(B @code{x},@code{y},@code{z} $B$,$=$l$>$l(B weight 10, 5, 1 $B$r$b$D(B  $B$O(B @code{x},@code{y},@code{z} $B$,$=$l$>$l(B weight 10, 5, 1 $B$r$b$D(B
Line 517  Gr\"obner Deformations of Hypergeometric Differential 
Line 522  Gr\"obner Deformations of Hypergeometric Differential 
 [-y^4+y^2-1,x+y^3-y]  [-y^4+y^2-1,x+y^3-y]
 @end example  @end example
   
 @table @t  
 @item $B;2>H(B  
 @ref{xyz_abc}  
 @end table  
   
 @comment --- ChangeLog $B$r=q$/(B. $BF05!(B. $B%=!<%9%3!<%I$N0LCV(B. $BJQ99F|;~(B $B$J$I(B CVS$B%5!<%P$r8+$k$?$a(B  @comment --- ChangeLog $B$r=q$/(B. $BF05!(B. $B%=!<%9%3!<%I$N0LCV(B. $BJQ99F|;~(B $B$J$I(B CVS$B%5!<%P$r8+$k$?$a(B
 @noindent  @noindent
 ChangeLog  ChangeLog
Line 572  parse/parse.h 1.23--1.26
Line 572  parse/parse.h 1.23--1.26
 @itemize @bullet  @itemize @bullet
 @item  @item
 asir-port.sh $B$O(B knoppix $B@lMQ$G$"$k(B.  asir-port.sh $B$O(B knoppix $B@lMQ$G$"$k(B.
 $B$3$N%3%^%s%I$O(B asir $B$N%P%$%J%j$*$h$S(B FFL $B$GG[I[$G$-$J$$ItJ,$r(B  $B$3$N%3%^%s%I$O(B asir $B$N%P%$%J%j$*$h$S(B FLL $B$GG[I[$G$-$J$$ItJ,$r(B
  ftp.math.kobe-u.ac.jp $B$h$j%@%&%s%m!<%I$7$F(B   ftp.math.kobe-u.ac.jp $B$h$j%@%&%s%m!<%I$7$F(B
 /home/knoppix/.asir-tmp $B$X%;!<%V$7$F(B, $B<B9T$9$k(B.  /home/knoppix/.asir-tmp $B$X%;!<%V$7$F(B, $B<B9T$9$k(B.
 .asirrc $B$*$h$S(B .TeXmacs/plugins/ox/progs/init-ox.scm $B$b%@%&%s%m!<%I$9$k(B.  .asirrc $B$*$h$S(B .TeXmacs/plugins/ox/progs/init-ox.scm $B$b%@%&%s%m!<%I$9$k(B.
Line 726  Sugar strategy $B$rE,MQ$9$k$H$-$N(B weight vector. 
Line 726  Sugar strategy $B$rE,MQ$9$k$H$-$N(B weight vector. 
 [1220] F=sm1.gkz([ [[1,1,1,1],[0,1,3,4]], [0,0]]);  /* Command in asir-contrib*/  [1220] F=sm1.gkz([ [[1,1,1,1],[0,1,3,4]], [0,0]]);  /* Command in asir-contrib*/
 [[x4*dx4+x3*dx3+x2*dx2+x1*dx1,4*x4*dx4+3*x3*dx3+x2*dx2,-dx1*dx4+dx2*dx3,-dx2^2*dx4+dx1*dx3^2,dx1^2*dx3-dx2^3,-dx2*dx4^2+dx3^3],[x1,x2,x3,x4]]  [[x4*dx4+x3*dx3+x2*dx2+x1*dx1,4*x4*dx4+3*x3*dx3+x2*dx2,-dx1*dx4+dx2*dx3,-dx2^2*dx4+dx1*dx3^2,dx1^2*dx3-dx2^3,-dx2*dx4^2+dx3^3],[x1,x2,x3,x4]]
 [1221] V=[x1,x2,x3,x4,dx1,dx2,dx3,dx4]$  [1221] V=[x1,x2,x3,x4,dx1,dx2,dx3,dx4]$
 [1222] dp_weyl_gr_main(F | v=V, order=[[dx1,1,dx2,1,dx3,1,dx4,1]]);  [1222] dp_weyl_gr_main(F[0] | v=V, order=[[dx1,1,dx2,1,dx3,1,dx4,1]]);
   ...
 [ 0 0 0 0 1 1 1 1 ]  
 [ R R R R R R R R ]  
 internal error (SEGV)  
 return to toplevel  
   
 [1238] FF=map(dp_ptod,F[0],V);  [1238] FF=map(dp_ptod,F[0],V);
 [(1)*<<1,0,0,0,1,0,0,0>>+(1)*<<0,1,0,0,0,1,0,0>>+(1)*<<0,0,1,0,0,0,1,0>>+(1)*<<0,0,0,1,0,0,0,1>>,(1)*<<0,1,0,0,0,1,0,0>>+(3)*<<0,0,1,0,0,0,1,0>>+(4)*<<0,0,0,1,0,0,0,1>>,0,0,0,0]  [(1)*<<1,0,0,0,1,0,0,0>>+(1)*<<0,1,0,0,0,1,0,0>>+(1)*<<0,0,1,0,0,0,1,0>>+(1)*<<0,0,0,1,0,0,0,1>>,(1)*<<0,1,0,0,0,1,0,0>>+(3)*<<0,0,1,0,0,0,1,0>>+(4)*<<0,0,0,1,0,0,0,1>>,0,0,0,0]
   
Line 741  return to toplevel
Line 736  return to toplevel
   
 dp_weyl_gr_main(FF | v=V, order=[[0,0,0,0,1,1,1,1]]);  dp_weyl_gr_main(FF | v=V, order=[[0,0,0,0,1,1,1,1]]);
   
 [1246] dp_weyl_gr_main(F | v=V, order=[[dx1,1,dx2,1,dx3,1,dx4,1]]);  [1246] dp_weyl_gr_main(FF | v=V, order=[[dx1,1,dx2,1,dx3,1,dx4,1]]);
 [ 0 0 0 0 1 1 1 1 ]  [ 0 0 0 0 1 1 1 1 ]
 [ R R R R R R R R ]  [ R R R R R R R R ]
 internal error (SEGV)   ...
 return to toplevel  
   
 @end example  @end example
   
Line 890  builtin/dp-supp.c 1.32
Line 884  builtin/dp-supp.c 1.32
 builtin/dp.c 1.49  builtin/dp.c 1.49
 @end itemize  @end itemize
   
   
   @comment  mapat
   @node mapat,,, $B<B83E*;EMM$N4X?t(B
   @subsection @code{mapat}
   @findex mapat
   
   @table @t
   @item mapat(@var{fname},@var{pos}[,@var{arg0}, @var{arg1}, ...])
   :: @var{pos} $B$KBP$9$k(B map $B4X?t(B
   @end table
   
   @table @var
   @item return
   $B%*%V%8%'%/%H(B
   @item pos
   $B@0?t(B
   @item arg0, arg1, arg2, ...
   $B%*%V%8%'%/%H(B
   @end table
   
   @itemize @bullet
   @item
   @code{map} $B4X?t$O(B 0 $BHVL\$N0z?t$KBP$7$F$7$+F0:n$7$J$$$,(B, @code{mapat}
   $B4X?t$O;XDj$7$?HV9f$N0z?t$KBP$7$F(B @code{map} $B4X?t$r<B9T$9$k(B.
   @item
   @code{mapat(fname,0,A0,A1,...)} $B$O(B
   @code{map(fname,A0,A1,...)} $B$KEy2A$G$"$k(B.
   @item
   $B<!$NI{:nMQ$,$"$k(B. $B$^$@=q$$$F$J$$(B.
   @end itemize
   
   @example
   [219] mapat(deg,1,x^2+y^3+x+y,[x,y]);
   [2,3]
   [220] mapat(subst,1,x+y+z,[x,y,z],2);
   [y+z+2,x+z+2,x+y+2]
   @end example
   
   @table @t
   @item $B;2>H(B
   @ref{map}
   @end table
   
   @comment --- ChangeLog $B$r=q$/(B. $BF05!(B. $B%=!<%9%3!<%I$N0LCV(B. $BJQ99F|;~(B $B$J$I(B CVS$B%5!<%P$r8+$k$?$a(B
   @comment --- openxm $B$N30It$+$i$N4sM?$b=R$Y$k(B. Credit.
   @noindent
   ChangeLog
   @itemize @bullet
   @item $B$3$N4X?t$O(B 2004-6-22 $B$K%3%_%C%H$5$l$?(B.
    $BJQ99$r$&$1$?%=!<%9%3!<%I$O(B builtin/pf.c, subst.c $B$G$"$k(B.
   @end itemize
   
   @comment  list
   @node list,,, $B<B83E*;EMM$N4X?t(B
   @subsection @code{list}
   @findex list
   
   @table @t
   @item list([@var{arg0}, @var{arg1}, ...])
   :: list $B$r@8@.$9$k(B.
   @end table
   
   @table @var
   @item return
   $B%j%9%H(B
   @item arg0, arg1, arg2, ...
   $B%*%V%8%'%/%H(B
   @end table
   
   @itemize @bullet
   @item
   @var{arg0}, @var{arg1}, ... $B$rMWAG$H$9$k%j%9%H$r@8@.$9$k(B.
   @end itemize
   
   @example
   [219] list(1,2,3);
   [1,2,3]
   [220] list(1,2,[3,4]);
   [1,2,[3,4]]
   @end example
   
   @table @t
   @item $B;2>H(B
   @ref{cons}
   @end table
   
   @comment --- ChangeLog $B$r=q$/(B. $BF05!(B. $B%=!<%9%3!<%I$N0LCV(B. $BJQ99F|;~(B $B$J$I(B CVS$B%5!<%P$r8+$k$?$a(B
   @comment --- openxm $B$N30It$+$i$N4sM?$b=R$Y$k(B. Credit.
   @noindent
   ChangeLog
   @itemize @bullet
   @item $B$3$N4X?t$O(B 2004-6-22 $B$K%3%_%C%H$5$l$?(B.
    $BJQ99$r$&$1$?%=!<%9%3!<%I$O(B builtin/list.c $B$G$"$k(B.
   @end itemize
   
   
   @node set_print_function,,, $B<B83E*;EMM$N4X?t(B
   @subsection @code{set_print_function}
   @findex set_print_function
   
   @comment --- $B4X?t$N4JC1$J@bL@(B ---
   @table @t
   @item set_print_function([@var{fname}])
   :: $B2hLLI=<(MQ$N4X?t$rEPO?(B
   @end table
   
   @table @var
   @item return
   $B@0?t(B
   @item fname
   $BJ8;zNs(B
   @end table
   
   @itemize @bullet
   @item
   @code{set_print_function} $B$O(B @code{fname(F)} $B$rDL>o$N2hLLI=<(4X?t$NBe$o$j$K$h$V(B.
   @code $B0z?t$,$J$$>l9g$O2hLLI=<(4X?t$r%G%U%)!<%k%H$XLa$9(B.
   @code Asir-contrib $B$O$3$N4X?t$rMQ$$$F=PNO4X?t$r(B Asir-contrib $BMQ$KJQ99$7$F$$$k(B.
   @end itemize
   
   @example
   [219] def my_output(F) {
              print("Out: ",0); print(rtostr(F));
         }
   [220] set_print_function("my_output");
   Out: 0
   [221]  1+2;
   Out: 3
   @end example
   
   @table @t
   @item $B;2>H(B
   @ref{rtostr}
   @end table
   
   @noindent
   ChangeLog
   @itemize @bullet
   @item $B$3$N4X?t$O(B 2001-9-4 $B$K(B asir-contrib $B$N$?$a$KF3F~$5$l$?(B.
    $BJQ99$r$&$1$?%=!<%9%3!<%I$O(B builtin/print.c 1.11 $B$G$"$k(B.
   @end itemize
   
   
   @node small_jacobi,,, $B<B83E*;EMM$N4X?t(B
   @subsection @code{small_jacobi}
   @findex small_jacobi
   
   @comment --- $B4X?t$N4JC1$J@bL@(B ---
   @table @t
   @item small_jacobi(@var{a},@var{m})
   :: Jacobi $B5-9f$N7W;;(B
   @end table
   
   @table @var
   @item return
   $B@0?t(B
   @item arg1, arg2
   $B@0?t(B
   @end table
   
   @itemize @bullet
   @item
    @var{m} $B$,AG?t$N$H$-$O(B Legendre $B5-9f$H$h$P$l(B,
    x^2 = @var{a} mod @var{m} $B$K2r$,$"$k$H$-(B 1, $B2r$,$J$$$H$-(B -1 $B$r$b$I$9(B.
   @item
   Jacobi $B5-9f$O(B Legendre $B5-9f$N@Q$GDj5A$5$l$k(B ($B=iEy@0?tO@$NK\;2>H(B).
   @item
    $B$3$N4X?t$O(B machine int $B$NHO0O$G(B jacobi $B5-9f$r7W;;$9$k(B.
   @end itemize
   
   @example
   [1286] small_jacobi(2,3);
   -1
   [1287] small_jacobi(2,7);
   1
   @end example
   
   @table @t
   @item $B;2>H(B
   http://members.jcom.home.ne.jp/yokolabo/asirlib/
   $B$b8+$F$M(B.
   @end table
   
   @comment --- ChangeLog $B$r=q$/(B. $BF05!(B. $B%=!<%9%3!<%I$N0LCV(B. $BJQ99F|;~(B $B$J$I(B CVS$B%5!<%P$r8+$k$?$a(B
   @noindent
   ChangeLog
   @itemize @bullet
   @item $B$3$N4X?t$NM3Mh$OITL@(B.
   @end itemize
   
   
   @node quote_flatten,,, $B<B83E*;EMM$N4X?t(B
   @subsection @code{quote_flatten}
   @findex quote_flatten
   
   @comment --- $B4X?t$N4JC1$J@bL@(B ---
   @table @t
   @item quote_flatten(@var{q},@var{op})
   :: quote $B$N3g8L$r$H$j$5$k(B.
   @end table
   
   @table @var
   @item return
   Quote
   @item q
   Quote
   @item op
   $B1i;;;R$rI=$9J8;zNs(B.
   @end table
   
   @itemize @bullet
   @item
   Quote $B7?$N%G!<%?$OLZ9=B$$r$7$F$$$k(B
   ( quotetolist $B;2>H(B ).
   @code{quote_flatten()} $B$O(B, @var{q} $B$NCf$K$"$i$l$k1i;;;R(B @var{op}
   $B$N;R6!%N!<%I$rJ?Ey$K$9$k(B.
   $B$D$^$j1i;;;R(B @var{op} $B$K4X$9$k3g8L$E$1$,$"$C$?>l9g$=$l$r$9$Y$F$H$j$5$k(B.
   $B$?$H$($P(B (1+2)+(3+4) $B$H$$$&I=8=$r(B 1+2+3+4 $B$KJQ49$9$k(B.
   @item
    $B8=:_$N<BAu$G$O(B n-ary $B$N1i;;;R$ODj5A$5$l$F$$$J$$$N$G(B,
    1+2+3 $B$O<B$O(B (1+2)+3 $B$HI=8=$5$l$F$$$k(B.
    $B$D$^$j(B + $B1i;;;R$O:87k9gE*$G$"$k(B.
   @end itemize
   
   @example
   [1288] flatten_quote(quote((1+2)+(3+4*(x+3))),"+");
   quote(1+2+3+4*(x+3))
   [1289] flatten_quote(quote( (x*y)*(p*3)-(x*y)*z),"*");
   quote(x*y*p*3-x*y*z)
   [1290] quotetolist(quote(1+2+3));
   [b_op,+,[b_op,+,[internal,1],[internal,2]],[internal,3]]
   @end example
   
   @table @t
   @item $B;2>H(B
   @ref{quotetolist}, @ref{print_tex_form}(contrib)
   @end table
   
   @comment --- ChangeLog $B$r=q$/(B. $BF05!(B. $B%=!<%9%3!<%I$N0LCV(B. $BJQ99F|;~(B $B$J$I(B CVS$B%5!<%P$r8+$k$?$a(B
   @noindent
   ChangeLog
   @itemize @bullet
   @item
    $B$3$N4X?t$O(B 2004-7-7 $B$+$i(B 2004-7-8 $B$K$+$1$F(B
    quote $B$K4X$9$kA`:n$r8&5f$9$k$?$a$K<B83E*$K=q$+$l$?(B.
    OpenXM/fb $B$GC_@Q$5$l$?8x<0$NITMW$J3g8L$r$H$j$O$:$7(B, tex $B7A<0$KJQ49$9$k$N$K(B
    $B1~MQ(B.
   @item
    $BJQ99$r$&$1$?%=!<%9%3!<%I$O(B
    builtin/strobj.c 1.47,
    parse/eval.c 1.35,
    parse/parse.h 1.31,
    parse/quote.c 1.14--1.16.
   @end itemize
   
   
   @comment --- $B"~"~"~"~(B  $B0J2<B>$N4X?t$K$D$$$F??;w$7$F5-=R$9$k(B. $B"~"~"~"~(B
   
 @comment $B?7$7$$4X?t$N@bL@$r=q$/$?$a$N%F%s%W%l!<%H$G$"$k(B. $B>C$9$J(B.  @comment $B?7$7$$4X?t$N@bL@$r=q$/$?$a$N%F%s%W%l!<%H$G$"$k(B. $B>C$9$J(B.
 @comment --- $B"~"~"~"~(B  $B4X?t(B syz_pqr, xyz_stu $B$N@bL@(B $B"~"~"~"~(B  @comment --- $B"~"~"~"~(B  $B4X?t(B syz_pqr, xyz_stu $B$N@bL@(B $B"~"~"~"~(B
 @comment --- $BJ#?t$N4X?t$r$^$H$a$F@bL@$9$kNc(B ---  @comment --- $BJ#?t$N4X?t$r$^$H$a$F@bL@$9$kNc(B ---
Line 950  ChangeLog
Line 1202  ChangeLog
  $BJQ99$r$&$1$?%=!<%9%3!<%I$O(B xxxyy.rr, ppp.c $B$G$"$k(B.   $BJQ99$r$&$1$?%=!<%9%3!<%I$O(B xxxyy.rr, ppp.c $B$G$"$k(B.
 @item $B$3$N4X?t$O(B 2000 $B:"$K$O$8$a$F$N%P!<%8%g%s$,=q$+$l$?(B. $B%=!<%9$O(B ppp.c $B$G$"$k(B.  @item $B$3$N4X?t$O(B 2000 $B:"$K$O$8$a$F$N%P!<%8%g%s$,=q$+$l$?(B. $B%=!<%9$O(B ppp.c $B$G$"$k(B.
 @end itemize  @end itemize
   
   
   
 @comment --- $B"~"~"~"~(B  $B0J2<B>$N4X?t$K$D$$$F??;w$7$F5-=R$9$k(B. $B"~"~"~"~(B  
   
   
 @comment --- $B$*$^$8$J$$(B ---  @comment --- $B$*$^$8$J$$(B ---
 @node Index,,, Top  @node Index,,, Top
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.13
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>