[BACK]Return to cmo-basic1.tex CVS log [TXT][DIR] Up to [local] / OpenXM / doc / OpenXM-specs

Diff for /OpenXM/doc/OpenXM-specs/cmo-basic1.tex between version 1.11 and 1.12

version 1.11, 2001/08/27 05:39:15 version 1.12, 2002/01/20 09:26:21
Line 1 
Line 1 
 %% $OpenXM: OpenXM/doc/OpenXM-specs/cmo-basic1.tex,v 1.10 2001/04/10 11:56:29 takayama Exp $  %% $OpenXM: OpenXM/doc/OpenXM-specs/cmo-basic1.tex,v 1.11 2001/08/27 05:39:15 takayama Exp $
 //&jp \section{ 数, 多項式 の  CMO 表現 }  //&jp \section{ 数, 多項式 の  CMO 表現 }
 //&eg \section{ CMOexpressions for numbers and polynomials }  //&eg \section{ CMOexpressions for numbers and polynomials }
 \label{sec:basic1}  \label{sec:basic1}
Line 59  bash$ ./bconv
Line 59  bash$ ./bconv
 \bigbreak  \bigbreak
 \noindent  \noindent
 Group CMObject/Basic requires CMObject/Primitive. \\  Group CMObject/Basic requires CMObject/Primitive. \\
 ZZ, QQ, Zero, Rational, Indeterminate,$\in$ CMObject/Basic. \\  ZZ, QQ, Zero, Rational, Indeterminate $\in$ CMObject/Basic. \\
 \begin{eqnarray*}  \begin{eqnarray*}
 \mbox{Zero} &:& ({\tt CMO\_ZERO}) \\  \mbox{Zero} &:& ({\tt CMO\_ZERO}) \\
 & & \mbox{ --- ユニバーサルな ゼロを表す. } \\  & & \mbox{ --- ユニバーサルな ゼロを表す. } \\
 \mbox{ZZ}         &:& ({\tt CMO\_ZZ},{\sl int32}\, {\rm f}, {\sl byte}\, \mbox{a[1]}, \ldots  \mbox{ZZ}         &:& ({\tt CMO\_ZZ},{\sl int32}\, {\rm f}, {\sl byte}\, \mbox{a[1]}, \ldots ,
 {\sl byte}\, \mbox{a[$|$f$|$]} ) \\  {\sl byte}\, \mbox{a[$|$f$|$]} ) \\
 &:& \mbox{ --- bignum をあらわす. a[i] についてはあとで説明}\\  &:& \mbox{ --- bignum をあらわす. a[i] についてはあとで説明}\\
 \mbox{QQ}        &:& ({\tt CMO\_QQ},  \mbox{QQ}        &:& ({\tt CMO\_QQ},
Line 76  ZZ, QQ, Zero, Rational, Indeterminate,$\in$ CMObject/B
Line 76  ZZ, QQ, Zero, Rational, Indeterminate,$\in$ CMObject/B
 & & \mbox{ --- 変数名 $v$ . } \\  & & \mbox{ --- 変数名 $v$ . } \\
 \end{eqnarray*}  \end{eqnarray*}
 */  */
   
   
 /*&eg  /*&eg
   
 \bigbreak  \bigbreak
 \noindent  \noindent
 Group CMObject/Basic requires CMObject/Primitive. \\  Group CMObject/Basic requires CMObject/Primitive. \\
 ZZ, QQ, Zero, Rational, Indeterminate,$\in$ CMObject/Basic. \\  ZZ, QQ, Zero, Rational, Indeterminate $\in$ CMObject/Basic. \\
 \begin{eqnarray*}  \begin{eqnarray*}
 \mbox{Zero} &:& ({\tt CMO\_ZERO}) \\  \mbox{Zero} &:& ({\tt CMO\_ZERO}) \\
 & & \mbox{ --- Universal zero } \\  & & \mbox{ --- Universal zero } \\
 \mbox{ZZ}         &:& ({\tt CMO\_ZZ},{\sl int32}\, {\rm f}, {\sl byte}\, \mbox{a[1]}, \ldots  \mbox{ZZ}         &:& ({\tt CMO\_ZZ},{\sl int32}\, {\rm f}, {\sl byte}\, \mbox{a[1]}, \ldots ,
 {\sl byte}\, \mbox{a[$|$m$|$]} ) \\  {\sl byte}\, \mbox{a[$|$m$|$]} ) \\
 &:& \mbox{ --- bignum. The meaning of a[i] will be explained later.}\\  &:& \mbox{ --- bignum. The meaning of a[i] will be explained later.}\\
 \mbox{QQ}        &:& ({\tt CMO\_QQ},  \mbox{QQ}        &:& ({\tt CMO\_QQ},
Line 101  ZZ, QQ, Zero, Rational, Indeterminate,$\in$ CMObject/B
Line 103  ZZ, QQ, Zero, Rational, Indeterminate,$\in$ CMObject/B
 /*&C  /*&C
   
 */  */
   /*&C
   
   */
   
 /*&jp  /*&jp
 \subsection{Indeterminate および Tree}  
 Indeterminate は変数名をあらわす.  Indeterminate は変数名をあらわす.
 v はバイト列であればなにを用いてもよいが,  v はバイト列であればなにを用いてもよいが,
 システム毎に変数名として用いられるバイト列は制限がある.  システム毎に変数名として用いられるバイト列は制限がある.
Line 115  escape sequence を用いて実現するのは, 無理があるようで
Line 119  escape sequence を用いて実現するのは, 無理があるようで
 テーブルを作成する必要があるであろう.)  テーブルを作成する必要があるであろう.)
 */  */
 /*&eg  /*&eg
 \subsection{Indetermnate and Tree}  The name of a variable should be expressed by using Indeterminate.
 Indeterminate is a name of a variable.  
 v may be any sequence of bytes, but each system has its own  v may be any sequence of bytes, but each system has its own
 restrictions on the names of variables.  restrictions on the names of variables.
 Indeterminates of CMO and internal variable names must be translated  Indeterminates of CMO and internal variable names must be translated
 in one to one correspondence.  in one-to-one correspondence.
 */  */
   
   
 /*&jp  /*&jp
   \subsection{Indeterminate および Tree}
   
 \noindent  \noindent
 Group CMObject/Tree requires CMObject/Basic. \\  Group CMObject/Tree requires CMObject/Basic. \\
 Tree, Lambda $\in$ CMObject/Basic. \\  Tree, Lambda $\in$ CMObject/Tree. \\
 \begin{eqnarray*}  \begin{eqnarray*}
 \mbox{Tree}        &:& ({\tt CMO\_TREE}, {\sl Cstring}\, {\rm name},  \mbox{Tree}        &:& ({\tt CMO\_TREE}, {\sl Cstring}\, {\rm name},
  {\sl List}\, {\rm attributes}, {\sl List}\, {\rm leaves}) \\   {\sl List}\, {\rm attributes}, {\sl List}\, {\rm leaves}) \\
Line 137  Tree, Lambda $\in$ CMObject/Basic. \\
Line 142  Tree, Lambda $\in$ CMObject/Basic. \\
 \mbox{Lambda}        &:& ({\tt CMO\_LAMBDA}, {\sl List}\, {\rm args},  \mbox{Lambda}        &:& ({\tt CMO\_LAMBDA}, {\sl List}\, {\rm args},
                           {\sl Tree} {\rm body}) \\                            {\sl Tree} {\rm body}) \\
 & & \mbox{ --- body を args を引数とする関数とする. } \\  & & \mbox{ --- body を args を引数とする関数とする. } \\
 & & \mbox{ --- optional な引数が必要なときは, leaves の後へつづける.} \\  
 \end{eqnarray*}  \end{eqnarray*}
 */  */
 /*&eg  /*&eg
   \subsection{Indeterminate and Tree}
   
 \noindent  \noindent
 Group CMObject/Tree requires CMObject/Basic. \\  Group CMObject/Tree requires CMObject/Basic. \\
 Tree, Lambda $\in$ CMObject/Basic. \\  Tree, Lambda $\in$ CMObject/Tree. \\
 \begin{eqnarray*}  \begin{eqnarray*}
 \mbox{Tree}        &:& ({\tt CMO\_TREE}, {\sl Cstring}\, {\rm name},  \mbox{Tree}        &:& ({\tt CMO\_TREE}, {\sl Cstring}\, {\rm name},
  {\sl List}\, {\rm attributes}, {\sl List}\, {\rm leaves}) \\   {\sl List}\, {\rm attributes}, {\sl List}\, {\rm leaves}) \\
 & & \mbox{ --- A function or a constant of name. Functions are not evaluated. } \\  & & \mbox{ --- ``name'' is the name of the node of the tree. } \\
 & & \mbox{ --- attributes may be a null list. If it is not null, it is a list of}\\  & & \mbox{ --- Attributes may be a null list. If it is not null, it is a list of}\\
 & & \mbox{ --- key and value pairs. } \\  & & \mbox{ --- key and value pairs. } \\
 \mbox{Lambda}        &:& ({\tt CMO\_LAMBDA}, {\sl List}\, {\rm args},  \mbox{Lambda}        &:& ({\tt CMO\_LAMBDA}, {\sl List}\, {\rm args},
                           {\sl Tree} {\rm body}) \\                            {\sl Tree} {\rm body}) \\
 & & \mbox{ --- a function with the arguments body. } \\  & & \mbox{ --- a function with the arguments body. } \\
 & & \mbox{ --- optional arguments come after leaves.} \\  
 \end{eqnarray*}  \end{eqnarray*}
 */  */
   
Line 207  Lisp の Lambda 表現と同じ.
Line 211  Lisp の Lambda 表現と同じ.
 */  */
 /*&eg  /*&eg
 Lambda is used to define functions.  Lambda is used to define functions.
 It is the same as the Lambda expression in Lisp.  The notion ``lambda'' is borrowed from the language Lisp.
 */  */
   
 \noindent  \noindent
Line 222  It is the same as the Lambda expression in Lisp.
Line 226  It is the same as the Lambda expression in Lisp.
             (CMO_LIST,[size=]2, (CMO_INDETERMINATE,"x"),              (CMO_LIST,[size=]2, (CMO_INDETERMINATE,"x"),
 //&jp                  (CMO_TREE,(CMO_STRING, "e"),  自然対数の底  //&jp                  (CMO_TREE,(CMO_STRING, "e"),  自然対数の底
 //&eg                  (CMO_TREE,(CMO_STRING, "e"),  the base of natural logarithms  //&eg                  (CMO_TREE,(CMO_STRING, "e"),  the base of natural logarithms
                             (CMO_STRING, "basic"))      (CMO_LIST,[size=]1,(CMO_LIST,[size=]2,(CMO_STRING, "cdname"),
                                             (CMO_STRING,"basic")))
         ))          ))
     )      )
 )  )
Line 233  It is the same as the Lambda expression in Lisp.
Line 238  It is the same as the Lambda expression in Lisp.
 \noindent  \noindent
 Example:  Example:
 \begin{verbatim}  \begin{verbatim}
 sm1> [(plus) (Basic) [(123).. (345)..]] [(class) (tree)] dc ::  sm1> [(plus) [[(cdname) (basic)]] [(123).. (345)..]] [(class) (tree)] dc ::
 Class.tree [    $plus$ , $basic$ , [    123 , 345 ]  ]  Class.tree [$plus$ , [[$cdname$ , $basic$ ]], [ 123 , 345 ]  ]
 \end{verbatim}  \end{verbatim}
   
   \noindent
   Example:
   \begin{verbatim}
   asir
   [753] taka_cmo100_xml_form(quote(sin(x+1)));
   <cmo_tree>  <cmo_string>"sin"</cmo_string>
    <cmo_list><cmo_int32 for="length">1</cmo_int32>
      <cmo_list><cmo_int32 for="length">2</cmo_int32>
        <cmo_string>"cdname"</cmo_string>
        <cmo_string>"basic"</cmo_string>
      </cmo_list> </cmo_list>
   <cmo_tree>    <cmo_string>"plus"</cmo_string>
     <cmo_list><cmo_int32 for="length">1</cmo_int32>
       <cmo_list><cmo_int32 for="length">2</cmo_int32>
         <cmo_string>"cdname"</cmo_string>
         <cmo_string>"basic"</cmo_string>
       </cmo_list> </cmo_list>
    <cmo_indeterminate> <cmo_string>"x"</cmo_string>  </cmo_indeterminate>
    <cmo_zz>1</cmo_zz>
   </cmo_tree></cmo_tree>
   \end{verbatim}
   
   
 \bigbreak  \bigbreak
 //&jp 次に, 分散表現多項式に関係するグループを定義しよう.  //&jp 次に, 分散表現多項式に関係するグループを定義しよう.
 /*&eg  /*&eg
 Let us define a group for distributed polynomials. In the following  Let us define a group for distributed polynomials. In the following,
 DMS stands for Distributed Monomial System.  DMS stands for Distributed Monomial System.
 */  */
   
