Annotation of OpenXM/src/asir-doc/int-parts/datatype/number.texi, Revision 1.1
1.1 ! noro 1: @comment $OpenXM$
! 2: @section $B?t(B
! 3:
! 4: @example
! 5: struct oNum @{ $B?t$N6&DLItJ,(B
! 6: short id; $B<1JL;R(B (= O_N)
! 7: char nid; $B?t<1JL;R(B
! 8: char pad;
! 9: @};
! 10:
! 11: typedef struct oQ *Q;
! 12: @end example
! 13: @noindent
! 14: $B?t$O(B, $BB?9`<0$HF1%l%Y%k$N(B object $B$H$7$F07$o$l(B, $BB?9`<0$KBP$9$k1i;;%k!<(B
! 15: $B%A%s$NF~NO$H$7$FF1MM$KMQ$$$k$3$H$,$G$-$k(B. $B%a%s%P(B @code{id} $B$O$=$N$?$a(B
! 16: $B$N<1JL;R$G$"$j(B, $B?t$G$O>o$K(B @code{O_N} $B$G$"$k(B. $B?t$O?t<1JL;R(B
! 17: @code{nid} $B$r$b$D(B. $B8=:_(B, $B?t$K$O<!$N$h$&$J7?$,$"$k(B.
! 18:
! 19: @table @code
! 20: @item N_Q = 0 @b{$BM-M}?t(B}
! 21: @item N_R = 1 @b{$BG\@:EYIbF0>.?t(B}
! 22: @item N_A = 2 @b{$BBe?tE*?t(B}
! 23: @item N_B = 3 @b{PARI bigfloat}
! 24: @item N_C = 4 @b{$BJ#AG?t(B}
! 25: @item N_M = 5 @b{$B>.I8?tAGBN(B}
! 26: @item N_LM = 6 @b{$BBgI8?tAGBN(B}
! 27: @item N_GF2N = 7 @b{$BI8?t(B 2 $BM-8BBN(B}
! 28: @item N_GFPN = 8 @b{$B>.I8?tAGBN$N3HBgBN(B}
! 29: @end table
! 30:
! 31: @subsection $B;MB'(B
! 32: @noindent
! 33: $B0J2<$N;MB'$O?t$KBP$9$k%H%C%W%l%Y%k$NH!?t$G$"$k(B. $BF10l$N?t<1JL;R$r;}$D?t$N(B
! 34: $B1i;;$G$O(B, $B7k2L$O$=$N<1JL;R$r$b$D?t$K$J$k(B. $BG\@:EYIbF0>.?t$HM-M}?t$N1i;;(B
! 35: $B7k2L$OG\@:EYIbF0>.?t(B, $BG\@:EYIbF0>.?t$H(B PARI bigfloat $B$N1i;;7k2L$O(B PARI
! 36: bigfloat, $BM-M}?t$HM-8BBN$N85$N1i;;7k2L$OM-8BBN$N85$H$J$k(B.
! 37:
! 38: @example
! 39: #include "ca.h"
! 40:
! 41: addnum(Num a,Num b,Num *rp)
! 42: *rp = a + b
! 43:
! 44: subnum(Num a,Num b,Num *rp)
! 45: *rp = a - b
! 46:
! 47: mulnum(Num a,Num b,Num *rp)
! 48: *rp = a * b
! 49:
! 50: divnum(Num a,Num b,Num *qp,Num *rp)
! 51: *qp = a / b
! 52:
! 53: pwrnum(Num a,Num e,Num *rp)
! 54: *rp = a ^ e
! 55:
! 56: int compnum(Num a,Num b)
! 57: $B$"$k5,B'$K$h$kHf3S(B. $BM-M}?t$N>l9g$O(B a=b $B$N$H$-(B 1, a>b $B$N$H$-(B 1, a<b $B$N$H$-(B -1.
! 58: @end example
! 59:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>