/[gcl]/gcl/o/gmp_num_log.c
ViewVC logotype

Diff of /gcl/o/gmp_num_log.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by camm, Sat Jul 20 07:10:55 2002 UTC revision 1.4 by camm, Thu Dec 19 04:12:39 2002 UTC
# Line 72  mp_nand_op(__mpz_struct *u, __mpz_struct Line 72  mp_nand_op(__mpz_struct *u, __mpz_struct
72  void  void
73  mp_nor_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)  mp_nor_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)
74  {  {
75       mpz_ior(u,u,j);  /*      mpz_ior(u,u,j); */
76       mpz_com(u,i);  /*      mpz_com(u,i); */
77         mpz_ior(u,i,j);
78         mpz_com(u,u);
79       /* (~(i | j)); */       /* (~(i | j)); */
80  }  }
81    
82  void  void
83  mp_andc1_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)  mp_andc1_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)
84  {  {
85       mpz_com(u,i);       mpz_com(i,i);
86       mpz_and(u,u,j);       mpz_and(u,i,j);
87          /* ((~i) & j); */          /* ((~i) & j); */
88  }  }
89    
90  void  void
91  mp_andc2_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)  mp_andc2_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)
92  {  {
93        mpz_com(u,j);        mpz_com(j,j);
94        mpz_and(u,u,i);        mpz_and(u,i,j);
95          /* (i & (~j));*/          /* (i & (~j));*/
96  }  }
97    
98  void  void
99  mp_orc1_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)  mp_orc1_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)
100  {  {
101     mpz_com(u,i);     mpz_com(i,i);
102     mpz_ior(u,u,j);     mpz_ior(u,i,j);
103  /*      ((~i) | j); */  /*      ((~i) | j); */
104  }  }
105    
106  void  void
107  mp_orc2_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)  mp_orc2_op(__mpz_struct *u, __mpz_struct *i, __mpz_struct *j)
108  {  {
109      mpz_com(u,j);      mpz_com(j,j);
110      mpz_ior(u,u,i);      mpz_ior(u,i,j);
111          /* (i | (~j)); */          /* (i | (~j)); */
112  }  }
113    

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26