1/* Definitions for GNU multiple precision functions.   -*- mode: c -*-
2
3Copyright 1991, 1993, 1994, 1995, 1996, 1997, 1999, 2000, 2001, 2002, 2003,
42004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012 Free Software Foundation,
5Inc.
6
7This file is part of the GNU MP Library.
8
9The GNU MP Library is free software; you can redistribute it and/or modify
10it under the terms of the GNU Lesser General Public License as published by
11the Free Software Foundation; either version 3 of the License, or (at your
12option) any later version.
13
14The GNU MP Library is distributed in the hope that it will be useful, but
15WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
16or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
17License for more details.
18
19You should have received a copy of the GNU Lesser General Public License
20along with the GNU MP Library.  If not, see http://www.gnu.org/licenses/.  */
21
22#ifndef __GMP_H__
23
24#if defined (__cplusplus)
25#include <iosfwd>   /* for std::istream, std::ostream, std::string */
26#include <cstdio>
27#endif
28
29
30/* Instantiated by configure. */
31#if ! defined (__GMP_WITHIN_CONFIGURE)
32#define __GMP_HAVE_HOST_CPU_FAMILY_power   @HAVE_HOST_CPU_FAMILY_power@
33#define __GMP_HAVE_HOST_CPU_FAMILY_powerpc @HAVE_HOST_CPU_FAMILY_powerpc@
34#define GMP_LIMB_BITS                      @GMP_LIMB_BITS@
35#define GMP_NAIL_BITS                      @GMP_NAIL_BITS@
36#endif
37#define GMP_NUMB_BITS     (GMP_LIMB_BITS - GMP_NAIL_BITS)
38#define GMP_NUMB_MASK     ((~ __GMP_CAST (mp_limb_t, 0)) >> GMP_NAIL_BITS)
39#define GMP_NUMB_MAX      GMP_NUMB_MASK
40#define GMP_NAIL_MASK     (~ GMP_NUMB_MASK)
41
42
43/* The following (everything under ifndef __GNU_MP__) must be identical in
44   gmp.h and mp.h to allow both to be included in an application or during
45   the library build.  */
46#ifndef __GNU_MP__
47#define __GNU_MP__ 5
48
49#define __need_size_t  /* tell gcc stddef.h we only want size_t */
50#if defined (__cplusplus)
51#include <cstddef>     /* for size_t */
52#else
53#include <stddef.h>    /* for size_t */
54#endif
55#undef __need_size_t
56
57/* Instantiated by configure. */
58#if ! defined (__GMP_WITHIN_CONFIGURE)
59@DEFN_LONG_LONG_LIMB@
60#define __GMP_LIBGMP_DLL  @LIBGMP_DLL@
61#endif
62
63
64/* __STDC__ - some ANSI compilers define this only to 0, hence the use of
65       "defined" and not "__STDC__-0".  In particular Sun workshop C 5.0
66       sets __STDC__ to 0, but requires "##" for token pasting.
67
68   _AIX - gnu ansidecl.h asserts that all known AIX compilers are ANSI but
69       don't always define __STDC__.
70
71   __DECC - current versions of DEC C (5.9 for instance) for alpha are ANSI,
72       but don't define __STDC__ in their default mode.  Don't know if old
73       versions might have been K&R, but let's not worry about that unless
74       someone is still using one.
75
76   _mips - gnu ansidecl.h says the RISC/OS MIPS compiler is ANSI in SVR4
77       mode, but doesn't define __STDC__.
78
79   _MSC_VER - Microsoft C is ANSI, but __STDC__ is undefined unless the /Za
80       option is given (in which case it's 1).
81
82   _WIN32 - tested for by gnu ansidecl.h, no doubt on the assumption that
83      all w32 compilers are ansi.
84
85   Note: This same set of tests is used by gen-psqr.c and
86   demos/expr/expr-impl.h, so if anything needs adding, then be sure to
87   update those too.  */
88
89#if  defined (__STDC__)                                 \
90  || defined (__cplusplus)                              \
91  || defined (_AIX)                                     \
92  || defined (__DECC)                                   \
93  || (defined (__mips) && defined (_SYSTYPE_SVR4))      \
94  || defined (_MSC_VER)                                 \
95  || defined (_WIN32)
96#define __GMP_HAVE_CONST        1
97#define __GMP_HAVE_PROTOTYPES   1
98#define __GMP_HAVE_TOKEN_PASTE  1
99#else
100#define __GMP_HAVE_CONST        0
101#define __GMP_HAVE_PROTOTYPES   0
102#define __GMP_HAVE_TOKEN_PASTE  0
103#endif
104
105
106#if __GMP_HAVE_CONST
107#define __gmp_const   const
108#define __gmp_signed  signed
109#else
110#define __gmp_const
111#define __gmp_signed
112#endif
113
114
115/* __GMP_DECLSPEC supports Windows DLL versions of libgmp, and is empty in
116   all other circumstances.
117
118   When compiling objects for libgmp, __GMP_DECLSPEC is an export directive,
119   or when compiling for an application it's an import directive.  The two
120   cases are differentiated by __GMP_WITHIN_GMP defined by the GMP Makefiles
121   (and not defined from an application).
122
123   __GMP_DECLSPEC_XX is similarly used for libgmpxx.  __GMP_WITHIN_GMPXX
124   indicates when building libgmpxx, and in that case libgmpxx functions are
125   exports, but libgmp functions which might get called are imports.
126
127   Libtool DLL_EXPORT define is not used.
128
129   There's no attempt to support GMP built both static and DLL.  Doing so
130   would mean applications would have to tell us which of the two is going
131   to be used when linking, and that seems very tedious and error prone if
132   using GMP by hand, and equally tedious from a package since autoconf and
133   automake don't give much help.
134
135   __GMP_DECLSPEC is required on all documented global functions and
136   variables, the various internals in gmp-impl.h etc can be left unadorned.
137   But internals used by the test programs or speed measuring programs
138   should have __GMP_DECLSPEC, and certainly constants or variables must
139   have it or the wrong address will be resolved.
140
141   In gcc __declspec can go at either the start or end of a prototype.
142
143   In Microsoft C __declspec must go at the start, or after the type like
144   void __declspec(...) *foo()".  There's no __dllexport or anything to
145   guard against someone foolish #defining dllexport.  _export used to be
146   available, but no longer.
147
148   In Borland C _export still exists, but needs to go after the type, like
149   "void _export foo();".  Would have to change the __GMP_DECLSPEC syntax to
150   make use of that.  Probably more trouble than it's worth.  */
151
152#if defined (__GNUC__)
153#define __GMP_DECLSPEC_EXPORT  __declspec(__dllexport__)
154#define __GMP_DECLSPEC_IMPORT  __declspec(__dllimport__)
155#endif
156#if defined (_MSC_VER) || defined (__BORLANDC__)
157#define __GMP_DECLSPEC_EXPORT  __declspec(dllexport)
158#define __GMP_DECLSPEC_IMPORT  __declspec(dllimport)
159#endif
160#ifdef __WATCOMC__
161#define __GMP_DECLSPEC_EXPORT  __export
162#define __GMP_DECLSPEC_IMPORT  __import
163#endif
164#ifdef __IBMC__
165#define __GMP_DECLSPEC_EXPORT  _Export
166#define __GMP_DECLSPEC_IMPORT  _Import
167#endif
168
169#if __GMP_LIBGMP_DLL
170#if __GMP_WITHIN_GMP
171/* compiling to go into a DLL libgmp */
172#define __GMP_DECLSPEC  __GMP_DECLSPEC_EXPORT
173#else
174/* compiling to go into an application which will link to a DLL libgmp */
175#define __GMP_DECLSPEC  __GMP_DECLSPEC_IMPORT
176#endif
177#else
178/* all other cases */
179#define __GMP_DECLSPEC
180#endif
181
182
183#ifdef __GMP_SHORT_LIMB
184typedef unsigned int		mp_limb_t;
185typedef int			mp_limb_signed_t;
186#else
187#ifdef _LONG_LONG_LIMB
188typedef unsigned long long int	mp_limb_t;
189typedef long long int		mp_limb_signed_t;
190#else
191typedef unsigned long int	mp_limb_t;
192typedef long int		mp_limb_signed_t;
193#endif
194#endif
195typedef unsigned long int	mp_bitcnt_t;
196
197/* For reference, note that the name __mpz_struct gets into C++ mangled
198   function names, which means although the "__" suggests an internal, we
199   must leave this name for binary compatibility.  */
200typedef struct
201{
202  int _mp_alloc;		/* Number of *limbs* allocated and pointed
203				   to by the _mp_d field.  */
204  int _mp_size;			/* abs(_mp_size) is the number of limbs the
205				   last field points to.  If _mp_size is
206				   negative this is a negative number.  */
207  mp_limb_t *_mp_d;		/* Pointer to the limbs.  */
208} __mpz_struct;
209
210#endif /* __GNU_MP__ */
211
212
213typedef __mpz_struct MP_INT;    /* gmp 1 source compatibility */
214typedef __mpz_struct mpz_t[1];
215
216typedef mp_limb_t *		mp_ptr;
217typedef __gmp_const mp_limb_t *	mp_srcptr;
218#if defined (_CRAY) && ! defined (_CRAYMPP)
219/* plain `int' is much faster (48 bits) */
220#define __GMP_MP_SIZE_T_INT     1
221typedef int			mp_size_t;
222typedef int			mp_exp_t;
223#else
224#define __GMP_MP_SIZE_T_INT     0
225typedef long int		mp_size_t;
226typedef long int		mp_exp_t;
227#endif
228
229typedef struct
230{
231  __mpz_struct _mp_num;
232  __mpz_struct _mp_den;
233} __mpq_struct;
234
235typedef __mpq_struct MP_RAT;    /* gmp 1 source compatibility */
236typedef __mpq_struct mpq_t[1];
237
238typedef struct
239{
240  int _mp_prec;			/* Max precision, in number of `mp_limb_t's.
241				   Set by mpf_init and modified by
242				   mpf_set_prec.  The area pointed to by the
243				   _mp_d field contains `prec' + 1 limbs.  */
244  int _mp_size;			/* abs(_mp_size) is the number of limbs the
245				   last field points to.  If _mp_size is
246				   negative this is a negative number.  */
247  mp_exp_t _mp_exp;		/* Exponent, in the base of `mp_limb_t'.  */
248  mp_limb_t *_mp_d;		/* Pointer to the limbs.  */
249} __mpf_struct;
250
251/* typedef __mpf_struct MP_FLOAT; */
252typedef __mpf_struct mpf_t[1];
253
254/* Available random number generation algorithms.  */
255typedef enum
256{
257  GMP_RAND_ALG_DEFAULT = 0,
258  GMP_RAND_ALG_LC = GMP_RAND_ALG_DEFAULT /* Linear congruential.  */
259} gmp_randalg_t;
260
261/* Random state struct.  */
262typedef struct
263{
264  mpz_t _mp_seed;	  /* _mp_d member points to state of the generator. */
265  gmp_randalg_t _mp_alg;  /* Currently unused. */
266  union {
267    void *_mp_lc;         /* Pointer to function pointers structure.  */
268  } _mp_algdata;
269} __gmp_randstate_struct;
270typedef __gmp_randstate_struct gmp_randstate_t[1];
271
272/* Types for function declarations in gmp files.  */
273/* ??? Should not pollute user name space with these ??? */
274typedef __gmp_const __mpz_struct *mpz_srcptr;
275typedef __mpz_struct *mpz_ptr;
276typedef __gmp_const __mpf_struct *mpf_srcptr;
277typedef __mpf_struct *mpf_ptr;
278typedef __gmp_const __mpq_struct *mpq_srcptr;
279typedef __mpq_struct *mpq_ptr;
280
281
282/* This is not wanted in mp.h, so put it outside the __GNU_MP__ common
283   section. */
284#if __GMP_LIBGMP_DLL
285#if __GMP_WITHIN_GMPXX
286/* compiling to go into a DLL libgmpxx */
287#define __GMP_DECLSPEC_XX  __GMP_DECLSPEC_EXPORT
288#else
289/* compiling to go into a application which will link to a DLL libgmpxx */
290#define __GMP_DECLSPEC_XX  __GMP_DECLSPEC_IMPORT
291#endif
292#else
293/* all other cases */
294#define __GMP_DECLSPEC_XX
295#endif
296
297
298#if __GMP_HAVE_PROTOTYPES
299#define __GMP_PROTO(x) x
300#else
301#define __GMP_PROTO(x) ()
302#endif
303
304#ifndef __MPN
305#if __GMP_HAVE_TOKEN_PASTE
306#define __MPN(x) __gmpn_##x
307#else
308#define __MPN(x) __gmpn_/**/x
309#endif
310#endif
311
312/* For reference, "defined(EOF)" cannot be used here.  In g++ 2.95.4,
313   <iostream> defines EOF but not FILE.  */
314#if defined (FILE)                                              \
315  || defined (H_STDIO)                                          \
316  || defined (_H_STDIO)               /* AIX */                 \
317  || defined (_STDIO_H)               /* glibc, Sun, SCO */     \
318  || defined (_STDIO_H_)              /* BSD, OSF */            \
319  || defined (__STDIO_H)              /* Borland */             \
320  || defined (__STDIO_H__)            /* IRIX */                \
321  || defined (_STDIO_INCLUDED)        /* HPUX */                \
322  || defined (__dj_include_stdio_h_)  /* DJGPP */               \
323  || defined (_FILE_DEFINED)          /* Microsoft */           \
324  || defined (__STDIO__)              /* Apple MPW MrC */       \
325  || defined (_MSL_STDIO_H)           /* Metrowerks */          \
326  || defined (_STDIO_H_INCLUDED)      /* QNX4 */		\
327  || defined (_ISO_STDIO_ISO_H)       /* Sun C++ */		\
328  || defined (__STDIO_LOADED)         /* VMS */
329#define _GMP_H_HAVE_FILE 1
330#endif
331
332/* In ISO C, if a prototype involving "struct obstack *" is given without
333   that structure defined, then the struct is scoped down to just the
334   prototype, causing a conflict if it's subsequently defined for real.  So
335   only give prototypes if we've got obstack.h.  */
336#if defined (_OBSTACK_H)   /* glibc <obstack.h> */
337#define _GMP_H_HAVE_OBSTACK 1
338#endif
339
340/* The prototypes for gmp_vprintf etc are provided only if va_list is
341   available, via an application having included <stdarg.h> or <varargs.h>.
342   Usually va_list is a typedef so can't be tested directly, but C99
343   specifies that va_start is a macro (and it was normally a macro on past
344   systems too), so look for that.
345
346   <stdio.h> will define some sort of va_list for vprintf and vfprintf, but
347   let's not bother trying to use that since it's not standard and since
348   application uses for gmp_vprintf etc will almost certainly require the
349   whole <stdarg.h> or <varargs.h> anyway.  */
350
351#ifdef va_start
352#define _GMP_H_HAVE_VA_LIST 1
353#endif
354
355/* Test for gcc >= maj.min, as per __GNUC_PREREQ in glibc */
356#if defined (__GNUC__) && defined (__GNUC_MINOR__)
357#define __GMP_GNUC_PREREQ(maj, min) \
358  ((__GNUC__ << 16) + __GNUC_MINOR__ >= ((maj) << 16) + (min))
359#else
360#define __GMP_GNUC_PREREQ(maj, min)  0
361#endif
362
363/* "pure" is in gcc 2.96 and up, see "(gcc)Function Attributes".  Basically
364   it means a function does nothing but examine its arguments and memory
365   (global or via arguments) to generate a return value, but changes nothing
366   and has no side-effects.  __GMP_NO_ATTRIBUTE_CONST_PURE lets
367   tune/common.c etc turn this off when trying to write timing loops.  */
368#if __GMP_GNUC_PREREQ (2,96) && ! defined (__GMP_NO_ATTRIBUTE_CONST_PURE)
369#define __GMP_ATTRIBUTE_PURE   __attribute__ ((__pure__))
370#else
371#define __GMP_ATTRIBUTE_PURE
372#endif
373
374
375/* __GMP_CAST allows us to use static_cast in C++, so our macros are clean
376   to "g++ -Wold-style-cast".
377
378   Casts in "extern inline" code within an extern "C" block don't induce
379   these warnings, so __GMP_CAST only needs to be used on documented
380   macros.  */
381
382#ifdef __cplusplus
383#define __GMP_CAST(type, expr)  (static_cast<type> (expr))
384#else
385#define __GMP_CAST(type, expr)  ((type) (expr))
386#endif
387
388
389/* An empty "throw ()" means the function doesn't throw any C++ exceptions,
390   this can save some stack frame info in applications.
391
392   Currently it's given only on functions which never divide-by-zero etc,
393   don't allocate memory, and are expected to never need to allocate memory.
394   This leaves open the possibility of a C++ throw from a future GMP
395   exceptions scheme.
396
397   mpz_set_ui etc are omitted to leave open the lazy allocation scheme
398   described in doc/tasks.html.  mpz_get_d etc are omitted to leave open
399   exceptions for float overflows.
400
401   Note that __GMP_NOTHROW must be given on any inlines the same as on their
402   prototypes (for g++ at least, where they're used together).  Note also
403   that g++ 3.0 demands that __GMP_NOTHROW is before other attributes like
404   __GMP_ATTRIBUTE_PURE.  */
405
406#if defined (__cplusplus)
407#define __GMP_NOTHROW  throw ()
408#else
409#define __GMP_NOTHROW
410#endif
411
412
413/* PORTME: What other compilers have a useful "extern inline"?  "static
414   inline" would be an acceptable substitute if the compiler (or linker)
415   discards unused statics.  */
416
417 /* gcc has __inline__ in all modes, including strict ansi.  Give a prototype
418    for an inline too, so as to correctly specify "dllimport" on windows, in
419    case the function is called rather than inlined.
420    GCC 4.3 and above with -std=c99 or -std=gnu99 implements ISO C99
421    inline semantics, unless -fgnu89-inline is used.  */
422#ifdef __GNUC__
423#if (defined __GNUC_STDC_INLINE__) || (__GNUC__ == 4 && __GNUC_MINOR__ == 2)
424#define __GMP_EXTERN_INLINE extern __inline__ __attribute__ ((__gnu_inline__))
425#else
426#define __GMP_EXTERN_INLINE      extern __inline__
427#endif
428#define __GMP_INLINE_PROTOTYPES  1
429#endif
430
431/* DEC C (eg. version 5.9) supports "static __inline foo()", even in -std1
432   strict ANSI mode.  Inlining is done even when not optimizing (ie. -O0
433   mode, which is the default), but an unnecessary local copy of foo is
434   emitted unless -O is used.  "extern __inline" is accepted, but the
435   "extern" appears to be ignored, ie. it becomes a plain global function
436   but which is inlined within its file.  Don't know if all old versions of
437   DEC C supported __inline, but as a start let's do the right thing for
438   current versions.  */
439#ifdef __DECC
440#define __GMP_EXTERN_INLINE  static __inline
441#endif
442
443/* SCO OpenUNIX 8 cc supports "static inline foo()" but not in -Xc strict
444   ANSI mode (__STDC__ is 1 in that mode).  Inlining only actually takes
445   place under -O.  Without -O "foo" seems to be emitted whether it's used
446   or not, which is wasteful.  "extern inline foo()" isn't useful, the
447   "extern" is apparently ignored, so foo is inlined if possible but also
448   emitted as a global, which causes multiple definition errors when
449   building a shared libgmp.  */
450#ifdef __SCO_VERSION__
451#if __SCO_VERSION__ > 400000000 && __STDC__ != 1 \
452  && ! defined (__GMP_EXTERN_INLINE)
453#define __GMP_EXTERN_INLINE  static inline
454#endif
455#endif
456
457/* Microsoft's C compiler accepts __inline */
458#ifdef _MSC_VER
459#define __GMP_EXTERN_INLINE  __inline
460#endif
461
462/* Recent enough Sun C compilers want "inline" */
463#if defined (__SUNPRO_C) && __SUNPRO_C >= 0x560 \
464  && ! defined (__GMP_EXTERN_INLINE)
465#define __GMP_EXTERN_INLINE  inline
466#endif
467
468/* Somewhat older Sun C compilers want "static inline" */
469#if defined (__SUNPRO_C) && __SUNPRO_C >= 0x540 \
470  && ! defined (__GMP_EXTERN_INLINE)
471#define __GMP_EXTERN_INLINE  static inline
472#endif
473
474
475/* C++ always has "inline" and since it's a normal feature the linker should
476   discard duplicate non-inlined copies, or if it doesn't then that's a
477   problem for everyone, not just GMP.  */
478#if defined (__cplusplus) && ! defined (__GMP_EXTERN_INLINE)
479#define __GMP_EXTERN_INLINE  inline
480#endif
481
482/* Don't do any inlining within a configure run, since if the compiler ends
483   up emitting copies of the code into the object file it can end up
484   demanding the various support routines (like mpn_popcount) for linking,
485   making the "alloca" test and perhaps others fail.  And on hppa ia64 a
486   pre-release gcc 3.2 was seen not respecting the "extern" in "extern
487   __inline__", triggering this problem too.  */
488#if defined (__GMP_WITHIN_CONFIGURE) && ! __GMP_WITHIN_CONFIGURE_INLINE
489#undef __GMP_EXTERN_INLINE
490#endif
491
492/* By default, don't give a prototype when there's going to be an inline
493   version.  Note in particular that Cray C++ objects to the combination of
494   prototype and inline.  */
495#ifdef __GMP_EXTERN_INLINE
496#ifndef __GMP_INLINE_PROTOTYPES
497#define __GMP_INLINE_PROTOTYPES  0
498#endif
499#else
500#define __GMP_INLINE_PROTOTYPES  1
501#endif
502
503
504#define __GMP_ABS(x)   ((x) >= 0 ? (x) : -(x))
505#define __GMP_MAX(h,i) ((h) > (i) ? (h) : (i))
506
507/* __GMP_USHRT_MAX is not "~ (unsigned short) 0" because short is promoted
508   to int by "~".  */
509#define __GMP_UINT_MAX   (~ (unsigned) 0)
510#define __GMP_ULONG_MAX  (~ (unsigned long) 0)
511#define __GMP_USHRT_MAX  ((unsigned short) ~0)
512
513
514/* __builtin_expect is in gcc 3.0, and not in 2.95. */
515#if __GMP_GNUC_PREREQ (3,0)
516#define __GMP_LIKELY(cond)    __builtin_expect ((cond) != 0, 1)
517#define __GMP_UNLIKELY(cond)  __builtin_expect ((cond) != 0, 0)
518#else
519#define __GMP_LIKELY(cond)    (cond)
520#define __GMP_UNLIKELY(cond)  (cond)
521#endif
522
523#ifdef _CRAY
524#define __GMP_CRAY_Pragma(str)  _Pragma (str)
525#else
526#define __GMP_CRAY_Pragma(str)
527#endif
528
529
530/* Allow direct user access to numerator and denominator of a mpq_t object.  */
531#define mpq_numref(Q) (&((Q)->_mp_num))
532#define mpq_denref(Q) (&((Q)->_mp_den))
533
534
535#if defined (__cplusplus)
536extern "C" {
537using std::FILE;
538#endif
539
540#define mp_set_memory_functions __gmp_set_memory_functions
541__GMP_DECLSPEC void mp_set_memory_functions __GMP_PROTO ((void *(*) (size_t),
542				      void *(*) (void *, size_t, size_t),
543				      void (*) (void *, size_t))) __GMP_NOTHROW;
544
545#define mp_get_memory_functions __gmp_get_memory_functions
546__GMP_DECLSPEC void mp_get_memory_functions __GMP_PROTO ((void *(**) (size_t),
547                                      void *(**) (void *, size_t, size_t),
548                                      void (**) (void *, size_t))) __GMP_NOTHROW;
549
550#define mp_bits_per_limb __gmp_bits_per_limb
551__GMP_DECLSPEC extern __gmp_const int mp_bits_per_limb;
552
553#define gmp_errno __gmp_errno
554__GMP_DECLSPEC extern int gmp_errno;
555
556#define gmp_version __gmp_version
557__GMP_DECLSPEC extern __gmp_const char * __gmp_const gmp_version;
558
559
560/**************** Random number routines.  ****************/
561
562/* obsolete */
563#define gmp_randinit __gmp_randinit
564__GMP_DECLSPEC void gmp_randinit __GMP_PROTO ((gmp_randstate_t, gmp_randalg_t, ...));
565
566#define gmp_randinit_default __gmp_randinit_default
567__GMP_DECLSPEC void gmp_randinit_default __GMP_PROTO ((gmp_randstate_t));
568
569#define gmp_randinit_lc_2exp __gmp_randinit_lc_2exp
570__GMP_DECLSPEC void gmp_randinit_lc_2exp __GMP_PROTO ((gmp_randstate_t,
571						       mpz_srcptr, unsigned long int,
572						       mp_bitcnt_t));
573
574#define gmp_randinit_lc_2exp_size __gmp_randinit_lc_2exp_size
575__GMP_DECLSPEC int gmp_randinit_lc_2exp_size __GMP_PROTO ((gmp_randstate_t, mp_bitcnt_t));
576
577#define gmp_randinit_mt __gmp_randinit_mt
578__GMP_DECLSPEC void gmp_randinit_mt __GMP_PROTO ((gmp_randstate_t));
579
580#define gmp_randinit_set __gmp_randinit_set
581__GMP_DECLSPEC void gmp_randinit_set __GMP_PROTO ((gmp_randstate_t, __gmp_const __gmp_randstate_struct *));
582
583#define gmp_randseed __gmp_randseed
584__GMP_DECLSPEC void gmp_randseed __GMP_PROTO ((gmp_randstate_t, mpz_srcptr));
585
586#define gmp_randseed_ui __gmp_randseed_ui
587__GMP_DECLSPEC void gmp_randseed_ui __GMP_PROTO ((gmp_randstate_t, unsigned long int));
588
589#define gmp_randclear __gmp_randclear
590__GMP_DECLSPEC void gmp_randclear __GMP_PROTO ((gmp_randstate_t));
591
592#define gmp_urandomb_ui __gmp_urandomb_ui
593__GMP_DECLSPEC unsigned long gmp_urandomb_ui __GMP_PROTO ((gmp_randstate_t, unsigned long));
594
595#define gmp_urandomm_ui __gmp_urandomm_ui
596__GMP_DECLSPEC unsigned long gmp_urandomm_ui __GMP_PROTO ((gmp_randstate_t, unsigned long));
597
598
599/**************** Formatted output routines.  ****************/
600
601#define gmp_asprintf __gmp_asprintf
602__GMP_DECLSPEC int gmp_asprintf __GMP_PROTO ((char **, __gmp_const char *, ...));
603
604#define gmp_fprintf __gmp_fprintf
605#ifdef _GMP_H_HAVE_FILE
606__GMP_DECLSPEC int gmp_fprintf __GMP_PROTO ((FILE *, __gmp_const char *, ...));
607#endif
608
609#define gmp_obstack_printf __gmp_obstack_printf
610#if defined (_GMP_H_HAVE_OBSTACK)
611__GMP_DECLSPEC int gmp_obstack_printf __GMP_PROTO ((struct obstack *, __gmp_const char *, ...));
612#endif
613
614#define gmp_obstack_vprintf __gmp_obstack_vprintf
615#if defined (_GMP_H_HAVE_OBSTACK) && defined (_GMP_H_HAVE_VA_LIST)
616__GMP_DECLSPEC int gmp_obstack_vprintf __GMP_PROTO ((struct obstack *, __gmp_const char *, va_list));
617#endif
618
619#define gmp_printf __gmp_printf
620__GMP_DECLSPEC int gmp_printf __GMP_PROTO ((__gmp_const char *, ...));
621
622#define gmp_snprintf __gmp_snprintf
623__GMP_DECLSPEC int gmp_snprintf __GMP_PROTO ((char *, size_t, __gmp_const char *, ...));
624
625#define gmp_sprintf __gmp_sprintf
626__GMP_DECLSPEC int gmp_sprintf __GMP_PROTO ((char *, __gmp_const char *, ...));
627
628#define gmp_vasprintf __gmp_vasprintf
629#if defined (_GMP_H_HAVE_VA_LIST)
630__GMP_DECLSPEC int gmp_vasprintf __GMP_PROTO ((char **, __gmp_const char *, va_list));
631#endif
632
633#define gmp_vfprintf __gmp_vfprintf
634#if defined (_GMP_H_HAVE_FILE) && defined (_GMP_H_HAVE_VA_LIST)
635__GMP_DECLSPEC int gmp_vfprintf __GMP_PROTO ((FILE *, __gmp_const char *, va_list));
636#endif
637
638#define gmp_vprintf __gmp_vprintf
639#if defined (_GMP_H_HAVE_VA_LIST)
640__GMP_DECLSPEC int gmp_vprintf __GMP_PROTO ((__gmp_const char *, va_list));
641#endif
642
643#define gmp_vsnprintf __gmp_vsnprintf
644#if defined (_GMP_H_HAVE_VA_LIST)
645__GMP_DECLSPEC int gmp_vsnprintf __GMP_PROTO ((char *, size_t, __gmp_const char *, va_list));
646#endif
647
648#define gmp_vsprintf __gmp_vsprintf
649#if defined (_GMP_H_HAVE_VA_LIST)
650__GMP_DECLSPEC int gmp_vsprintf __GMP_PROTO ((char *, __gmp_const char *, va_list));
651#endif
652
653
654/**************** Formatted input routines.  ****************/
655
656#define gmp_fscanf __gmp_fscanf
657#ifdef _GMP_H_HAVE_FILE
658__GMP_DECLSPEC int gmp_fscanf __GMP_PROTO ((FILE *, __gmp_const char *, ...));
659#endif
660
661#define gmp_scanf __gmp_scanf
662__GMP_DECLSPEC int gmp_scanf __GMP_PROTO ((__gmp_const char *, ...));
663
664#define gmp_sscanf __gmp_sscanf
665__GMP_DECLSPEC int gmp_sscanf __GMP_PROTO ((__gmp_const char *, __gmp_const char *, ...));
666
667#define gmp_vfscanf __gmp_vfscanf
668#if defined (_GMP_H_HAVE_FILE) && defined (_GMP_H_HAVE_VA_LIST)
669__GMP_DECLSPEC int gmp_vfscanf __GMP_PROTO ((FILE *, __gmp_const char *, va_list));
670#endif
671
672#define gmp_vscanf __gmp_vscanf
673#if defined (_GMP_H_HAVE_VA_LIST)
674__GMP_DECLSPEC int gmp_vscanf __GMP_PROTO ((__gmp_const char *, va_list));
675#endif
676
677#define gmp_vsscanf __gmp_vsscanf
678#if defined (_GMP_H_HAVE_VA_LIST)
679__GMP_DECLSPEC int gmp_vsscanf __GMP_PROTO ((__gmp_const char *, __gmp_const char *, va_list));
680#endif
681
682
683/**************** Integer (i.e. Z) routines.  ****************/
684
685#define _mpz_realloc __gmpz_realloc
686#define mpz_realloc __gmpz_realloc
687__GMP_DECLSPEC void *_mpz_realloc __GMP_PROTO ((mpz_ptr, mp_size_t));
688
689#define mpz_abs __gmpz_abs
690#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_abs)
691__GMP_DECLSPEC void mpz_abs __GMP_PROTO ((mpz_ptr, mpz_srcptr));
692#endif
693
694#define mpz_add __gmpz_add
695__GMP_DECLSPEC void mpz_add __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
696
697#define mpz_add_ui __gmpz_add_ui
698__GMP_DECLSPEC void mpz_add_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
699
700#define mpz_addmul __gmpz_addmul
701__GMP_DECLSPEC void mpz_addmul __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
702
703#define mpz_addmul_ui __gmpz_addmul_ui
704__GMP_DECLSPEC void mpz_addmul_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
705
706#define mpz_and __gmpz_and
707__GMP_DECLSPEC void mpz_and __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
708
709#define mpz_array_init __gmpz_array_init
710__GMP_DECLSPEC void mpz_array_init __GMP_PROTO ((mpz_ptr, mp_size_t, mp_size_t));
711
712#define mpz_bin_ui __gmpz_bin_ui
713__GMP_DECLSPEC void mpz_bin_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
714
715#define mpz_bin_uiui __gmpz_bin_uiui
716__GMP_DECLSPEC void mpz_bin_uiui __GMP_PROTO ((mpz_ptr, unsigned long int, unsigned long int));
717
718#define mpz_cdiv_q __gmpz_cdiv_q
719__GMP_DECLSPEC void mpz_cdiv_q __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
720
721#define mpz_cdiv_q_2exp __gmpz_cdiv_q_2exp
722__GMP_DECLSPEC void mpz_cdiv_q_2exp __GMP_PROTO ((mpz_ptr, mpz_srcptr, mp_bitcnt_t));
723
724#define mpz_cdiv_q_ui __gmpz_cdiv_q_ui
725__GMP_DECLSPEC unsigned long int mpz_cdiv_q_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
726
727#define mpz_cdiv_qr __gmpz_cdiv_qr
728__GMP_DECLSPEC void mpz_cdiv_qr __GMP_PROTO ((mpz_ptr, mpz_ptr, mpz_srcptr, mpz_srcptr));
729
730#define mpz_cdiv_qr_ui __gmpz_cdiv_qr_ui
731__GMP_DECLSPEC unsigned long int mpz_cdiv_qr_ui __GMP_PROTO ((mpz_ptr, mpz_ptr, mpz_srcptr, unsigned long int));
732
733#define mpz_cdiv_r __gmpz_cdiv_r
734__GMP_DECLSPEC void mpz_cdiv_r __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
735
736#define mpz_cdiv_r_2exp __gmpz_cdiv_r_2exp
737__GMP_DECLSPEC void mpz_cdiv_r_2exp __GMP_PROTO ((mpz_ptr, mpz_srcptr, mp_bitcnt_t));
738
739#define mpz_cdiv_r_ui __gmpz_cdiv_r_ui
740__GMP_DECLSPEC unsigned long int mpz_cdiv_r_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
741
742#define mpz_cdiv_ui __gmpz_cdiv_ui
743__GMP_DECLSPEC unsigned long int mpz_cdiv_ui __GMP_PROTO ((mpz_srcptr, unsigned long int)) __GMP_ATTRIBUTE_PURE;
744
745#define mpz_clear __gmpz_clear
746__GMP_DECLSPEC void mpz_clear __GMP_PROTO ((mpz_ptr));
747
748#define mpz_clears __gmpz_clears
749__GMP_DECLSPEC void mpz_clears __GMP_PROTO ((mpz_ptr, ...));
750
751#define mpz_clrbit __gmpz_clrbit
752__GMP_DECLSPEC void mpz_clrbit __GMP_PROTO ((mpz_ptr, mp_bitcnt_t));
753
754#define mpz_cmp __gmpz_cmp
755__GMP_DECLSPEC int mpz_cmp __GMP_PROTO ((mpz_srcptr, mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
756
757#define mpz_cmp_d __gmpz_cmp_d
758__GMP_DECLSPEC int mpz_cmp_d __GMP_PROTO ((mpz_srcptr, double)) __GMP_ATTRIBUTE_PURE;
759
760#define _mpz_cmp_si __gmpz_cmp_si
761__GMP_DECLSPEC int _mpz_cmp_si __GMP_PROTO ((mpz_srcptr, signed long int)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
762
763#define _mpz_cmp_ui __gmpz_cmp_ui
764__GMP_DECLSPEC int _mpz_cmp_ui __GMP_PROTO ((mpz_srcptr, unsigned long int)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
765
766#define mpz_cmpabs __gmpz_cmpabs
767__GMP_DECLSPEC int mpz_cmpabs __GMP_PROTO ((mpz_srcptr, mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
768
769#define mpz_cmpabs_d __gmpz_cmpabs_d
770__GMP_DECLSPEC int mpz_cmpabs_d __GMP_PROTO ((mpz_srcptr, double)) __GMP_ATTRIBUTE_PURE;
771
772#define mpz_cmpabs_ui __gmpz_cmpabs_ui
773__GMP_DECLSPEC int mpz_cmpabs_ui __GMP_PROTO ((mpz_srcptr, unsigned long int)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
774
775#define mpz_com __gmpz_com
776__GMP_DECLSPEC void mpz_com __GMP_PROTO ((mpz_ptr, mpz_srcptr));
777
778#define mpz_combit __gmpz_combit
779__GMP_DECLSPEC void mpz_combit __GMP_PROTO ((mpz_ptr, mp_bitcnt_t));
780
781#define mpz_congruent_p __gmpz_congruent_p
782__GMP_DECLSPEC int mpz_congruent_p __GMP_PROTO ((mpz_srcptr, mpz_srcptr, mpz_srcptr)) __GMP_ATTRIBUTE_PURE;
783
784#define mpz_congruent_2exp_p __gmpz_congruent_2exp_p
785__GMP_DECLSPEC int mpz_congruent_2exp_p __GMP_PROTO ((mpz_srcptr, mpz_srcptr, mp_bitcnt_t)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
786
787#define mpz_congruent_ui_p __gmpz_congruent_ui_p
788__GMP_DECLSPEC int mpz_congruent_ui_p __GMP_PROTO ((mpz_srcptr, unsigned long, unsigned long)) __GMP_ATTRIBUTE_PURE;
789
790#define mpz_divexact __gmpz_divexact
791__GMP_DECLSPEC void mpz_divexact __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
792
793#define mpz_divexact_ui __gmpz_divexact_ui
794__GMP_DECLSPEC void mpz_divexact_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long));
795
796#define mpz_divisible_p __gmpz_divisible_p
797__GMP_DECLSPEC int mpz_divisible_p __GMP_PROTO ((mpz_srcptr, mpz_srcptr)) __GMP_ATTRIBUTE_PURE;
798
799#define mpz_divisible_ui_p __gmpz_divisible_ui_p
800__GMP_DECLSPEC int mpz_divisible_ui_p __GMP_PROTO ((mpz_srcptr, unsigned long)) __GMP_ATTRIBUTE_PURE;
801
802#define mpz_divisible_2exp_p __gmpz_divisible_2exp_p
803__GMP_DECLSPEC int mpz_divisible_2exp_p __GMP_PROTO ((mpz_srcptr, mp_bitcnt_t)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
804
805#define mpz_dump __gmpz_dump
806__GMP_DECLSPEC void mpz_dump __GMP_PROTO ((mpz_srcptr));
807
808#define mpz_export __gmpz_export
809__GMP_DECLSPEC void *mpz_export __GMP_PROTO ((void *, size_t *, int, size_t, int, size_t, mpz_srcptr));
810
811#define mpz_fac_ui __gmpz_fac_ui
812__GMP_DECLSPEC void mpz_fac_ui __GMP_PROTO ((mpz_ptr, unsigned long int));
813
814#define mpz_fdiv_q __gmpz_fdiv_q
815__GMP_DECLSPEC void mpz_fdiv_q __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
816
817#define mpz_fdiv_q_2exp __gmpz_fdiv_q_2exp
818__GMP_DECLSPEC void mpz_fdiv_q_2exp __GMP_PROTO ((mpz_ptr, mpz_srcptr, mp_bitcnt_t));
819
820#define mpz_fdiv_q_ui __gmpz_fdiv_q_ui
821__GMP_DECLSPEC unsigned long int mpz_fdiv_q_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
822
823#define mpz_fdiv_qr __gmpz_fdiv_qr
824__GMP_DECLSPEC void mpz_fdiv_qr __GMP_PROTO ((mpz_ptr, mpz_ptr, mpz_srcptr, mpz_srcptr));
825
826#define mpz_fdiv_qr_ui __gmpz_fdiv_qr_ui
827__GMP_DECLSPEC unsigned long int mpz_fdiv_qr_ui __GMP_PROTO ((mpz_ptr, mpz_ptr, mpz_srcptr, unsigned long int));
828
829#define mpz_fdiv_r __gmpz_fdiv_r
830__GMP_DECLSPEC void mpz_fdiv_r __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
831
832#define mpz_fdiv_r_2exp __gmpz_fdiv_r_2exp
833__GMP_DECLSPEC void mpz_fdiv_r_2exp __GMP_PROTO ((mpz_ptr, mpz_srcptr, mp_bitcnt_t));
834
835#define mpz_fdiv_r_ui __gmpz_fdiv_r_ui
836__GMP_DECLSPEC unsigned long int mpz_fdiv_r_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
837
838#define mpz_fdiv_ui __gmpz_fdiv_ui
839__GMP_DECLSPEC unsigned long int mpz_fdiv_ui __GMP_PROTO ((mpz_srcptr, unsigned long int)) __GMP_ATTRIBUTE_PURE;
840
841#define mpz_fib_ui __gmpz_fib_ui
842__GMP_DECLSPEC void mpz_fib_ui __GMP_PROTO ((mpz_ptr, unsigned long int));
843
844#define mpz_fib2_ui __gmpz_fib2_ui
845__GMP_DECLSPEC void mpz_fib2_ui __GMP_PROTO ((mpz_ptr, mpz_ptr, unsigned long int));
846
847#define mpz_fits_sint_p __gmpz_fits_sint_p
848__GMP_DECLSPEC int mpz_fits_sint_p __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
849
850#define mpz_fits_slong_p __gmpz_fits_slong_p
851__GMP_DECLSPEC int mpz_fits_slong_p __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
852
853#define mpz_fits_sshort_p __gmpz_fits_sshort_p
854__GMP_DECLSPEC int mpz_fits_sshort_p __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
855
856#define mpz_fits_uint_p __gmpz_fits_uint_p
857#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_fits_uint_p)
858__GMP_DECLSPEC int mpz_fits_uint_p __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
859#endif
860
861#define mpz_fits_ulong_p __gmpz_fits_ulong_p
862#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_fits_ulong_p)
863__GMP_DECLSPEC int mpz_fits_ulong_p __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
864#endif
865
866#define mpz_fits_ushort_p __gmpz_fits_ushort_p
867#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_fits_ushort_p)
868__GMP_DECLSPEC int mpz_fits_ushort_p __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
869#endif
870
871#define mpz_gcd __gmpz_gcd
872__GMP_DECLSPEC void mpz_gcd __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
873
874#define mpz_gcd_ui __gmpz_gcd_ui
875__GMP_DECLSPEC unsigned long int mpz_gcd_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
876
877#define mpz_gcdext __gmpz_gcdext
878__GMP_DECLSPEC void mpz_gcdext __GMP_PROTO ((mpz_ptr, mpz_ptr, mpz_ptr, mpz_srcptr, mpz_srcptr));
879
880#define mpz_get_d __gmpz_get_d
881__GMP_DECLSPEC double mpz_get_d __GMP_PROTO ((mpz_srcptr)) __GMP_ATTRIBUTE_PURE;
882
883#define mpz_get_d_2exp __gmpz_get_d_2exp
884__GMP_DECLSPEC double mpz_get_d_2exp __GMP_PROTO ((signed long int *, mpz_srcptr));
885
886#define mpz_get_si __gmpz_get_si
887__GMP_DECLSPEC /* signed */ long int mpz_get_si __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
888
889#define mpz_get_str __gmpz_get_str
890__GMP_DECLSPEC char *mpz_get_str __GMP_PROTO ((char *, int, mpz_srcptr));
891
892#define mpz_get_ui __gmpz_get_ui
893#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_get_ui)
894__GMP_DECLSPEC unsigned long int mpz_get_ui __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
895#endif
896
897#define mpz_getlimbn __gmpz_getlimbn
898#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_getlimbn)
899__GMP_DECLSPEC mp_limb_t mpz_getlimbn __GMP_PROTO ((mpz_srcptr, mp_size_t)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
900#endif
901
902#define mpz_hamdist __gmpz_hamdist
903__GMP_DECLSPEC mp_bitcnt_t mpz_hamdist __GMP_PROTO ((mpz_srcptr, mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
904
905#define mpz_import __gmpz_import
906__GMP_DECLSPEC void mpz_import __GMP_PROTO ((mpz_ptr, size_t, int, size_t, int, size_t, __gmp_const void *));
907
908#define mpz_init __gmpz_init
909__GMP_DECLSPEC void mpz_init __GMP_PROTO ((mpz_ptr));
910
911#define mpz_init2 __gmpz_init2
912__GMP_DECLSPEC void mpz_init2 __GMP_PROTO ((mpz_ptr, mp_bitcnt_t));
913
914#define mpz_inits __gmpz_inits
915__GMP_DECLSPEC void mpz_inits __GMP_PROTO ((mpz_ptr, ...));
916
917#define mpz_init_set __gmpz_init_set
918__GMP_DECLSPEC void mpz_init_set __GMP_PROTO ((mpz_ptr, mpz_srcptr));
919
920#define mpz_init_set_d __gmpz_init_set_d
921__GMP_DECLSPEC void mpz_init_set_d __GMP_PROTO ((mpz_ptr, double));
922
923#define mpz_init_set_si __gmpz_init_set_si
924__GMP_DECLSPEC void mpz_init_set_si __GMP_PROTO ((mpz_ptr, signed long int));
925
926#define mpz_init_set_str __gmpz_init_set_str
927__GMP_DECLSPEC int mpz_init_set_str __GMP_PROTO ((mpz_ptr, __gmp_const char *, int));
928
929#define mpz_init_set_ui __gmpz_init_set_ui
930__GMP_DECLSPEC void mpz_init_set_ui __GMP_PROTO ((mpz_ptr, unsigned long int));
931
932#define mpz_inp_raw __gmpz_inp_raw
933#ifdef _GMP_H_HAVE_FILE
934__GMP_DECLSPEC size_t mpz_inp_raw __GMP_PROTO ((mpz_ptr, FILE *));
935#endif
936
937#define mpz_inp_str __gmpz_inp_str
938#ifdef _GMP_H_HAVE_FILE
939__GMP_DECLSPEC size_t mpz_inp_str __GMP_PROTO ((mpz_ptr, FILE *, int));
940#endif
941
942#define mpz_invert __gmpz_invert
943__GMP_DECLSPEC int mpz_invert __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
944
945#define mpz_ior __gmpz_ior
946__GMP_DECLSPEC void mpz_ior __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
947
948#define mpz_jacobi __gmpz_jacobi
949__GMP_DECLSPEC int mpz_jacobi __GMP_PROTO ((mpz_srcptr, mpz_srcptr)) __GMP_ATTRIBUTE_PURE;
950
951#define mpz_kronecker mpz_jacobi  /* alias */
952
953#define mpz_kronecker_si __gmpz_kronecker_si
954__GMP_DECLSPEC int mpz_kronecker_si __GMP_PROTO ((mpz_srcptr, long)) __GMP_ATTRIBUTE_PURE;
955
956#define mpz_kronecker_ui __gmpz_kronecker_ui
957__GMP_DECLSPEC int mpz_kronecker_ui __GMP_PROTO ((mpz_srcptr, unsigned long)) __GMP_ATTRIBUTE_PURE;
958
959#define mpz_si_kronecker __gmpz_si_kronecker
960__GMP_DECLSPEC int mpz_si_kronecker __GMP_PROTO ((long, mpz_srcptr)) __GMP_ATTRIBUTE_PURE;
961
962#define mpz_ui_kronecker __gmpz_ui_kronecker
963__GMP_DECLSPEC int mpz_ui_kronecker __GMP_PROTO ((unsigned long, mpz_srcptr)) __GMP_ATTRIBUTE_PURE;
964
965#define mpz_lcm __gmpz_lcm
966__GMP_DECLSPEC void mpz_lcm __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
967
968#define mpz_lcm_ui __gmpz_lcm_ui
969__GMP_DECLSPEC void mpz_lcm_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long));
970
971#define mpz_legendre mpz_jacobi  /* alias */
972
973#define mpz_lucnum_ui __gmpz_lucnum_ui
974__GMP_DECLSPEC void mpz_lucnum_ui __GMP_PROTO ((mpz_ptr, unsigned long int));
975
976#define mpz_lucnum2_ui __gmpz_lucnum2_ui
977__GMP_DECLSPEC void mpz_lucnum2_ui __GMP_PROTO ((mpz_ptr, mpz_ptr, unsigned long int));
978
979#define mpz_millerrabin __gmpz_millerrabin
980__GMP_DECLSPEC int mpz_millerrabin __GMP_PROTO ((mpz_srcptr, int)) __GMP_ATTRIBUTE_PURE;
981
982#define mpz_mod __gmpz_mod
983__GMP_DECLSPEC void mpz_mod __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
984
985#define mpz_mod_ui mpz_fdiv_r_ui /* same as fdiv_r because divisor unsigned */
986
987#define mpz_mul __gmpz_mul
988__GMP_DECLSPEC void mpz_mul __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
989
990#define mpz_mul_2exp __gmpz_mul_2exp
991__GMP_DECLSPEC void mpz_mul_2exp __GMP_PROTO ((mpz_ptr, mpz_srcptr, mp_bitcnt_t));
992
993#define mpz_mul_si __gmpz_mul_si
994__GMP_DECLSPEC void mpz_mul_si __GMP_PROTO ((mpz_ptr, mpz_srcptr, long int));
995
996#define mpz_mul_ui __gmpz_mul_ui
997__GMP_DECLSPEC void mpz_mul_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
998
999#define mpz_neg __gmpz_neg
1000#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_neg)
1001__GMP_DECLSPEC void mpz_neg __GMP_PROTO ((mpz_ptr, mpz_srcptr));
1002#endif
1003
1004#define mpz_nextprime __gmpz_nextprime
1005__GMP_DECLSPEC void mpz_nextprime __GMP_PROTO ((mpz_ptr, mpz_srcptr));
1006
1007#define mpz_out_raw __gmpz_out_raw
1008#ifdef _GMP_H_HAVE_FILE
1009__GMP_DECLSPEC size_t mpz_out_raw __GMP_PROTO ((FILE *, mpz_srcptr));
1010#endif
1011
1012#define mpz_out_str __gmpz_out_str
1013#ifdef _GMP_H_HAVE_FILE
1014__GMP_DECLSPEC size_t mpz_out_str __GMP_PROTO ((FILE *, int, mpz_srcptr));
1015#endif
1016
1017#define mpz_perfect_power_p __gmpz_perfect_power_p
1018__GMP_DECLSPEC int mpz_perfect_power_p __GMP_PROTO ((mpz_srcptr)) __GMP_ATTRIBUTE_PURE;
1019
1020#define mpz_perfect_square_p __gmpz_perfect_square_p
1021#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_perfect_square_p)
1022__GMP_DECLSPEC int mpz_perfect_square_p __GMP_PROTO ((mpz_srcptr)) __GMP_ATTRIBUTE_PURE;
1023#endif
1024
1025#define mpz_popcount __gmpz_popcount
1026#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_popcount)
1027__GMP_DECLSPEC mp_bitcnt_t mpz_popcount __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1028#endif
1029
1030#define mpz_pow_ui __gmpz_pow_ui
1031__GMP_DECLSPEC void mpz_pow_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
1032
1033#define mpz_powm __gmpz_powm
1034__GMP_DECLSPEC void mpz_powm __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr, mpz_srcptr));
1035
1036#define mpz_powm_sec __gmpz_powm_sec
1037__GMP_DECLSPEC void mpz_powm_sec __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr, mpz_srcptr));
1038
1039#define mpz_powm_ui __gmpz_powm_ui
1040__GMP_DECLSPEC void mpz_powm_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int, mpz_srcptr));
1041
1042#define mpz_probab_prime_p __gmpz_probab_prime_p
1043__GMP_DECLSPEC int mpz_probab_prime_p __GMP_PROTO ((mpz_srcptr, int)) __GMP_ATTRIBUTE_PURE;
1044
1045#define mpz_random __gmpz_random
1046__GMP_DECLSPEC void mpz_random __GMP_PROTO ((mpz_ptr, mp_size_t));
1047
1048#define mpz_random2 __gmpz_random2
1049__GMP_DECLSPEC void mpz_random2 __GMP_PROTO ((mpz_ptr, mp_size_t));
1050
1051#define mpz_realloc2 __gmpz_realloc2
1052__GMP_DECLSPEC void mpz_realloc2 __GMP_PROTO ((mpz_ptr, mp_bitcnt_t));
1053
1054#define mpz_remove __gmpz_remove
1055__GMP_DECLSPEC mp_bitcnt_t mpz_remove __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
1056
1057#define mpz_root __gmpz_root
1058__GMP_DECLSPEC int mpz_root __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
1059
1060#define mpz_rootrem __gmpz_rootrem
1061__GMP_DECLSPEC void mpz_rootrem __GMP_PROTO ((mpz_ptr,mpz_ptr, mpz_srcptr, unsigned long int));
1062
1063#define mpz_rrandomb __gmpz_rrandomb
1064__GMP_DECLSPEC void mpz_rrandomb __GMP_PROTO ((mpz_ptr, gmp_randstate_t, mp_bitcnt_t));
1065
1066#define mpz_scan0 __gmpz_scan0
1067__GMP_DECLSPEC mp_bitcnt_t mpz_scan0 __GMP_PROTO ((mpz_srcptr, mp_bitcnt_t)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1068
1069#define mpz_scan1 __gmpz_scan1
1070__GMP_DECLSPEC mp_bitcnt_t mpz_scan1 __GMP_PROTO ((mpz_srcptr, mp_bitcnt_t)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1071
1072#define mpz_set __gmpz_set
1073__GMP_DECLSPEC void mpz_set __GMP_PROTO ((mpz_ptr, mpz_srcptr));
1074
1075#define mpz_set_d __gmpz_set_d
1076__GMP_DECLSPEC void mpz_set_d __GMP_PROTO ((mpz_ptr, double));
1077
1078#define mpz_set_f __gmpz_set_f
1079__GMP_DECLSPEC void mpz_set_f __GMP_PROTO ((mpz_ptr, mpf_srcptr));
1080
1081#define mpz_set_q __gmpz_set_q
1082#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_set_q)
1083__GMP_DECLSPEC void mpz_set_q __GMP_PROTO ((mpz_ptr, mpq_srcptr));
1084#endif
1085
1086#define mpz_set_si __gmpz_set_si
1087__GMP_DECLSPEC void mpz_set_si __GMP_PROTO ((mpz_ptr, signed long int));
1088
1089#define mpz_set_str __gmpz_set_str
1090__GMP_DECLSPEC int mpz_set_str __GMP_PROTO ((mpz_ptr, __gmp_const char *, int));
1091
1092#define mpz_set_ui __gmpz_set_ui
1093__GMP_DECLSPEC void mpz_set_ui __GMP_PROTO ((mpz_ptr, unsigned long int));
1094
1095#define mpz_setbit __gmpz_setbit
1096__GMP_DECLSPEC void mpz_setbit __GMP_PROTO ((mpz_ptr, mp_bitcnt_t));
1097
1098#define mpz_size __gmpz_size
1099#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpz_size)
1100__GMP_DECLSPEC size_t mpz_size __GMP_PROTO ((mpz_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1101#endif
1102
1103#define mpz_sizeinbase __gmpz_sizeinbase
1104__GMP_DECLSPEC size_t mpz_sizeinbase __GMP_PROTO ((mpz_srcptr, int)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1105
1106#define mpz_sqrt __gmpz_sqrt
1107__GMP_DECLSPEC void mpz_sqrt __GMP_PROTO ((mpz_ptr, mpz_srcptr));
1108
1109#define mpz_sqrtrem __gmpz_sqrtrem
1110__GMP_DECLSPEC void mpz_sqrtrem __GMP_PROTO ((mpz_ptr, mpz_ptr, mpz_srcptr));
1111
1112#define mpz_sub __gmpz_sub
1113__GMP_DECLSPEC void mpz_sub __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
1114
1115#define mpz_sub_ui __gmpz_sub_ui
1116__GMP_DECLSPEC void mpz_sub_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
1117
1118#define mpz_ui_sub __gmpz_ui_sub
1119__GMP_DECLSPEC void mpz_ui_sub __GMP_PROTO ((mpz_ptr, unsigned long int, mpz_srcptr));
1120
1121#define mpz_submul __gmpz_submul
1122__GMP_DECLSPEC void mpz_submul __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
1123
1124#define mpz_submul_ui __gmpz_submul_ui
1125__GMP_DECLSPEC void mpz_submul_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
1126
1127#define mpz_swap __gmpz_swap
1128__GMP_DECLSPEC void mpz_swap __GMP_PROTO ((mpz_ptr, mpz_ptr)) __GMP_NOTHROW;
1129
1130#define mpz_tdiv_ui __gmpz_tdiv_ui
1131__GMP_DECLSPEC unsigned long int mpz_tdiv_ui __GMP_PROTO ((mpz_srcptr, unsigned long int)) __GMP_ATTRIBUTE_PURE;
1132
1133#define mpz_tdiv_q __gmpz_tdiv_q
1134__GMP_DECLSPEC void mpz_tdiv_q __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
1135
1136#define mpz_tdiv_q_2exp __gmpz_tdiv_q_2exp
1137__GMP_DECLSPEC void mpz_tdiv_q_2exp __GMP_PROTO ((mpz_ptr, mpz_srcptr, mp_bitcnt_t));
1138
1139#define mpz_tdiv_q_ui __gmpz_tdiv_q_ui
1140__GMP_DECLSPEC unsigned long int mpz_tdiv_q_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
1141
1142#define mpz_tdiv_qr __gmpz_tdiv_qr
1143__GMP_DECLSPEC void mpz_tdiv_qr __GMP_PROTO ((mpz_ptr, mpz_ptr, mpz_srcptr, mpz_srcptr));
1144
1145#define mpz_tdiv_qr_ui __gmpz_tdiv_qr_ui
1146__GMP_DECLSPEC unsigned long int mpz_tdiv_qr_ui __GMP_PROTO ((mpz_ptr, mpz_ptr, mpz_srcptr, unsigned long int));
1147
1148#define mpz_tdiv_r __gmpz_tdiv_r
1149__GMP_DECLSPEC void mpz_tdiv_r __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
1150
1151#define mpz_tdiv_r_2exp __gmpz_tdiv_r_2exp
1152__GMP_DECLSPEC void mpz_tdiv_r_2exp __GMP_PROTO ((mpz_ptr, mpz_srcptr, mp_bitcnt_t));
1153
1154#define mpz_tdiv_r_ui __gmpz_tdiv_r_ui
1155__GMP_DECLSPEC unsigned long int mpz_tdiv_r_ui __GMP_PROTO ((mpz_ptr, mpz_srcptr, unsigned long int));
1156
1157#define mpz_tstbit __gmpz_tstbit
1158__GMP_DECLSPEC int mpz_tstbit __GMP_PROTO ((mpz_srcptr, mp_bitcnt_t)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1159
1160#define mpz_ui_pow_ui __gmpz_ui_pow_ui
1161__GMP_DECLSPEC void mpz_ui_pow_ui __GMP_PROTO ((mpz_ptr, unsigned long int, unsigned long int));
1162
1163#define mpz_urandomb __gmpz_urandomb
1164__GMP_DECLSPEC void mpz_urandomb __GMP_PROTO ((mpz_ptr, gmp_randstate_t, mp_bitcnt_t));
1165
1166#define mpz_urandomm __gmpz_urandomm
1167__GMP_DECLSPEC void mpz_urandomm __GMP_PROTO ((mpz_ptr, gmp_randstate_t, mpz_srcptr));
1168
1169#define mpz_xor __gmpz_xor
1170#define mpz_eor __gmpz_xor
1171__GMP_DECLSPEC void mpz_xor __GMP_PROTO ((mpz_ptr, mpz_srcptr, mpz_srcptr));
1172
1173
1174/**************** Rational (i.e. Q) routines.  ****************/
1175
1176#define mpq_abs __gmpq_abs
1177#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpq_abs)
1178__GMP_DECLSPEC void mpq_abs __GMP_PROTO ((mpq_ptr, mpq_srcptr));
1179#endif
1180
1181#define mpq_add __gmpq_add
1182__GMP_DECLSPEC void mpq_add __GMP_PROTO ((mpq_ptr, mpq_srcptr, mpq_srcptr));
1183
1184#define mpq_canonicalize __gmpq_canonicalize
1185__GMP_DECLSPEC void mpq_canonicalize __GMP_PROTO ((mpq_ptr));
1186
1187#define mpq_clear __gmpq_clear
1188__GMP_DECLSPEC void mpq_clear __GMP_PROTO ((mpq_ptr));
1189
1190#define mpq_clears __gmpq_clears
1191__GMP_DECLSPEC void mpq_clears __GMP_PROTO ((mpq_ptr, ...));
1192
1193#define mpq_cmp __gmpq_cmp
1194__GMP_DECLSPEC int mpq_cmp __GMP_PROTO ((mpq_srcptr, mpq_srcptr)) __GMP_ATTRIBUTE_PURE;
1195
1196#define _mpq_cmp_si __gmpq_cmp_si
1197__GMP_DECLSPEC int _mpq_cmp_si __GMP_PROTO ((mpq_srcptr, long, unsigned long)) __GMP_ATTRIBUTE_PURE;
1198
1199#define _mpq_cmp_ui __gmpq_cmp_ui
1200__GMP_DECLSPEC int _mpq_cmp_ui __GMP_PROTO ((mpq_srcptr, unsigned long int, unsigned long int)) __GMP_ATTRIBUTE_PURE;
1201
1202#define mpq_div __gmpq_div
1203__GMP_DECLSPEC void mpq_div __GMP_PROTO ((mpq_ptr, mpq_srcptr, mpq_srcptr));
1204
1205#define mpq_div_2exp __gmpq_div_2exp
1206__GMP_DECLSPEC void mpq_div_2exp __GMP_PROTO ((mpq_ptr, mpq_srcptr, mp_bitcnt_t));
1207
1208#define mpq_equal __gmpq_equal
1209__GMP_DECLSPEC int mpq_equal __GMP_PROTO ((mpq_srcptr, mpq_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1210
1211#define mpq_get_num __gmpq_get_num
1212__GMP_DECLSPEC void mpq_get_num __GMP_PROTO ((mpz_ptr, mpq_srcptr));
1213
1214#define mpq_get_den __gmpq_get_den
1215__GMP_DECLSPEC void mpq_get_den __GMP_PROTO ((mpz_ptr, mpq_srcptr));
1216
1217#define mpq_get_d __gmpq_get_d
1218__GMP_DECLSPEC double mpq_get_d __GMP_PROTO ((mpq_srcptr)) __GMP_ATTRIBUTE_PURE;
1219
1220#define mpq_get_str __gmpq_get_str
1221__GMP_DECLSPEC char *mpq_get_str __GMP_PROTO ((char *, int, mpq_srcptr));
1222
1223#define mpq_init __gmpq_init
1224__GMP_DECLSPEC void mpq_init __GMP_PROTO ((mpq_ptr));
1225
1226#define mpq_inits __gmpq_inits
1227__GMP_DECLSPEC void mpq_inits __GMP_PROTO ((mpq_ptr, ...));
1228
1229#define mpq_inp_str __gmpq_inp_str
1230#ifdef _GMP_H_HAVE_FILE
1231__GMP_DECLSPEC size_t mpq_inp_str __GMP_PROTO ((mpq_ptr, FILE *, int));
1232#endif
1233
1234#define mpq_inv __gmpq_inv
1235__GMP_DECLSPEC void mpq_inv __GMP_PROTO ((mpq_ptr, mpq_srcptr));
1236
1237#define mpq_mul __gmpq_mul
1238__GMP_DECLSPEC void mpq_mul __GMP_PROTO ((mpq_ptr, mpq_srcptr, mpq_srcptr));
1239
1240#define mpq_mul_2exp __gmpq_mul_2exp
1241__GMP_DECLSPEC void mpq_mul_2exp __GMP_PROTO ((mpq_ptr, mpq_srcptr, mp_bitcnt_t));
1242
1243#define mpq_neg __gmpq_neg
1244#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpq_neg)
1245__GMP_DECLSPEC void mpq_neg __GMP_PROTO ((mpq_ptr, mpq_srcptr));
1246#endif
1247
1248#define mpq_out_str __gmpq_out_str
1249#ifdef _GMP_H_HAVE_FILE
1250__GMP_DECLSPEC size_t mpq_out_str __GMP_PROTO ((FILE *, int, mpq_srcptr));
1251#endif
1252
1253#define mpq_set __gmpq_set
1254__GMP_DECLSPEC void mpq_set __GMP_PROTO ((mpq_ptr, mpq_srcptr));
1255
1256#define mpq_set_d __gmpq_set_d
1257__GMP_DECLSPEC void mpq_set_d __GMP_PROTO ((mpq_ptr, double));
1258
1259#define mpq_set_den __gmpq_set_den
1260__GMP_DECLSPEC void mpq_set_den __GMP_PROTO ((mpq_ptr, mpz_srcptr));
1261
1262#define mpq_set_f __gmpq_set_f
1263__GMP_DECLSPEC void mpq_set_f __GMP_PROTO ((mpq_ptr, mpf_srcptr));
1264
1265#define mpq_set_num __gmpq_set_num
1266__GMP_DECLSPEC void mpq_set_num __GMP_PROTO ((mpq_ptr, mpz_srcptr));
1267
1268#define mpq_set_si __gmpq_set_si
1269__GMP_DECLSPEC void mpq_set_si __GMP_PROTO ((mpq_ptr, signed long int, unsigned long int));
1270
1271#define mpq_set_str __gmpq_set_str
1272__GMP_DECLSPEC int mpq_set_str __GMP_PROTO ((mpq_ptr, __gmp_const char *, int));
1273
1274#define mpq_set_ui __gmpq_set_ui
1275__GMP_DECLSPEC void mpq_set_ui __GMP_PROTO ((mpq_ptr, unsigned long int, unsigned long int));
1276
1277#define mpq_set_z __gmpq_set_z
1278__GMP_DECLSPEC void mpq_set_z __GMP_PROTO ((mpq_ptr, mpz_srcptr));
1279
1280#define mpq_sub __gmpq_sub
1281__GMP_DECLSPEC void mpq_sub __GMP_PROTO ((mpq_ptr, mpq_srcptr, mpq_srcptr));
1282
1283#define mpq_swap __gmpq_swap
1284__GMP_DECLSPEC void mpq_swap __GMP_PROTO ((mpq_ptr, mpq_ptr)) __GMP_NOTHROW;
1285
1286
1287/**************** Float (i.e. F) routines.  ****************/
1288
1289#define mpf_abs __gmpf_abs
1290__GMP_DECLSPEC void mpf_abs __GMP_PROTO ((mpf_ptr, mpf_srcptr));
1291
1292#define mpf_add __gmpf_add
1293__GMP_DECLSPEC void mpf_add __GMP_PROTO ((mpf_ptr, mpf_srcptr, mpf_srcptr));
1294
1295#define mpf_add_ui __gmpf_add_ui
1296__GMP_DECLSPEC void mpf_add_ui __GMP_PROTO ((mpf_ptr, mpf_srcptr, unsigned long int));
1297#define mpf_ceil __gmpf_ceil
1298__GMP_DECLSPEC void mpf_ceil __GMP_PROTO ((mpf_ptr, mpf_srcptr));
1299
1300#define mpf_clear __gmpf_clear
1301__GMP_DECLSPEC void mpf_clear __GMP_PROTO ((mpf_ptr));
1302
1303#define mpf_clears __gmpf_clears
1304__GMP_DECLSPEC void mpf_clears __GMP_PROTO ((mpf_ptr, ...));
1305
1306#define mpf_cmp __gmpf_cmp
1307__GMP_DECLSPEC int mpf_cmp __GMP_PROTO ((mpf_srcptr, mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1308
1309#define mpf_cmp_d __gmpf_cmp_d
1310__GMP_DECLSPEC int mpf_cmp_d __GMP_PROTO ((mpf_srcptr, double)) __GMP_ATTRIBUTE_PURE;
1311
1312#define mpf_cmp_si __gmpf_cmp_si
1313__GMP_DECLSPEC int mpf_cmp_si __GMP_PROTO ((mpf_srcptr, signed long int)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1314
1315#define mpf_cmp_ui __gmpf_cmp_ui
1316__GMP_DECLSPEC int mpf_cmp_ui __GMP_PROTO ((mpf_srcptr, unsigned long int)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1317
1318#define mpf_div __gmpf_div
1319__GMP_DECLSPEC void mpf_div __GMP_PROTO ((mpf_ptr, mpf_srcptr, mpf_srcptr));
1320
1321#define mpf_div_2exp __gmpf_div_2exp
1322__GMP_DECLSPEC void mpf_div_2exp __GMP_PROTO ((mpf_ptr, mpf_srcptr, mp_bitcnt_t));
1323
1324#define mpf_div_ui __gmpf_div_ui
1325__GMP_DECLSPEC void mpf_div_ui __GMP_PROTO ((mpf_ptr, mpf_srcptr, unsigned long int));
1326
1327#define mpf_dump __gmpf_dump
1328__GMP_DECLSPEC void mpf_dump __GMP_PROTO ((mpf_srcptr));
1329
1330#define mpf_eq __gmpf_eq
1331__GMP_DECLSPEC int mpf_eq __GMP_PROTO ((mpf_srcptr, mpf_srcptr, mp_bitcnt_t)) __GMP_ATTRIBUTE_PURE;
1332
1333#define mpf_fits_sint_p __gmpf_fits_sint_p
1334__GMP_DECLSPEC int mpf_fits_sint_p __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1335
1336#define mpf_fits_slong_p __gmpf_fits_slong_p
1337__GMP_DECLSPEC int mpf_fits_slong_p __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1338
1339#define mpf_fits_sshort_p __gmpf_fits_sshort_p
1340__GMP_DECLSPEC int mpf_fits_sshort_p __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1341
1342#define mpf_fits_uint_p __gmpf_fits_uint_p
1343__GMP_DECLSPEC int mpf_fits_uint_p __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1344
1345#define mpf_fits_ulong_p __gmpf_fits_ulong_p
1346__GMP_DECLSPEC int mpf_fits_ulong_p __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1347
1348#define mpf_fits_ushort_p __gmpf_fits_ushort_p
1349__GMP_DECLSPEC int mpf_fits_ushort_p __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1350
1351#define mpf_floor __gmpf_floor
1352__GMP_DECLSPEC void mpf_floor __GMP_PROTO ((mpf_ptr, mpf_srcptr));
1353
1354#define mpf_get_d __gmpf_get_d
1355__GMP_DECLSPEC double mpf_get_d __GMP_PROTO ((mpf_srcptr)) __GMP_ATTRIBUTE_PURE;
1356
1357#define mpf_get_d_2exp __gmpf_get_d_2exp
1358__GMP_DECLSPEC double mpf_get_d_2exp __GMP_PROTO ((signed long int *, mpf_srcptr));
1359
1360#define mpf_get_default_prec __gmpf_get_default_prec
1361__GMP_DECLSPEC mp_bitcnt_t mpf_get_default_prec __GMP_PROTO ((void)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1362
1363#define mpf_get_prec __gmpf_get_prec
1364__GMP_DECLSPEC mp_bitcnt_t mpf_get_prec __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1365
1366#define mpf_get_si __gmpf_get_si
1367__GMP_DECLSPEC long mpf_get_si __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1368
1369#define mpf_get_str __gmpf_get_str
1370__GMP_DECLSPEC char *mpf_get_str __GMP_PROTO ((char *, mp_exp_t *, int, size_t, mpf_srcptr));
1371
1372#define mpf_get_ui __gmpf_get_ui
1373__GMP_DECLSPEC unsigned long mpf_get_ui __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1374
1375#define mpf_init __gmpf_init
1376__GMP_DECLSPEC void mpf_init __GMP_PROTO ((mpf_ptr));
1377
1378#define mpf_init2 __gmpf_init2
1379__GMP_DECLSPEC void mpf_init2 __GMP_PROTO ((mpf_ptr, mp_bitcnt_t));
1380
1381#define mpf_inits __gmpf_inits
1382__GMP_DECLSPEC void mpf_inits __GMP_PROTO ((mpf_ptr, ...));
1383
1384#define mpf_init_set __gmpf_init_set
1385__GMP_DECLSPEC void mpf_init_set __GMP_PROTO ((mpf_ptr, mpf_srcptr));
1386
1387#define mpf_init_set_d __gmpf_init_set_d
1388__GMP_DECLSPEC void mpf_init_set_d __GMP_PROTO ((mpf_ptr, double));
1389
1390#define mpf_init_set_si __gmpf_init_set_si
1391__GMP_DECLSPEC void mpf_init_set_si __GMP_PROTO ((mpf_ptr, signed long int));
1392
1393#define mpf_init_set_str __gmpf_init_set_str
1394__GMP_DECLSPEC int mpf_init_set_str __GMP_PROTO ((mpf_ptr, __gmp_const char *, int));
1395
1396#define mpf_init_set_ui __gmpf_init_set_ui
1397__GMP_DECLSPEC void mpf_init_set_ui __GMP_PROTO ((mpf_ptr, unsigned long int));
1398
1399#define mpf_inp_str __gmpf_inp_str
1400#ifdef _GMP_H_HAVE_FILE
1401__GMP_DECLSPEC size_t mpf_inp_str __GMP_PROTO ((mpf_ptr, FILE *, int));
1402#endif
1403
1404#define mpf_integer_p __gmpf_integer_p
1405__GMP_DECLSPEC int mpf_integer_p __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1406
1407#define mpf_mul __gmpf_mul
1408__GMP_DECLSPEC void mpf_mul __GMP_PROTO ((mpf_ptr, mpf_srcptr, mpf_srcptr));
1409
1410#define mpf_mul_2exp __gmpf_mul_2exp
1411__GMP_DECLSPEC void mpf_mul_2exp __GMP_PROTO ((mpf_ptr, mpf_srcptr, mp_bitcnt_t));
1412
1413#define mpf_mul_ui __gmpf_mul_ui
1414__GMP_DECLSPEC void mpf_mul_ui __GMP_PROTO ((mpf_ptr, mpf_srcptr, unsigned long int));
1415
1416#define mpf_neg __gmpf_neg
1417__GMP_DECLSPEC void mpf_neg __GMP_PROTO ((mpf_ptr, mpf_srcptr));
1418
1419#define mpf_out_str __gmpf_out_str
1420#ifdef _GMP_H_HAVE_FILE
1421__GMP_DECLSPEC size_t mpf_out_str __GMP_PROTO ((FILE *, int, size_t, mpf_srcptr));
1422#endif
1423
1424#define mpf_pow_ui __gmpf_pow_ui
1425__GMP_DECLSPEC void mpf_pow_ui __GMP_PROTO ((mpf_ptr, mpf_srcptr, unsigned long int));
1426
1427#define mpf_random2 __gmpf_random2
1428__GMP_DECLSPEC void mpf_random2 __GMP_PROTO ((mpf_ptr, mp_size_t, mp_exp_t));
1429
1430#define mpf_reldiff __gmpf_reldiff
1431__GMP_DECLSPEC void mpf_reldiff __GMP_PROTO ((mpf_ptr, mpf_srcptr, mpf_srcptr));
1432
1433#define mpf_set __gmpf_set
1434__GMP_DECLSPEC void mpf_set __GMP_PROTO ((mpf_ptr, mpf_srcptr));
1435
1436#define mpf_set_d __gmpf_set_d
1437__GMP_DECLSPEC void mpf_set_d __GMP_PROTO ((mpf_ptr, double));
1438
1439#define mpf_set_default_prec __gmpf_set_default_prec
1440__GMP_DECLSPEC void mpf_set_default_prec __GMP_PROTO ((mp_bitcnt_t)) __GMP_NOTHROW;
1441
1442#define mpf_set_prec __gmpf_set_prec
1443__GMP_DECLSPEC void mpf_set_prec __GMP_PROTO ((mpf_ptr, mp_bitcnt_t));
1444
1445#define mpf_set_prec_raw __gmpf_set_prec_raw
1446__GMP_DECLSPEC void mpf_set_prec_raw __GMP_PROTO ((mpf_ptr, mp_bitcnt_t)) __GMP_NOTHROW;
1447
1448#define mpf_set_q __gmpf_set_q
1449__GMP_DECLSPEC void mpf_set_q __GMP_PROTO ((mpf_ptr, mpq_srcptr));
1450
1451#define mpf_set_si __gmpf_set_si
1452__GMP_DECLSPEC void mpf_set_si __GMP_PROTO ((mpf_ptr, signed long int));
1453
1454#define mpf_set_str __gmpf_set_str
1455__GMP_DECLSPEC int mpf_set_str __GMP_PROTO ((mpf_ptr, __gmp_const char *, int));
1456
1457#define mpf_set_ui __gmpf_set_ui
1458__GMP_DECLSPEC void mpf_set_ui __GMP_PROTO ((mpf_ptr, unsigned long int));
1459
1460#define mpf_set_z __gmpf_set_z
1461__GMP_DECLSPEC void mpf_set_z __GMP_PROTO ((mpf_ptr, mpz_srcptr));
1462
1463#define mpf_size __gmpf_size
1464__GMP_DECLSPEC size_t mpf_size __GMP_PROTO ((mpf_srcptr)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1465
1466#define mpf_sqrt __gmpf_sqrt
1467__GMP_DECLSPEC void mpf_sqrt __GMP_PROTO ((mpf_ptr, mpf_srcptr));
1468
1469#define mpf_sqrt_ui __gmpf_sqrt_ui
1470__GMP_DECLSPEC void mpf_sqrt_ui __GMP_PROTO ((mpf_ptr, unsigned long int));
1471
1472#define mpf_sub __gmpf_sub
1473__GMP_DECLSPEC void mpf_sub __GMP_PROTO ((mpf_ptr, mpf_srcptr, mpf_srcptr));
1474
1475#define mpf_sub_ui __gmpf_sub_ui
1476__GMP_DECLSPEC void mpf_sub_ui __GMP_PROTO ((mpf_ptr, mpf_srcptr, unsigned long int));
1477
1478#define mpf_swap __gmpf_swap
1479__GMP_DECLSPEC void mpf_swap __GMP_PROTO ((mpf_ptr, mpf_ptr)) __GMP_NOTHROW;
1480
1481#define mpf_trunc __gmpf_trunc
1482__GMP_DECLSPEC void mpf_trunc __GMP_PROTO ((mpf_ptr, mpf_srcptr));
1483
1484#define mpf_ui_div __gmpf_ui_div
1485__GMP_DECLSPEC void mpf_ui_div __GMP_PROTO ((mpf_ptr, unsigned long int, mpf_srcptr));
1486
1487#define mpf_ui_sub __gmpf_ui_sub
1488__GMP_DECLSPEC void mpf_ui_sub __GMP_PROTO ((mpf_ptr, unsigned long int, mpf_srcptr));
1489
1490#define mpf_urandomb __gmpf_urandomb
1491__GMP_DECLSPEC void mpf_urandomb __GMP_PROTO ((mpf_t, gmp_randstate_t, mp_bitcnt_t));
1492
1493
1494/************ Low level positive-integer (i.e. N) routines.  ************/
1495
1496/* This is ugly, but we need to make user calls reach the prefixed function. */
1497
1498#define mpn_add __MPN(add)
1499#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpn_add)
1500__GMP_DECLSPEC mp_limb_t mpn_add __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_srcptr,mp_size_t));
1501#endif
1502
1503#define mpn_add_1 __MPN(add_1)
1504#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpn_add_1)
1505__GMP_DECLSPEC mp_limb_t mpn_add_1 __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_limb_t)) __GMP_NOTHROW;
1506#endif
1507
1508#define mpn_add_n __MPN(add_n)
1509__GMP_DECLSPEC mp_limb_t mpn_add_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1510
1511#define mpn_addmul_1 __MPN(addmul_1)
1512__GMP_DECLSPEC mp_limb_t mpn_addmul_1 __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_limb_t));
1513
1514#define mpn_cmp __MPN(cmp)
1515#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpn_cmp)
1516__GMP_DECLSPEC int mpn_cmp __GMP_PROTO ((mp_srcptr, mp_srcptr, mp_size_t)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1517#endif
1518
1519#define mpn_divexact_by3(dst,src,size) \
1520  mpn_divexact_by3c (dst, src, size, __GMP_CAST (mp_limb_t, 0))
1521
1522#define mpn_divexact_by3c __MPN(divexact_by3c)
1523__GMP_DECLSPEC mp_limb_t mpn_divexact_by3c __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_limb_t));
1524
1525#define mpn_divmod_1(qp,np,nsize,dlimb) \
1526  mpn_divrem_1 (qp, __GMP_CAST (mp_size_t, 0), np, nsize, dlimb)
1527
1528#define mpn_divrem __MPN(divrem)
1529__GMP_DECLSPEC mp_limb_t mpn_divrem __GMP_PROTO ((mp_ptr, mp_size_t, mp_ptr, mp_size_t, mp_srcptr, mp_size_t));
1530
1531#define mpn_divrem_1 __MPN(divrem_1)
1532__GMP_DECLSPEC mp_limb_t mpn_divrem_1 __GMP_PROTO ((mp_ptr, mp_size_t, mp_srcptr, mp_size_t, mp_limb_t));
1533
1534#define mpn_divrem_2 __MPN(divrem_2)
1535__GMP_DECLSPEC mp_limb_t mpn_divrem_2 __GMP_PROTO ((mp_ptr, mp_size_t, mp_ptr, mp_size_t, mp_srcptr));
1536
1537#define mpn_gcd __MPN(gcd)
1538__GMP_DECLSPEC mp_size_t mpn_gcd __GMP_PROTO ((mp_ptr, mp_ptr, mp_size_t, mp_ptr, mp_size_t));
1539
1540#define mpn_gcd_1 __MPN(gcd_1)
1541__GMP_DECLSPEC mp_limb_t mpn_gcd_1 __GMP_PROTO ((mp_srcptr, mp_size_t, mp_limb_t)) __GMP_ATTRIBUTE_PURE;
1542
1543#define mpn_gcdext_1 __MPN(gcdext_1)
1544__GMP_DECLSPEC mp_limb_t mpn_gcdext_1 __GMP_PROTO ((mp_limb_signed_t *, mp_limb_signed_t *, mp_limb_t, mp_limb_t));
1545
1546#define mpn_gcdext __MPN(gcdext)
1547__GMP_DECLSPEC mp_size_t mpn_gcdext __GMP_PROTO ((mp_ptr, mp_ptr, mp_size_t *, mp_ptr, mp_size_t, mp_ptr, mp_size_t));
1548
1549#define mpn_get_str __MPN(get_str)
1550__GMP_DECLSPEC size_t mpn_get_str __GMP_PROTO ((unsigned char *, int, mp_ptr, mp_size_t));
1551
1552#define mpn_hamdist __MPN(hamdist)
1553__GMP_DECLSPEC mp_bitcnt_t mpn_hamdist __GMP_PROTO ((mp_srcptr, mp_srcptr, mp_size_t)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1554
1555#define mpn_lshift __MPN(lshift)
1556__GMP_DECLSPEC mp_limb_t mpn_lshift __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, unsigned int));
1557
1558#define mpn_mod_1 __MPN(mod_1)
1559__GMP_DECLSPEC mp_limb_t mpn_mod_1 __GMP_PROTO ((mp_srcptr, mp_size_t, mp_limb_t)) __GMP_ATTRIBUTE_PURE;
1560
1561#define mpn_mul __MPN(mul)
1562__GMP_DECLSPEC mp_limb_t mpn_mul __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_srcptr, mp_size_t));
1563
1564#define mpn_mul_1 __MPN(mul_1)
1565__GMP_DECLSPEC mp_limb_t mpn_mul_1 __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_limb_t));
1566
1567#define mpn_mul_n __MPN(mul_n)
1568__GMP_DECLSPEC void mpn_mul_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1569
1570#define mpn_sqr __MPN(sqr)
1571__GMP_DECLSPEC void mpn_sqr __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t));
1572
1573#define mpn_neg __MPN(neg)
1574#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpn_neg)
1575__GMP_DECLSPEC mp_limb_t mpn_neg __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t));
1576#endif
1577
1578#define mpn_com __MPN(com)
1579#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpn_com)
1580__GMP_DECLSPEC void mpn_com __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t));
1581#endif
1582
1583#define mpn_perfect_square_p __MPN(perfect_square_p)
1584__GMP_DECLSPEC int mpn_perfect_square_p __GMP_PROTO ((mp_srcptr, mp_size_t)) __GMP_ATTRIBUTE_PURE;
1585
1586#define mpn_perfect_power_p __MPN(perfect_power_p)
1587__GMP_DECLSPEC int mpn_perfect_power_p __GMP_PROTO ((mp_srcptr, mp_size_t)) __GMP_ATTRIBUTE_PURE;
1588
1589#define mpn_popcount __MPN(popcount)
1590__GMP_DECLSPEC mp_bitcnt_t mpn_popcount __GMP_PROTO ((mp_srcptr, mp_size_t)) __GMP_NOTHROW __GMP_ATTRIBUTE_PURE;
1591
1592#define mpn_pow_1 __MPN(pow_1)
1593__GMP_DECLSPEC mp_size_t mpn_pow_1 __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_limb_t, mp_ptr));
1594
1595/* undocumented now, but retained here for upward compatibility */
1596#define mpn_preinv_mod_1 __MPN(preinv_mod_1)
1597__GMP_DECLSPEC mp_limb_t mpn_preinv_mod_1 __GMP_PROTO ((mp_srcptr, mp_size_t, mp_limb_t, mp_limb_t)) __GMP_ATTRIBUTE_PURE;
1598
1599#define mpn_random __MPN(random)
1600__GMP_DECLSPEC void mpn_random __GMP_PROTO ((mp_ptr, mp_size_t));
1601
1602#define mpn_random2 __MPN(random2)
1603__GMP_DECLSPEC void mpn_random2 __GMP_PROTO ((mp_ptr, mp_size_t));
1604
1605#define mpn_rshift __MPN(rshift)
1606__GMP_DECLSPEC mp_limb_t mpn_rshift __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, unsigned int));
1607
1608#define mpn_scan0 __MPN(scan0)
1609__GMP_DECLSPEC mp_bitcnt_t mpn_scan0 __GMP_PROTO ((mp_srcptr, mp_bitcnt_t)) __GMP_ATTRIBUTE_PURE;
1610
1611#define mpn_scan1 __MPN(scan1)
1612__GMP_DECLSPEC mp_bitcnt_t mpn_scan1 __GMP_PROTO ((mp_srcptr, mp_bitcnt_t)) __GMP_ATTRIBUTE_PURE;
1613
1614#define mpn_set_str __MPN(set_str)
1615__GMP_DECLSPEC mp_size_t mpn_set_str __GMP_PROTO ((mp_ptr, __gmp_const unsigned char *, size_t, int));
1616
1617#define mpn_sqrtrem __MPN(sqrtrem)
1618__GMP_DECLSPEC mp_size_t mpn_sqrtrem __GMP_PROTO ((mp_ptr, mp_ptr, mp_srcptr, mp_size_t));
1619
1620#define mpn_sub __MPN(sub)
1621#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpn_sub)
1622__GMP_DECLSPEC mp_limb_t mpn_sub __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_srcptr,mp_size_t));
1623#endif
1624
1625#define mpn_sub_1 __MPN(sub_1)
1626#if __GMP_INLINE_PROTOTYPES || defined (__GMP_FORCE_mpn_sub_1)
1627__GMP_DECLSPEC mp_limb_t mpn_sub_1 __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_limb_t)) __GMP_NOTHROW;
1628#endif
1629
1630#define mpn_sub_n __MPN(sub_n)
1631__GMP_DECLSPEC mp_limb_t mpn_sub_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1632
1633#define mpn_submul_1 __MPN(submul_1)
1634__GMP_DECLSPEC mp_limb_t mpn_submul_1 __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t, mp_limb_t));
1635
1636#define mpn_tdiv_qr __MPN(tdiv_qr)
1637__GMP_DECLSPEC void mpn_tdiv_qr __GMP_PROTO ((mp_ptr, mp_ptr, mp_size_t, mp_srcptr, mp_size_t, mp_srcptr, mp_size_t));
1638
1639#define mpn_and_n __MPN(and_n)
1640__GMP_DECLSPEC void mpn_and_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1641#define mpn_andn_n __MPN(andn_n)
1642__GMP_DECLSPEC void mpn_andn_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1643#define mpn_nand_n __MPN(nand_n)
1644__GMP_DECLSPEC void mpn_nand_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1645#define mpn_ior_n __MPN(ior_n)
1646__GMP_DECLSPEC void mpn_ior_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1647#define mpn_iorn_n __MPN(iorn_n)
1648__GMP_DECLSPEC void mpn_iorn_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1649#define mpn_nior_n __MPN(nior_n)
1650__GMP_DECLSPEC void mpn_nior_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1651#define mpn_xor_n __MPN(xor_n)
1652__GMP_DECLSPEC void mpn_xor_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1653#define mpn_xnor_n __MPN(xnor_n)
1654__GMP_DECLSPEC void mpn_xnor_n __GMP_PROTO ((mp_ptr, mp_srcptr, mp_srcptr, mp_size_t));
1655
1656#define mpn_copyi __MPN(copyi)
1657__GMP_DECLSPEC void mpn_copyi __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t));
1658#define mpn_copyd __MPN(copyd)
1659__GMP_DECLSPEC void mpn_copyd __GMP_PROTO ((mp_ptr, mp_srcptr, mp_size_t));
1660#define mpn_zero __MPN(zero)
1661__GMP_DECLSPEC void mpn_zero __GMP_PROTO ((mp_ptr, mp_size_t));
1662
1663/**************** mpz inlines ****************/
1664
1665/* The following are provided as inlines where possible, but always exist as
1666   library functions too, for binary compatibility.
1667
1668   Within gmp itself this inlining generally isn't relied on, since it
1669   doesn't get done for all compilers, whereas if something is worth
1670   inlining then it's worth arranging always.
1671
1672   There are two styles of inlining here.  When the same bit of code is
1673   wanted for the inline as for the library version, then __GMP_FORCE_foo
1674   arranges for that code to be emitted and the __GMP_EXTERN_INLINE
1675   directive suppressed, eg. mpz_fits_uint_p.  When a different bit of code
1676   is wanted for the inline than for the library version, then
1677   __GMP_FORCE_foo arranges the inline to be suppressed, eg. mpz_abs.  */
1678
1679#if defined (__GMP_EXTERN_INLINE) && ! defined (__GMP_FORCE_mpz_abs)
1680__GMP_EXTERN_INLINE void
1681mpz_abs (mpz_ptr __gmp_w, mpz_srcptr __gmp_u)
1682{
1683  if (__gmp_w != __gmp_u)
1684    mpz_set (__gmp_w, __gmp_u);
1685  __gmp_w->_mp_size = __GMP_ABS (__gmp_w->_mp_size);
1686}
1687#endif
1688
1689#if GMP_NAIL_BITS == 0
1690#define __GMPZ_FITS_UTYPE_P(z,maxval)					\
1691  mp_size_t  __gmp_n = z->_mp_size;					\
1692  mp_ptr  __gmp_p = z->_mp_d;						\
1693  return (__gmp_n == 0 || (__gmp_n == 1 && __gmp_p[0] <= maxval));
1694#else
1695#define __GMPZ_FITS_UTYPE_P(z,maxval)					\
1696  mp_size_t  __gmp_n = z->_mp_size;					\
1697  mp_ptr  __gmp_p = z->_mp_d;						\
1698  return (__gmp_n == 0 || (__gmp_n == 1 && __gmp_p[0] <= maxval)	\
1699	  || (__gmp_n == 2 && __gmp_p[1] <= ((mp_limb_t) maxval >> GMP_NUMB_BITS)));
1700#endif
1701
1702#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpz_fits_uint_p)
1703#if ! defined (__GMP_FORCE_mpz_fits_uint_p)
1704__GMP_EXTERN_INLINE
1705#endif
1706int
1707mpz_fits_uint_p (mpz_srcptr __gmp_z) __GMP_NOTHROW
1708{
1709  __GMPZ_FITS_UTYPE_P (__gmp_z, __GMP_UINT_MAX);
1710}
1711#endif
1712
1713#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpz_fits_ulong_p)
1714#if ! defined (__GMP_FORCE_mpz_fits_ulong_p)
1715__GMP_EXTERN_INLINE
1716#endif
1717int
1718mpz_fits_ulong_p (mpz_srcptr __gmp_z) __GMP_NOTHROW
1719{
1720  __GMPZ_FITS_UTYPE_P (__gmp_z, __GMP_ULONG_MAX);
1721}
1722#endif
1723
1724#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpz_fits_ushort_p)
1725#if ! defined (__GMP_FORCE_mpz_fits_ushort_p)
1726__GMP_EXTERN_INLINE
1727#endif
1728int
1729mpz_fits_ushort_p (mpz_srcptr __gmp_z) __GMP_NOTHROW
1730{
1731  __GMPZ_FITS_UTYPE_P (__gmp_z, __GMP_USHRT_MAX);
1732}
1733#endif
1734
1735#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpz_get_ui)
1736#if ! defined (__GMP_FORCE_mpz_get_ui)
1737__GMP_EXTERN_INLINE
1738#endif
1739unsigned long
1740mpz_get_ui (mpz_srcptr __gmp_z) __GMP_NOTHROW
1741{
1742  mp_ptr __gmp_p = __gmp_z->_mp_d;
1743  mp_size_t __gmp_n = __gmp_z->_mp_size;
1744  mp_limb_t __gmp_l = __gmp_p[0];
1745  /* This is a "#if" rather than a plain "if" so as to avoid gcc warnings
1746     about "<< GMP_NUMB_BITS" exceeding the type size, and to avoid Borland
1747     C++ 6.0 warnings about condition always true for something like
1748     "__GMP_ULONG_MAX < GMP_NUMB_MASK".  */
1749#if GMP_NAIL_BITS == 0 || defined (_LONG_LONG_LIMB)
1750  /* limb==long and no nails, or limb==longlong, one limb is enough */
1751  return (__gmp_n != 0 ? __gmp_l : 0);
1752#else
1753  /* limb==long and nails, need two limbs when available */
1754  __gmp_n = __GMP_ABS (__gmp_n);
1755  if (__gmp_n <= 1)
1756    return (__gmp_n != 0 ? __gmp_l : 0);
1757  else
1758    return __gmp_l + (__gmp_p[1] << GMP_NUMB_BITS);
1759#endif
1760}
1761#endif
1762
1763#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpz_getlimbn)
1764#if ! defined (__GMP_FORCE_mpz_getlimbn)
1765__GMP_EXTERN_INLINE
1766#endif
1767mp_limb_t
1768mpz_getlimbn (mpz_srcptr __gmp_z, mp_size_t __gmp_n) __GMP_NOTHROW
1769{
1770  mp_limb_t  __gmp_result = 0;
1771  if (__GMP_LIKELY (__gmp_n >= 0 && __gmp_n < __GMP_ABS (__gmp_z->_mp_size)))
1772    __gmp_result = __gmp_z->_mp_d[__gmp_n];
1773  return __gmp_result;
1774}
1775#endif
1776
1777#if defined (__GMP_EXTERN_INLINE) && ! defined (__GMP_FORCE_mpz_neg)
1778__GMP_EXTERN_INLINE void
1779mpz_neg (mpz_ptr __gmp_w, mpz_srcptr __gmp_u)
1780{
1781  if (__gmp_w != __gmp_u)
1782    mpz_set (__gmp_w, __gmp_u);
1783  __gmp_w->_mp_size = - __gmp_w->_mp_size;
1784}
1785#endif
1786
1787#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpz_perfect_square_p)
1788#if ! defined (__GMP_FORCE_mpz_perfect_square_p)
1789__GMP_EXTERN_INLINE
1790#endif
1791int
1792mpz_perfect_square_p (mpz_srcptr __gmp_a)
1793{
1794  mp_size_t __gmp_asize;
1795  int       __gmp_result;
1796
1797  __gmp_asize = __gmp_a->_mp_size;
1798  __gmp_result = (__gmp_asize >= 0);  /* zero is a square, negatives are not */
1799  if (__GMP_LIKELY (__gmp_asize > 0))
1800    __gmp_result = mpn_perfect_square_p (__gmp_a->_mp_d, __gmp_asize);
1801  return __gmp_result;
1802}
1803#endif
1804
1805#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpz_popcount)
1806#if ! defined (__GMP_FORCE_mpz_popcount)
1807__GMP_EXTERN_INLINE
1808#endif
1809mp_bitcnt_t
1810mpz_popcount (mpz_srcptr __gmp_u) __GMP_NOTHROW
1811{
1812  mp_size_t      __gmp_usize;
1813  mp_bitcnt_t    __gmp_result;
1814
1815  __gmp_usize = __gmp_u->_mp_size;
1816  __gmp_result = (__gmp_usize < 0 ? __GMP_ULONG_MAX : 0);
1817  if (__GMP_LIKELY (__gmp_usize > 0))
1818    __gmp_result =  mpn_popcount (__gmp_u->_mp_d, __gmp_usize);
1819  return __gmp_result;
1820}
1821#endif
1822
1823#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpz_set_q)
1824#if ! defined (__GMP_FORCE_mpz_set_q)
1825__GMP_EXTERN_INLINE
1826#endif
1827void
1828mpz_set_q (mpz_ptr __gmp_w, mpq_srcptr __gmp_u)
1829{
1830  mpz_tdiv_q (__gmp_w, mpq_numref (__gmp_u), mpq_denref (__gmp_u));
1831}
1832#endif
1833
1834#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpz_size)
1835#if ! defined (__GMP_FORCE_mpz_size)
1836__GMP_EXTERN_INLINE
1837#endif
1838size_t
1839mpz_size (mpz_srcptr __gmp_z) __GMP_NOTHROW
1840{
1841  return __GMP_ABS (__gmp_z->_mp_size);
1842}
1843#endif
1844
1845
1846/**************** mpq inlines ****************/
1847
1848#if defined (__GMP_EXTERN_INLINE) && ! defined (__GMP_FORCE_mpq_abs)
1849__GMP_EXTERN_INLINE void
1850mpq_abs (mpq_ptr __gmp_w, mpq_srcptr __gmp_u)
1851{
1852  if (__gmp_w != __gmp_u)
1853    mpq_set (__gmp_w, __gmp_u);
1854  __gmp_w->_mp_num._mp_size = __GMP_ABS (__gmp_w->_mp_num._mp_size);
1855}
1856#endif
1857
1858#if defined (__GMP_EXTERN_INLINE) && ! defined (__GMP_FORCE_mpq_neg)
1859__GMP_EXTERN_INLINE void
1860mpq_neg (mpq_ptr __gmp_w, mpq_srcptr __gmp_u)
1861{
1862  if (__gmp_w != __gmp_u)
1863    mpq_set (__gmp_w, __gmp_u);
1864  __gmp_w->_mp_num._mp_size = - __gmp_w->_mp_num._mp_size;
1865}
1866#endif
1867
1868
1869/**************** mpn inlines ****************/
1870
1871/* The comments with __GMPN_ADD_1 below apply here too.
1872
1873   The test for FUNCTION returning 0 should predict well.  If it's assumed
1874   {yp,ysize} will usually have a random number of bits then the high limb
1875   won't be full and a carry out will occur a good deal less than 50% of the
1876   time.
1877
1878   ysize==0 isn't a documented feature, but is used internally in a few
1879   places.
1880
1881   Producing cout last stops it using up a register during the main part of
1882   the calculation, though gcc (as of 3.0) on an "if (mpn_add (...))"
1883   doesn't seem able to move the true and false legs of the conditional up
1884   to the two places cout is generated.  */
1885
1886#define __GMPN_AORS(cout, wp, xp, xsize, yp, ysize, FUNCTION, TEST)     \
1887  do {                                                                  \
1888    mp_size_t  __gmp_i;                                                 \
1889    mp_limb_t  __gmp_x;                                                 \
1890                                                                        \
1891    /* ASSERT ((ysize) >= 0); */                                        \
1892    /* ASSERT ((xsize) >= (ysize)); */                                  \
1893    /* ASSERT (MPN_SAME_OR_SEPARATE2_P (wp, xsize, xp, xsize)); */      \
1894    /* ASSERT (MPN_SAME_OR_SEPARATE2_P (wp, xsize, yp, ysize)); */      \
1895                                                                        \
1896    __gmp_i = (ysize);                                                  \
1897    if (__gmp_i != 0)                                                   \
1898      {                                                                 \
1899        if (FUNCTION (wp, xp, yp, __gmp_i))                             \
1900          {                                                             \
1901            do                                                          \
1902              {                                                         \
1903                if (__gmp_i >= (xsize))                                 \
1904                  {                                                     \
1905                    (cout) = 1;                                         \
1906                    goto __gmp_done;                                    \
1907                  }                                                     \
1908                __gmp_x = (xp)[__gmp_i];                                \
1909              }                                                         \
1910            while (TEST);                                               \
1911          }                                                             \
1912      }                                                                 \
1913    if ((wp) != (xp))                                                   \
1914      __GMPN_COPY_REST (wp, xp, xsize, __gmp_i);                        \
1915    (cout) = 0;                                                         \
1916  __gmp_done:                                                           \
1917    ;                                                                   \
1918  } while (0)
1919
1920#define __GMPN_ADD(cout, wp, xp, xsize, yp, ysize)              \
1921  __GMPN_AORS (cout, wp, xp, xsize, yp, ysize, mpn_add_n,       \
1922               (((wp)[__gmp_i++] = (__gmp_x + 1) & GMP_NUMB_MASK) == 0))
1923#define __GMPN_SUB(cout, wp, xp, xsize, yp, ysize)              \
1924  __GMPN_AORS (cout, wp, xp, xsize, yp, ysize, mpn_sub_n,       \
1925               (((wp)[__gmp_i++] = (__gmp_x - 1) & GMP_NUMB_MASK), __gmp_x == 0))
1926
1927
1928/* The use of __gmp_i indexing is designed to ensure a compile time src==dst
1929   remains nice and clear to the compiler, so that __GMPN_COPY_REST can
1930   disappear, and the load/add/store gets a chance to become a
1931   read-modify-write on CISC CPUs.
1932
1933   Alternatives:
1934
1935   Using a pair of pointers instead of indexing would be possible, but gcc
1936   isn't able to recognise compile-time src==dst in that case, even when the
1937   pointers are incremented more or less together.  Other compilers would
1938   very likely have similar difficulty.
1939
1940   gcc could use "if (__builtin_constant_p(src==dst) && src==dst)" or
1941   similar to detect a compile-time src==dst.  This works nicely on gcc
1942   2.95.x, it's not good on gcc 3.0 where __builtin_constant_p(p==p) seems
1943   to be always false, for a pointer p.  But the current code form seems
1944   good enough for src==dst anyway.
1945
1946   gcc on x86 as usual doesn't give particularly good flags handling for the
1947   carry/borrow detection.  It's tempting to want some multi instruction asm
1948   blocks to help it, and this was tried, but in truth there's only a few
1949   instructions to save and any gain is all too easily lost by register
1950   juggling setting up for the asm.  */
1951
1952#if GMP_NAIL_BITS == 0
1953#define __GMPN_AORS_1(cout, dst, src, n, v, OP, CB)		\
1954  do {								\
1955    mp_size_t  __gmp_i;						\
1956    mp_limb_t  __gmp_x, __gmp_r;                                \
1957								\
1958    /* ASSERT ((n) >= 1); */					\
1959    /* ASSERT (MPN_SAME_OR_SEPARATE_P (dst, src, n)); */	\
1960								\
1961    __gmp_x = (src)[0];						\
1962    __gmp_r = __gmp_x OP (v);                                   \
1963    (dst)[0] = __gmp_r;						\
1964    if (CB (__gmp_r, __gmp_x, (v)))                             \
1965      {								\
1966	(cout) = 1;						\
1967	for (__gmp_i = 1; __gmp_i < (n);)                       \
1968	  {							\
1969	    __gmp_x = (src)[__gmp_i];                           \
1970	    __gmp_r = __gmp_x OP 1;                             \
1971	    (dst)[__gmp_i] = __gmp_r;                           \
1972	    ++__gmp_i;						\
1973	    if (!CB (__gmp_r, __gmp_x, 1))                      \
1974	      {							\
1975		if ((src) != (dst))				\
1976		  __GMPN_COPY_REST (dst, src, n, __gmp_i);      \
1977		(cout) = 0;					\
1978		break;						\
1979	      }							\
1980	  }							\
1981      }								\
1982    else							\
1983      {								\
1984	if ((src) != (dst))					\
1985	  __GMPN_COPY_REST (dst, src, n, 1);			\
1986	(cout) = 0;						\
1987      }								\
1988  } while (0)
1989#endif
1990
1991#if GMP_NAIL_BITS >= 1
1992#define __GMPN_AORS_1(cout, dst, src, n, v, OP, CB)		\
1993  do {								\
1994    mp_size_t  __gmp_i;						\
1995    mp_limb_t  __gmp_x, __gmp_r;				\
1996								\
1997    /* ASSERT ((n) >= 1); */					\
1998    /* ASSERT (MPN_SAME_OR_SEPARATE_P (dst, src, n)); */	\
1999								\
2000    __gmp_x = (src)[0];						\
2001    __gmp_r = __gmp_x OP (v);					\
2002    (dst)[0] = __gmp_r & GMP_NUMB_MASK;				\
2003    if (__gmp_r >> GMP_NUMB_BITS != 0)				\
2004      {								\
2005	(cout) = 1;						\
2006	for (__gmp_i = 1; __gmp_i < (n);)			\
2007	  {							\
2008	    __gmp_x = (src)[__gmp_i];				\
2009	    __gmp_r = __gmp_x OP 1;				\
2010	    (dst)[__gmp_i] = __gmp_r & GMP_NUMB_MASK;		\
2011	    ++__gmp_i;						\
2012	    if (__gmp_r >> GMP_NUMB_BITS == 0)			\
2013	      {							\
2014		if ((src) != (dst))				\
2015		  __GMPN_COPY_REST (dst, src, n, __gmp_i);	\
2016		(cout) = 0;					\
2017		break;						\
2018	      }							\
2019	  }							\
2020      }								\
2021    else							\
2022      {								\
2023	if ((src) != (dst))					\
2024	  __GMPN_COPY_REST (dst, src, n, 1);			\
2025	(cout) = 0;						\
2026      }								\
2027  } while (0)
2028#endif
2029
2030#define __GMPN_ADDCB(r,x,y) ((r) < (y))
2031#define __GMPN_SUBCB(r,x,y) ((x) < (y))
2032
2033#define __GMPN_ADD_1(cout, dst, src, n, v)	     \
2034  __GMPN_AORS_1(cout, dst, src, n, v, +, __GMPN_ADDCB)
2035#define __GMPN_SUB_1(cout, dst, src, n, v)	     \
2036  __GMPN_AORS_1(cout, dst, src, n, v, -, __GMPN_SUBCB)
2037
2038
2039/* Compare {xp,size} and {yp,size}, setting "result" to positive, zero or
2040   negative.  size==0 is allowed.  On random data usually only one limb will
2041   need to be examined to get a result, so it's worth having it inline.  */
2042#define __GMPN_CMP(result, xp, yp, size)                                \
2043  do {                                                                  \
2044    mp_size_t  __gmp_i;                                                 \
2045    mp_limb_t  __gmp_x, __gmp_y;                                        \
2046                                                                        \
2047    /* ASSERT ((size) >= 0); */                                         \
2048                                                                        \
2049    (result) = 0;                                                       \
2050    __gmp_i = (size);                                                   \
2051    while (--__gmp_i >= 0)                                              \
2052      {                                                                 \
2053        __gmp_x = (xp)[__gmp_i];                                        \
2054        __gmp_y = (yp)[__gmp_i];                                        \
2055        if (__gmp_x != __gmp_y)                                         \
2056          {                                                             \
2057            /* Cannot use __gmp_x - __gmp_y, may overflow an "int" */   \
2058            (result) = (__gmp_x > __gmp_y ? 1 : -1);                    \
2059            break;                                                      \
2060          }                                                             \
2061      }                                                                 \
2062  } while (0)
2063
2064
2065#if defined (__GMPN_COPY) && ! defined (__GMPN_COPY_REST)
2066#define __GMPN_COPY_REST(dst, src, size, start)                 \
2067  do {                                                          \
2068    /* ASSERT ((start) >= 0); */                                \
2069    /* ASSERT ((start) <= (size)); */                           \
2070    __GMPN_COPY ((dst)+(start), (src)+(start), (size)-(start)); \
2071  } while (0)
2072#endif
2073
2074/* Copy {src,size} to {dst,size}, starting at "start".  This is designed to
2075   keep the indexing dst[j] and src[j] nice and simple for __GMPN_ADD_1,
2076   __GMPN_ADD, etc.  */
2077#if ! defined (__GMPN_COPY_REST)
2078#define __GMPN_COPY_REST(dst, src, size, start)                 \
2079  do {                                                          \
2080    mp_size_t __gmp_j;                                          \
2081    /* ASSERT ((size) >= 0); */                                 \
2082    /* ASSERT ((start) >= 0); */                                \
2083    /* ASSERT ((start) <= (size)); */                           \
2084    /* ASSERT (MPN_SAME_OR_SEPARATE_P (dst, src, size)); */     \
2085    __GMP_CRAY_Pragma ("_CRI ivdep");                           \
2086    for (__gmp_j = (start); __gmp_j < (size); __gmp_j++)        \
2087      (dst)[__gmp_j] = (src)[__gmp_j];                          \
2088  } while (0)
2089#endif
2090
2091/* Enhancement: Use some of the smarter code from gmp-impl.h.  Maybe use
2092   mpn_copyi if there's a native version, and if we don't mind demanding
2093   binary compatibility for it (on targets which use it).  */
2094
2095#if ! defined (__GMPN_COPY)
2096#define __GMPN_COPY(dst, src, size)   __GMPN_COPY_REST (dst, src, size, 0)
2097#endif
2098
2099
2100#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpn_add)
2101#if ! defined (__GMP_FORCE_mpn_add)
2102__GMP_EXTERN_INLINE
2103#endif
2104mp_limb_t
2105mpn_add (mp_ptr __gmp_wp, mp_srcptr __gmp_xp, mp_size_t __gmp_xsize, mp_srcptr __gmp_yp, mp_size_t __gmp_ysize)
2106{
2107  mp_limb_t  __gmp_c;
2108  __GMPN_ADD (__gmp_c, __gmp_wp, __gmp_xp, __gmp_xsize, __gmp_yp, __gmp_ysize);
2109  return __gmp_c;
2110}
2111#endif
2112
2113#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpn_add_1)
2114#if ! defined (__GMP_FORCE_mpn_add_1)
2115__GMP_EXTERN_INLINE
2116#endif
2117mp_limb_t
2118mpn_add_1 (mp_ptr __gmp_dst, mp_srcptr __gmp_src, mp_size_t __gmp_size, mp_limb_t __gmp_n) __GMP_NOTHROW
2119{
2120  mp_limb_t  __gmp_c;
2121  __GMPN_ADD_1 (__gmp_c, __gmp_dst, __gmp_src, __gmp_size, __gmp_n);
2122  return __gmp_c;
2123}
2124#endif
2125
2126#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpn_cmp)
2127#if ! defined (__GMP_FORCE_mpn_cmp)
2128__GMP_EXTERN_INLINE
2129#endif
2130int
2131mpn_cmp (mp_srcptr __gmp_xp, mp_srcptr __gmp_yp, mp_size_t __gmp_size) __GMP_NOTHROW
2132{
2133  int __gmp_result;
2134  __GMPN_CMP (__gmp_result, __gmp_xp, __gmp_yp, __gmp_size);
2135  return __gmp_result;
2136}
2137#endif
2138
2139#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpn_sub)
2140#if ! defined (__GMP_FORCE_mpn_sub)
2141__GMP_EXTERN_INLINE
2142#endif
2143mp_limb_t
2144mpn_sub (mp_ptr __gmp_wp, mp_srcptr __gmp_xp, mp_size_t __gmp_xsize, mp_srcptr __gmp_yp, mp_size_t __gmp_ysize)
2145{
2146  mp_limb_t  __gmp_c;
2147  __GMPN_SUB (__gmp_c, __gmp_wp, __gmp_xp, __gmp_xsize, __gmp_yp, __gmp_ysize);
2148  return __gmp_c;
2149}
2150#endif
2151
2152#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpn_sub_1)
2153#if ! defined (__GMP_FORCE_mpn_sub_1)
2154__GMP_EXTERN_INLINE
2155#endif
2156mp_limb_t
2157mpn_sub_1 (mp_ptr __gmp_dst, mp_srcptr __gmp_src, mp_size_t __gmp_size, mp_limb_t __gmp_n) __GMP_NOTHROW
2158{
2159  mp_limb_t  __gmp_c;
2160  __GMPN_SUB_1 (__gmp_c, __gmp_dst, __gmp_src, __gmp_size, __gmp_n);
2161  return __gmp_c;
2162}
2163#endif
2164
2165#if defined (__GMP_EXTERN_INLINE) || defined (__GMP_FORCE_mpn_neg)
2166#if ! defined (__GMP_FORCE_mpn_neg)
2167__GMP_EXTERN_INLINE
2168#endif
2169mp_limb_t
2170mpn_neg (mp_ptr __gmp_rp, mp_srcptr __gmp_up, mp_size_t __gmp_n)
2171{
2172  mp_limb_t __gmp_ul, __gmp_cy;
2173  __gmp_cy = 0;
2174  do {
2175      __gmp_ul = *__gmp_up++;
2176      *__gmp_rp++ = -__gmp_ul - __gmp_cy;
2177      __gmp_cy |= __gmp_ul != 0;
2178  } while (--__gmp_n != 0);
2179  return __gmp_cy;
2180}
2181#endif
2182
2183#if defined (__cplusplus)
2184}
2185#endif
2186
2187
2188/* Allow faster testing for negative, zero, and positive.  */
2189#define mpz_sgn(Z) ((Z)->_mp_size < 0 ? -1 : (Z)->_mp_size > 0)
2190#define mpf_sgn(F) ((F)->_mp_size < 0 ? -1 : (F)->_mp_size > 0)
2191#define mpq_sgn(Q) ((Q)->_mp_num._mp_size < 0 ? -1 : (Q)->_mp_num._mp_size > 0)
2192
2193/* When using GCC, optimize certain common comparisons.  */
2194#if defined (__GNUC__) && __GNUC__ >= 2
2195#define mpz_cmp_ui(Z,UI) \
2196  (__builtin_constant_p (UI) && (UI) == 0				\
2197   ? mpz_sgn (Z) : _mpz_cmp_ui (Z,UI))
2198#define mpz_cmp_si(Z,SI) \
2199  (__builtin_constant_p (SI) && (SI) == 0 ? mpz_sgn (Z)			\
2200   : __builtin_constant_p (SI) && (SI) > 0				\
2201    ? _mpz_cmp_ui (Z, __GMP_CAST (unsigned long int, SI))		\
2202   : _mpz_cmp_si (Z,SI))
2203#define mpq_cmp_ui(Q,NUI,DUI) \
2204  (__builtin_constant_p (NUI) && (NUI) == 0				\
2205   ? mpq_sgn (Q) : _mpq_cmp_ui (Q,NUI,DUI))
2206#define mpq_cmp_si(q,n,d)                       \
2207  (__builtin_constant_p ((n) >= 0) && (n) >= 0  \
2208   ? mpq_cmp_ui (q, __GMP_CAST (unsigned long, n), d) \
2209   : _mpq_cmp_si (q, n, d))
2210#else
2211#define mpz_cmp_ui(Z,UI) _mpz_cmp_ui (Z,UI)
2212#define mpz_cmp_si(Z,UI) _mpz_cmp_si (Z,UI)
2213#define mpq_cmp_ui(Q,NUI,DUI) _mpq_cmp_ui (Q,NUI,DUI)
2214#define mpq_cmp_si(q,n,d)  _mpq_cmp_si(q,n,d)
2215#endif
2216
2217
2218/* Using "&" rather than "&&" means these can come out branch-free.  Every
2219   mpz_t has at least one limb allocated, so fetching the low limb is always
2220   allowed.  */
2221#define mpz_odd_p(z)   (((z)->_mp_size != 0) & __GMP_CAST (int, (z)->_mp_d[0]))
2222#define mpz_even_p(z)  (! mpz_odd_p (z))
2223
2224
2225/**************** C++ routines ****************/
2226
2227#ifdef __cplusplus
2228__GMP_DECLSPEC_XX std::ostream& operator<< (std::ostream &, mpz_srcptr);
2229__GMP_DECLSPEC_XX std::ostream& operator<< (std::ostream &, mpq_srcptr);
2230__GMP_DECLSPEC_XX std::ostream& operator<< (std::ostream &, mpf_srcptr);
2231__GMP_DECLSPEC_XX std::istream& operator>> (std::istream &, mpz_ptr);
2232__GMP_DECLSPEC_XX std::istream& operator>> (std::istream &, mpq_ptr);
2233__GMP_DECLSPEC_XX std::istream& operator>> (std::istream &, mpf_ptr);
2234#endif
2235
2236
2237/* Source-level compatibility with GMP 2 and earlier. */
2238#define mpn_divmod(qp,np,nsize,dp,dsize) \
2239  mpn_divrem (qp, __GMP_CAST (mp_size_t, 0), np, nsize, dp, dsize)
2240
2241/* Source-level compatibility with GMP 1.  */
2242#define mpz_mdiv	mpz_fdiv_q
2243#define mpz_mdivmod	mpz_fdiv_qr
2244#define mpz_mmod	mpz_fdiv_r
2245#define mpz_mdiv_ui	mpz_fdiv_q_ui
2246#define mpz_mdivmod_ui(q,r,n,d) \
2247  (((r) == 0) ? mpz_fdiv_q_ui (q,n,d) : mpz_fdiv_qr_ui (q,r,n,d))
2248#define mpz_mmod_ui(r,n,d) \
2249  (((r) == 0) ? mpz_fdiv_ui (n,d) : mpz_fdiv_r_ui (r,n,d))
2250
2251/* Useful synonyms, but not quite compatible with GMP 1.  */
2252#define mpz_div		mpz_fdiv_q
2253#define mpz_divmod	mpz_fdiv_qr
2254#define mpz_div_ui	mpz_fdiv_q_ui
2255#define mpz_divmod_ui	mpz_fdiv_qr_ui
2256#define mpz_div_2exp	mpz_fdiv_q_2exp
2257#define mpz_mod_2exp	mpz_fdiv_r_2exp
2258
2259enum
2260{
2261  GMP_ERROR_NONE = 0,
2262  GMP_ERROR_UNSUPPORTED_ARGUMENT = 1,
2263  GMP_ERROR_DIVISION_BY_ZERO = 2,
2264  GMP_ERROR_SQRT_OF_NEGATIVE = 4,
2265  GMP_ERROR_INVALID_ARGUMENT = 8
2266};
2267
2268/* Define CC and CFLAGS which were used to build this version of GMP */
2269#define __GMP_CC "@CC@"
2270#define __GMP_CFLAGS "@CFLAGS@"
2271
2272/* Major version number is the value of __GNU_MP__ too, above and in mp.h. */
2273#define __GNU_MP_VERSION 5
2274#define __GNU_MP_VERSION_MINOR 0
2275#define __GNU_MP_VERSION_PATCHLEVEL 5
2276#define __GNU_MP_RELEASE (__GNU_MP_VERSION * 10000 + __GNU_MP_VERSION_MINOR * 100 + __GNU_MP_VERSION_PATCHLEVEL)
2277
2278#define __GMP_H__
2279#endif /* __GMP_H__ */
2280