Line 265  $x^e = x_1^{e_1} \cdots x_n^{e_n}$ の各指数 $e_i$
Line 291  $x^e = x_1^{e_1} \cdots x_n^{e_n}$ の各指数 $e_i$
 をあらわす.} \\  をあらわす.} \\
 \mbox{Coefficient}&:& \mbox{ZZ} | \mbox{Integer32} \\  \mbox{Coefficient}&:& \mbox{ZZ} | \mbox{Integer32} \\
 \mbox{Dpolynomial}&:& \mbox{Zero} \\  \mbox{Dpolynomial}&:& \mbox{Zero} \\
 & & |\ ({\tt CMO\_DISTRIBUTED\_POLYNOMIAL},{\sl int32} m, \\  & & |\ ({\tt CMO\_DISTRIBUTED\_POLYNOMIAL},{\sl int32}\, m, \\
 & & \ \ \mbox{DringDefinition},  & & \ \ \mbox{DringDefinition},
 [\mbox{Monomial32}|\mbox{Zero}], \\  [\mbox{Monomial32}|\mbox{Zero}], \\
 & &\ \  & &\ \
Line 307  $x^e = x_1^{e_1} \cdots x_n^{e_n}$ の各指数 $e_i$
Line 333  $x^e = x_1^{e_1} \cdots x_n^{e_n}$ の各指数 $e_i$
                       $x^e = x_1^{e_1} \cdots x_n^{e_n}$. } \\                        $x^e = x_1^{e_1} \cdots x_n^{e_n}$. } \\
 \mbox{Coefficient}&:& \mbox{ZZ} | \mbox{Integer32} \\  \mbox{Coefficient}&:& \mbox{ZZ} | \mbox{Integer32} \\
 \mbox{Dpolynomial}&:& \mbox{Zero} \\  \mbox{Dpolynomial}&:& \mbox{Zero} \\
                  & & |\ ({\tt CMO\_DISTRIBUTED\_POLYNOMIAL},{\sl int32} m, \\                   & & |\ ({\tt CMO\_DISTRIBUTED\_POLYNOMIAL},{\sl int32}\, m, \\
                  & & \ \ \mbox{DringDefinition}, [\mbox{Monomial32}|\mbox{Zero}], \\                   & & \ \ \mbox{DringDefinition}, [\mbox{Monomial32}|\mbox{Zero}], \\
                  & &\ \                   & &\ \
                     \{\mbox{Monomial32}\})  \\                      \{\mbox{Monomial32}\})  \\
Line 353  are implemented on Asir and Kan.
Line 379  are implemented on Asir and Kan.
   
 \subsection{ Zero}  \subsection{ Zero}
 /*&jp  /*&jp
 CMO では ゼロの表現法がなんとおりもあるが,  CMO では ゼロの表現法がなんとおりもあることに注意.
 どのようなゼロをうけとっても,  %% どのようなゼロをうけとっても,
 システムのゼロに変換できるべきである.  %% システムのゼロに変換できるべきである.
 */  */
 /*&eg  /*&eg
 Though CMO has various representations of zero,  Note that CMO has various representations of zero.
 each representation should be translated into zero  
 in the system.  
 */  */
   
   
Line 379  GNU MPライブラリなどを参考にして設計されていて, 符号付
Line 403  GNU MPライブラリなどを参考にして設計されていて, 符号付
 plugin/cmo-gmp.c}) CMO\_ZZ は次の形式をとる.  plugin/cmo-gmp.c}) CMO\_ZZ は次の形式をとる.
 */  */
 /*&eg  /*&eg
 We describe the bignum (multi-precision integer) representation in OpenXM.  We describe the bignum (multi-precision integer) representation
 In OpenXM {\tt CMO\_ZZ} is used to represent bignum. Its design is similar  {\tt CMO\_ZZ} in OpenXM.
   The format is similar
 to that in GNU MP. (cf. {\tt plugin/cmo-gmp.c} in the {\tt kan/sm1}  to that in GNU MP. (cf. {\tt plugin/cmo-gmp.c} in the {\tt kan/sm1}
 distribution). CMO\_ZZ is defined as follows.  distribution). CMO\_ZZ is defined as follows.
 */  */
