Return to float.texi CVS log

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

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

1.1     ! noro        1: @comment $OpenXM$
        !             2: @section $BG\@:EYIbF0>.?t(B
        !             3:
        !             4: @example
        !             5: struct oReal @{      $BG\@:EYIbF0>.?t(B
        !             6:     short id;       $B<1JL;R(B (= O_N)
        !             7:     char nid;       $B?t<1JL;R(B (= N_R)
        !             8:     char pad;
        !             9:     double body;    $BG\@:EYIbF0>.?t(B
        !            10: @};
        !            11:
        !            12: typedef struct oReal *Real;
        !            13: @end example
        !            14:
        !            15: @subsection $BG\@:EYIbF0>.?t$N@8@.(B, $BJQ49(B
        !            16: @example
        !            17: #include "ca.h"
        !            18:
        !            19: MKReal(a,b)    (macro; double a; Real b)
        !            20: body $B$,(B a $B$G$"$kG\@:EYIbF0>.?t(B b $B$r@8@.$9$k(B.
        !            21:
        !            22: double RatnToReal(Q a)
        !            23: $BM-M}?t(B a $B$rG\@:EYIbF0>.?t$KJQ49$9$k(B.
        !            24: @end example
        !            25: @noindent
        !            26: $B%^%/%m$GI,MW$JNN0h$O%^%/%mFb$G3NJ]$5$l$k(B.
        !            27:
        !            28: @subsection $B;MB'(B
        !            29: @noindent
        !            30: $B$$$:$l$b(B, $BIbF0>.?t(B, $BM-M}?tN>J}$rF~NO$K$H$l$k(B. $B7k2L$O$9$Y$FIbF0>.?t$H$J$k(B.
        !            31:
        !            32: @example
        !            33: #include "ca.h"
        !            34:
        !            35: addreal(Num a,Num b,Real *rp)
        !            36: *rp = a + b
        !            37:
        !            38: subreal(Num a,Num b,Real *rp)
        !            39: *rp = a - b
        !            40:
        !            41: mulreal(Num a,Num b,Real *rp)
        !            42: *rp = a * b
        !            43:
        !            44: divreal(Num a,Num b,Real *rp)
        !            45: *rp = a / b
        !            46:
        !            47: pwrreal(Num a,Num e,Real *rp)
        !            48: *rp = a ^ e
        !            49:
        !            50: int cmpreal(Num a,Num b)
        !            51: sgn(a-b)
        !            52: @end example
        !            53: