Return to largeff.texi CVS log

Up to [local] / OpenXM / src / asir-doc / int-parts / datatype

Annotation of OpenXM/src/asir-doc/int-parts/datatype/largeff.texi, Revision 1.1

1.1     ! noro        1: @comment $OpenXM$
        !             2: @section $BBgI8?tAGBN(B
        !             3:
        !             4: @example
        !             5: struct oLM @{          $BBgI8?tAGBN$N85(B
        !             6:     short id;         $B<1JL;R(B (= O_N)
        !             7:     char nid;         $B?t<1JL;R(B (= N_LM)
        !             8:     char pad;
        !             9:     struct oN *body;  $BBgI8?tAGBN$N85(B
        !            10: @};
        !            11:
        !            12: typedef struct oLM *LM;
        !            13: @end example
        !            14: $BG$0UI8?t$NAGBN$r07$&$?$a$N7?$G$"$k(B. $BI8?t$O(B oN $B7?$N<+A3?t$H$7$F$"$k@EE*JQ(B
        !            15: $B?t$K3JG<$5$l$k(B. $B3F85<+BN$OB0$9$kBN$K4X$9$k>pJs$r$b$C$F$*$i$:(B, $B@_Dj$5$l$?(B
        !            16: $BI8?t$NCM$K$h$j1i;;$,9T$o$l$k(B.
        !            17:
        !            18: @subsection $BBgI8?tAGBN$N85$N@8@.(B, $BJQ49(B
        !            19: @example
        !            20: #include "ca.h"
        !            21: void setmod_lm(N p)
        !            22: $B<+A3?t(B p $B$rBgI8?tAGBN$NI8?t$H$7$F@_Dj$9$k(B. p $B$NAG?t%A%'%C%/$O9T$o$J$$(B.
        !            23:
        !            24: void getmod_lm(N *p)
        !            25: $B$=$N;~E@$G@_Dj$5$l$F$$$kBgI8?tAGBN$NI8?t$rJV$9(B. $B@_Dj$5$l$F$$$J$$>l9g(B 0
        !            26: $B$rJV$9(B.
        !            27:
        !            28: void qtolm(Q q,LM *l)
        !            29: $BM-M}?t(B q $B$rI8=`E*<LA|$K$h$j$=$N;~E@$G@_Dj$5$l$F$$$k(B
        !            30: $BAGBN$N85$K<LA|$7$?CM$r@8@.$9$k(B. $BJ,Jl$N9T$-@h$,(B 0 $B$N>l9g(B error() $B4X?t(B
        !            31: $B$,8F$P$l$k(B.
        !            32:
        !            33: void simplm(LM n,LM *r)
        !            34: n $B$N(B body $B$N(B, $B$=$N;~E@$G@_Dj$5$l$F$$$kI8?t$K$h$k>jM>$r(B body $B$H$9$k85$r@8@.(B
        !            35: $B$9$k(B.
        !            36: @end example
        !            37: @noindent
        !            38:
        !            39: @subsection $B;MB'(B
        !            40: @noindent
        !            41: $B0z?t$O(B 0 $B$^$?$OBgI8?tAGBN$N85$^$?$OM-M}?t(B. $BM-M}?t$O$=$N;~E@$G@_Dj$5$l$F$$$k(B
        !            42: $BAGBN$N85$KJQ49$5$l$k(B.
        !            43:
        !            44: @example
        !            45: #include "ca.h"
        !            46:
        !            47: addlm(LM a,LM b,LM *rp)
        !            48: *rp = a + b
        !            49:
        !            50: sublm(LM a,LM b,LM *rp)
        !            51: *rp = a - b
        !            52:
        !            53: mullm(LM a,LM b,LM *rp)
        !            54: *rp = a * b
        !            55:
        !            56: divlm(LM a,LM b,LM *rp)
        !            57: *rp = a / b
        !            58:
        !            59: pwrlm(LM a,Q e,LM *rp)
        !            60: *rp = a ^ e
        !            61:
        !            62: int cmplm(LM a,LM b)
        !            63: body $B$NCM$r<+A3?t$H$7$FHf3S(B
        !            64: @end example
        !            65:
        !            66: