Annotation of OpenXM/src/asir-doc/int-parts/operation.texi, Revision 1.1
1.1 ! noro 1: @comment $OpenXM$
! 2: @chapter $B$=$NB>$N1i;;(B
! 3:
! 4: @section $B=|;;(B
! 5: @example
! 6: #include "ca.h"
! 7:
! 8: divsrp(vl,a,b,qp,rp) *qp = a / b; *rp = a % b; ($BB?9`<0$H$7$F$N>&(B, $B>jM>(B)
! 9: VL vl;
! 10: P a,b,*qp,*rp;
! 11:
! 12: premp(vl,a,b,rp) *rp = lc(b)^(deg(a)-deg(b)+1)*a % b ($B5<>jM>(B)
! 13: VL vl;
! 14: P a,b,*rp;
! 15: @end example
! 16: @noindent
! 17: $B0lHL$KB?JQ?tB?9`<0$KBP$7$F$O(B, $BI,$:$7$b=|;;$,<B9T$G$-$k$H$O8B$i$J$$(B.
! 18: @code{divsrp()} $B$O(B, $B>&(B, $B>jM>$,B8:_$9$k$3$H$,J,$+$C$F$$$k>l9g$K$=$l$i$r5a(B
! 19: $B$a$kH!?t$G$"$k(B. $B$3$l$O(B, $BNc$($P=|?t$N<g78?t$,M-M}?t$G$"$k>l9g$J$I$KMQ$$$i(B
! 20: $B$l$k(B. $B0lHL$KB?9`<0>jM>$O5<>jM>$r7W;;$9$k$3$H$K$h$j5a$a$k(B.
! 21:
! 22: @section GCD
! 23: @example
! 24: #include "ca.h"
! 25:
! 26: ezgcdp(vl,a,b,rp) *rp = gcd(pp(a),pp(b));
! 27: VL vl;
! 28: P a,b,*rp;
! 29:
! 30: ezgcdpz(vl,a,b,rp) *rp = gcd(a,b);
! 31: VL vl;
! 32: P a,b,*rp;
! 33:
! 34: pcp(vl,a,pp,cp) *pp = pp(a); *cp = cont(cp);
! 35: VL vl;
! 36: P a,*pp,*cp;
! 37: @end example
! 38: @noindent
! 39: @code{pp(a)} $B$O(B @code{a} $B$N86;OE*ItJ,(B, @code{cont(a)} $B$OMFNL$r(B
! 40: $BI=$9(B. @code{ezgcdp()} $B$O@0?t0x;R$r=|$$$?(B gcd, @code{ezgcdpz()} $B$O@0?t0x(B
! 41: $B;R$r$3$a$?(B gcd $B$r7W;;$9$k(B.
! 42:
! 43: @section $BBeF~(B
! 44: @example
! 45: #include "ca.h"
! 46:
! 47: substp(vl,a,v,b,rp) *rp = a $B$N(B v $B$K(B b $B$rBeF~(B
! 48: VL vl;
! 49: P a,b,*rp;
! 50: V v;
! 51:
! 52: substr(vl,a,v,b,rp) *rp = a $B$N(B v $B$K(B b $B$rBeF~(B
! 53: VL vl;
! 54: R a,b,*rp;
! 55: V v;
! 56: @end example
! 57: @section $BHyJ,(B
! 58: @example
! 59: #include "ca.h"
! 60:
! 61: diffp(vl,a,v,rp) *rp = a $B$r(B v $B$GJPHyJ,(B
! 62: VL vl;
! 63: P a,*rp;
! 64: V v;
! 65:
! 66: pderivr(vl,a,v,rp) *rp = a $B$r(B v $B$GJPHyJ,(B
! 67: VL vl;
! 68: R a,*rp;
! 69: V v;
! 70: @end example
! 71:
! 72: @section $B=*7k<0(B
! 73: @example
! 74: #include "ca.h"
! 75:
! 76: resultp(vl,v,a,b,rp) *rp = a $B$H(B b $B$N=*7k<0(B ($BId9f$O=|$/(B)
! 77: VL v;
! 78: P a,b,*rp;
! 79: @end example
! 80:
! 81: @section $B0x?tJ,2r(B
! 82: @example
! 83: #include "ca.h"
! 84:
! 85: fctrp(vl,a,dcp) *dcp = a $B$rM-M}?t>e$G0x?tJ,2r$7$?$b$N(B
! 86: VL vl;
! 87: P a;
! 88: DCP *dcp;
! 89:
! 90: sqfrp(vl,a,dcp) *dcp = a $B$NM-M}?t>e$GL5J?J}J,2r$7$?$b$N(B
! 91: VL vl;
! 92: P a;
! 93: DCP *dcp;
! 94: @end example
! 95: @noindent
! 96: $B0x?tJ,2r$N7k2L$O(B @code{[$B0x;R(B, $B=EJ#EY(B]} $B$N%j%9%H$H$7$FI=8=$G$-$k(B. $B$3$l$r(B
! 97: $B<!?t78?t%j%9%HMQ$N%G!<%?9=B$(B @code{DCP} $B$rN.MQ$7$FI=8=$9$k(B. $B$9$J$o$A(B, $B%a(B
! 98: $B%s%P(B @code{d} $B$K=EJ#EY(B, $B%a%s%P(B @code{c} $B$K0x;R$rBeF~$9$k(B. $BJ,2r$O(B, $B$^$:(B
! 99: $BF~NOB?9`<0(B @code{a} $B$r(B
! 100: @example
! 101: a = c * b (c $B$OM-M}?t(B, b $B$O@0?t>e86;OE*$JB?9`<0(B)
! 102: @end example
! 103: @noindent
! 104: $B$HJ,2r$7$?8e(B, @code{b} $B$r<B:]$KJ,2r$9$k(B. $B7k2L$O(B, $B%j%9%H$N@hF,$K(B,
! 105: @code{[c, 1]} $B$J$kDj?t9`(B, $B0J2<(B @code{b} $B$N0x;R$,B3$/(B.
! 106:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>