version 1.6, 2004/04/16 01:57:51 |
version 1.9, 2004/06/27 10:08:56 |
|
|
%% $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.8 2004/06/23 08:52:18 takayama Exp $ |
\input texinfo |
\input texinfo |
@iftex |
@iftex |
@catcode`@#=6 |
@catcode`@#=6 |
|
|
@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:: |
@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 726 Sugar strategy $B$rE,MQ$9$k$H$-$N(B weight vector. |
|
Line 729 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 739 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 887 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+1,x+z+1,x+y+1] |
|
@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 |
|
|
|
|
|
@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 --- |
|
|
$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 |