Line 402  Open xxx 規約では上の CMO は以下の整数を意味する. ($R 
Line 427  Open xxx 規約では上の CMO は以下の整数を意味する. ($R 
 /*&eg  /*&eg
 $f$ is a 32bit integer. $b_0, \ldots, b_n$ are unsigned 32bit integers.  $f$ is a 32bit integer. $b_0, \ldots, b_n$ are unsigned 32bit integers.
 $|f|$ is equal to $n+1$.  $|f|$ is equal to $n+1$.
 The sign of $f$ represents that of the above CMO. As stated in Section  The sign of $f$ represents that of the above integer to be expressed.
   As stated in Section
 \ref{sec:basic0}, a negative 32bit integer is represented by  \ref{sec:basic0}, a negative 32bit integer is represented by
 two's complement.  two's complement.
   
Line 414  In OpenXM the above CMO represents the following integ
Line 440  In OpenXM the above CMO represents the following integ
 \]  \]
   
 /*&jp  /*&jp
   \noindent  例:
 {\tt int32} を network byte order で表現  {\tt int32} を network byte order で表現
 しているとすると,例えば, 整数 $14$ は CMO\_ZZ で表わすと,  しているとすると,例えば, 整数 $14$ は CMO\_ZZ で表わすと,
 */  */
 /*&eg  /*&eg
   \noindent Example:
 If we express {\tt int32} by the network byte order,  If we express {\tt int32} by the network byte order,
 a CMO\_ZZ $14$ is expressed by  a CMO\_ZZ $14$ is expressed by
 */  */
Line 474  Ring by Name を用いた場合, 現在の名前空間で変数 yyy に
Line 502  Ring by Name を用いた場合, 現在の名前空間で変数 yyy に
 We treat polynomial rings and their elements as follows.  We treat polynomial rings and their elements as follows.
   
 Generic DMS ring is an $n$-variate polynomial ring $K[x_1, \ldots, x_n]$,  Generic DMS ring is an $n$-variate polynomial ring $K[x_1, \ldots, x_n]$,
 where $K$ is some coefficient set. $K$ is unknown in advance  where $K$ is a coefficient set. $K$ is unknown in advance
 and it is determined when coefficients of an element are received.  and it is determined when coefficients of an element are received.
 When a server has received an element in Generic DMS ring,  When a server has received an element in Generic DMS ring,
 the server has to translate it into the corresponding local object  the server has to translate it into the corresponding local object
Line 485  In {\tt kan/sm1} things are complicated.
Line 513  In {\tt kan/sm1} things are complicated.
 {\tt kan/sm1} translates a DMS of N variables into an element of  {\tt kan/sm1} translates a DMS of N variables into an element of
 the CurrentRing.  the CurrentRing.
 If the CurrentRing is $n'$-variate and $n' < n$, then  If the CurrentRing is $n'$-variate and $n' < n$, then
 an $n$-variate polynomial ring is newly created. Optional informations such as  an $n$-variate polynomial ring is newly created.
 the term order are all ignored.  
   
   
 If RingByName ({\tt CMO\_RING\_BY\_NAME}, yyy)  If RingByName ({\tt CMO\_RING\_BY\_NAME}, yyy)
 is specified as the second field of DMS,  is specified as the second field of DMS,
 it requests a sever to use a ring object whose name is yyy  it requests a sever to use a ring object whose name is yyy
 as the destination ring for the translation.  as the destination ring for the translation.
 This is done in {\tt kan/sm1}.  
 */  */
   
 \medbreak \noindent  \medbreak \noindent
Line 542  $\in$ CMObject/RecursivePolynomial \\
Line 569  $\in$ CMObject/RecursivePolynomial \\
 \mbox{Polynomial in 1 variable} &:&  \mbox{Polynomial in 1 variable} &:&
 \mbox{({\tt CMO\_POLYNOMIAL\_IN\_ONE\_VARIABLE},\, {\sl int32}\, m, } \\  \mbox{({\tt CMO\_POLYNOMIAL\_IN\_ONE\_VARIABLE},\, {\sl int32}\, m, } \\
 & & \quad \mbox{ Name of the main variable }, \\  & & \quad \mbox{ Name of the main variable }, \\
 & & \quad \mbox{ \{ {\sl int32} e, Coefficient \}} \\  & & \quad \mbox{ \{ {\sl int32} e, Coefficient \}} ) \\
 & & \mbox{ --- m はモノミアルの個数. } \\  & & \mbox{ --- m はモノミアルの個数. } \\
 & & \mbox{ --- e, Coefficieint はモノミアルを表現している. } \\  & & \mbox{ --- e, Coefficieint はモノミアルを表現している. } \\
 & & \mbox{ --- 順序の高い順にならべる. 普通は巾の高い順.} \\  & & \mbox{ --- 順序の高い順にならべる. 普通は巾の高い順.} \\
Line 558  $\in$ CMObject/RecursivePolynomial \\
Line 585  $\in$ CMObject/RecursivePolynomial \\
 \mbox{ ( {\tt CMO\_RECURSIVE\_POLYNOMIAL}, } \\  \mbox{ ( {\tt CMO\_RECURSIVE\_POLYNOMIAL}, } \\
 & & \quad \mbox{ RringDefinition, } \\  & & \quad \mbox{ RringDefinition, } \\
 & & \quad  & & \quad
 \mbox{ Polynomial in 1 variable}\, | \, \mbox{Coefficient}   \\  \mbox{ Polynomial in 1 variable}\, | \, \mbox{Coefficient} )  \\
 \mbox{RringDefinition}  \mbox{RringDefinition}
 & : &  \mbox{ {\sl List} v } \\  & : &  \mbox{ {\sl List} v } \\
 & & \quad \mbox{ --- v は, 変数名(indeterminate) または Tree のリスト. } \\  & & \quad \mbox{ --- v は, 変数名(indeterminate) または Tree のリスト. } \\
Line 570  $\in$ CMObject/RecursivePolynomial \\
Line 597  $\in$ CMObject/RecursivePolynomial \\
 \mbox{Polynomial in 1 variable} &:&  \mbox{Polynomial in 1 variable} &:&
 \mbox{({\tt CMO\_POLYNOMIAL\_IN\_ONE\_VARIABLE},\, {\sl int32}\, m, } \\  \mbox{({\tt CMO\_POLYNOMIAL\_IN\_ONE\_VARIABLE},\, {\sl int32}\, m, } \\
 & & \quad \mbox{ Name of the main variable }, \\  & & \quad \mbox{ Name of the main variable }, \\
 & & \quad \mbox{ \{ {\sl int32} e, Coefficient \}} \\  & & \quad \mbox{ \{ {\sl int32} e, Coefficient \}} ) \\
 & & \mbox{ --- m is the number of monomials. } \\  & & \mbox{ --- m is the number of monomials. } \\
 & & \mbox{ --- A pair of e and Coefficient represents a monomial. } \\  & & \mbox{ --- A pair of e and Coefficient represents a monomial. } \\
 & & \mbox{ --- The pairs of e and Coefficient are sorted in the } \\  & & \mbox{ --- The pairs of e and Coefficient are sorted in the } \\
Line 588  $\in$ CMObject/RecursivePolynomial \\
Line 615  $\in$ CMObject/RecursivePolynomial \\
 \mbox{ ( {\tt CMO\_RECURSIVE\_POLYNOMIAL}, } \\  \mbox{ ( {\tt CMO\_RECURSIVE\_POLYNOMIAL}, } \\
 & & \quad \mbox{ RringDefinition, } \\  & & \quad \mbox{ RringDefinition, } \\
 & & \quad  & & \quad
 \mbox{ Polynomial in 1 variable}\, | \, \mbox{Coefficient}   \\  \mbox{ Polynomial in 1 variable}\, | \, \mbox{Coefficient} )  \\
 \mbox{RringDefinition}  \mbox{RringDefinition}
 & : &  \mbox{ {\sl List} v } \\  & : &  \mbox{ {\sl List} v } \\
 & & \quad \mbox{ --- v is a list of names of indeterminates or trees. } \\  & & \quad \mbox{ --- v is a list of names of indeterminates or trees. } \\
Line 613  Example:
Line 640  Example:
 $$   x^3 (1234 y^5 + 17 ) +  x^1 (y^{10} + 31 y^5)  $$  $$   x^3 (1234 y^5 + 17 ) +  x^1 (y^{10} + 31 y^5)  $$
 /*&jp  /*&jp
 をあらわす.  をあらわす.
 非可換多項式もこの形式であらわしたいので, 積の順序を上のように  %%非可換多項式もこの形式であらわしたいので, 積の順序を上のように
 すること. つまり, 主変数かける係数の順番.  %%すること. つまり, 主変数かける係数の順番.
 */  */
 /*&eg  /*&eg
 We intend to represent non-commutative polynomials with the  %%We intend to represent non-commutative polynomials with the
 same form. In such a case, the order of products are defined  %%same form. In such a case, the order of products are defined
 as above, that is a power of the main variable $\times$ a coeffcient.  %%as above, that is a power of the main variable $\times$ a coeffcient.
   
 */  */
   
 \noindent  \noindent
Line 650  $\in$ CMObject/MachineDouble \\
Line 678  $\in$ CMObject/MachineDouble \\
 \begin{eqnarray*}  \begin{eqnarray*}
 \mbox{64bit machine double} &:&  \mbox{64bit machine double} &:&
 \mbox{({\tt CMO\_64BIT\_MACHINE\_DOUBLE}, } \\  \mbox{({\tt CMO\_64BIT\_MACHINE\_DOUBLE}, } \\
 & & \quad \mbox{ {\sl byte} s1 , \ldots , {\sl byte}} s8)\\  & & \quad \mbox{ {\sl byte} s1 , \ldots , {\sl byte} s8})\\
 & & \mbox{ --- s1, $\ldots$, s8 は {\tt double} (64bit). } \\  & & \mbox{ --- s1, $\ldots$, s8 は {\tt double} (64bit). } \\
 & & \mbox{ --- この表現はCPU依存である.}\\  & & \mbox{ --- この表現はCPU依存である.}\\
 &&  \mbox{\quad\quad mathcap に CPU 情報を付加しておく.} \\  &&  \mbox{\quad\quad mathcap に CPU 情報を付加しておく.} \\
Line 662  $\in$ CMObject/MachineDouble \\
Line 690  $\in$ CMObject/MachineDouble \\
 & & \mbox{ \quad\quad mathcap に CPU 情報を付加しておく.} \\  & & \mbox{ \quad\quad mathcap に CPU 情報を付加しておく.} \\
 \mbox{128bit machine double} &:&  \mbox{128bit machine double} &:&
 \mbox{({\tt CMO\_128BIT\_MACHINE\_DOUBLE}, } \\  \mbox{({\tt CMO\_128BIT\_MACHINE\_DOUBLE}, } \\
 & & \quad \mbox{ {\sl byte} s1 , \ldots , {\sl byte}} s16)\\  & & \quad \mbox{ {\sl byte} s1 , \ldots , {\sl byte} s16})\\
 & & \mbox{ --- s1, $\ldots$, s16 は {\tt long double} (128bit). } \\  & & \mbox{ --- s1, $\ldots$, s16 は {\tt long double} (128bit). } \\
 & & \mbox{ --- この表現はCPU依存である.}\\  & & \mbox{ --- この表現はCPU依存である.}\\
 &&  \mbox{\quad\quad mathcap に CPU 情報を付加しておく.} \\  &&  \mbox{\quad\quad mathcap に CPU 情報を付加しておく.} \\
 \mbox{Array of 128bit machine double} &:&  \mbox{Array of 128bit machine double} &:&
 \mbox{({\tt CMO\_ARRAY\_OF\_128BIT\_MACHINE\_DOUBLE}, {\sl int32} m, } \\  \mbox{({\tt CMO\_ARRAY\_OF\_128BIT\_MACHINE\_DOUBLE}, {\sl int32} m, } \\
 & & \quad \mbox{ {\sl byte} s1[1] , \ldots , {\sl byte}} s16[1], \ldots , {\sl byte} s16[m])\\  & & \quad \mbox{ {\sl byte} s1[1] , \ldots , {\sl byte} s16[1], \ldots , {\sl byte} s16[m]})\\
 & & \mbox{ --- s*[1], $\ldots$ s*[m] は m 個の long double (128bit) である. } \\  & & \mbox{ --- s*[1], $\ldots$ s*[m] は m 個の long double (128bit) である. } \\
 & & \mbox{ --- この表現はCPU依存である.}\\  & & \mbox{ --- この表現はCPU依存である.}\\
 & & \mbox{ \quad\quad mathcap に CPU 情報を付加しておく.}  & & \mbox{ \quad\quad mathcap に CPU 情報を付加しておく.}
Line 678  $\in$ CMObject/MachineDouble \\
Line 706  $\in$ CMObject/MachineDouble \\
 \begin{eqnarray*}  \begin{eqnarray*}
 \mbox{64bit machine double} &:&  \mbox{64bit machine double} &:&
 \mbox{({\tt CMO\_64BIT\_MACHINE\_DOUBLE}, } \\  \mbox{({\tt CMO\_64BIT\_MACHINE\_DOUBLE}, } \\
 & & \quad \mbox{ {\sl byte} s1 , \ldots , {\sl byte}} s8)\\  & & \quad \mbox{ {\sl byte} s1 , \ldots , {\sl byte} s8})\\
 & & \mbox{ --- s1, $\ldots$, s8 は {\tt double} (64bit). } \\  & & \mbox{ --- s1, $\ldots$, s8 は {\tt double} (64bit). } \\
 & & \mbox{ --- This depends on CPU.}\\  & & \mbox{ --- Encoding depends on CPU.}\\
 &&  \mbox{\quad\quad Add informations on CPU to the mathcap.} \\  &&  \mbox{\quad\quad Add informations on CPU to the mathcap.} \\
 \mbox{Array of 64bit machine double} &:&  \mbox{Array of 64bit machine double} &:&
 \mbox{({\tt CMO\_ARRAY\_OF\_64BIT\_MACHINE\_DOUBLE}, {\sl int32} m, } \\  \mbox{({\tt CMO\_ARRAY\_OF\_64BIT\_MACHINE\_DOUBLE}, {\sl int32} m, } \\
 & & \quad \mbox{ {\sl byte} s1[1] , \ldots , {\sl byte}}\, s8[1], \ldots , {\sl byte}\, s8[m])\\  & & \quad \mbox{ {\sl byte} s1[1] , \ldots , {\sl byte}}\, s8[1], \ldots , {\sl byte}\, s8[m])\\
 & & \mbox{ --- s*[1], $\ldots$ s*[m] are 64bit double's. } \\  & & \mbox{ --- s*[1], $\ldots$ s*[m] are 64bit double's. } \\
 & & \mbox{ --- This depends on CPU.}\\  & & \mbox{ --- Encoding depends on CPU.}\\
 & & \mbox{\quad\quad Add informations on CPU to the mathcap.} \\  & & \mbox{\quad\quad Add informations on CPU to the mathcap.} \\
 \mbox{128bit machine double} &:&  \mbox{128bit machine double} &:&
 \mbox{({\tt CMO\_128BIT\_MACHINE\_DOUBLE}, } \\  \mbox{({\tt CMO\_128BIT\_MACHINE\_DOUBLE}, } \\
 & & \quad \mbox{ {\sl byte} s1 , \ldots , {\sl byte}} s16)\\  & & \quad \mbox{ {\sl byte} s1 , \ldots , {\sl byte} s16})\\
 & & \mbox{ --- s1, $\ldots$, s16 は {\tt long double} (128bit). } \\  & & \mbox{ --- s1, $\ldots$, s16 は {\tt long double} (128bit). } \\
 & & \mbox{ --- This depends on CPU.}\\  & & \mbox{ --- Encoding depends on CPU.}\\
 & & \mbox{\quad\quad Add informations on CPU to the mathcap.} \\  & & \mbox{\quad\quad Add informations on CPU to the mathcap.} \\
 \mbox{Array of 128bit machine double} &:&  \mbox{Array of 128bit machine double} &:&
 \mbox{({\tt CMO\_ARRAY\_OF\_128BIT\_MACHINE\_DOUBLE}, {\sl int32} m, } \\  \mbox{({\tt CMO\_ARRAY\_OF\_128BIT\_MACHINE\_DOUBLE}, {\sl int32} m, } \\
 & & \quad \mbox{ {\sl byte} s1[1] , \ldots , {\sl byte}} s16[1], \ldots , {\sl byte} s16[m])\\  & & \quad \mbox{ {\sl byte} s1[1] , \ldots , {\sl byte} s16[1], \ldots , {\sl byte} s16[m]})\\
 & & \mbox{ --- s*[1], $\ldots$ s*[m] are 128bit long double's. } \\  & & \mbox{ --- s*[1], $\ldots$ s*[m] are 128bit long double's. } \\
 & & \mbox{ --- This depends on CPU.}\\  & & \mbox{ --- Encoding depends on CPU.}\\
 & & \mbox{\quad\quad Add informations on CPU to the mathcap.} \\  & & \mbox{\quad\quad Add informations on CPU to the mathcap.} \\
 \end{eqnarray*}  \end{eqnarray*}
 */  */
   
 \bigbreak  \bigbreak
 //&jp 次に IEEE 準拠の float および Big float を定義しよう.  
 //&eg We define float and big float conforming to the IEEE standard.  
 \begin{verbatim}  \begin{verbatim}
 #define CMO_BIGFLOAT   50  #define CMO_BIGFLOAT   50
 #define CMO_IEEE_DOUBLE_FLOAT 51  #define CMO_IEEE_DOUBLE_FLOAT 51
Line 717  format (64 bit) の定義を見よ.
Line 744  format (64 bit) の定義を見よ.
 */  */
 /*&eg  /*&eg
 See IEEE 754 double precision floating-point (64 bit) for the details of  See IEEE 754 double precision floating-point (64 bit) for the details of
 float conforming to the IEEE standard.  float compliant to the IEEE standard.
 */  */
   
 \noindent  \noindent
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>