1/* BEGIN LICENSE BLOCK 2 * Version: CMPL 1.1 3 * 4 * The contents of this file are subject to the Cisco-style Mozilla Public 5 * License Version 1.1 (the "License"); you may not use this file except 6 * in compliance with the License. You may obtain a copy of the License 7 * at www.eclipse-clp.org/license. 8 * 9 * Software distributed under the License is distributed on an "AS IS" 10 * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See 11 * the License for the specific language governing rights and limitations 12 * under the License. 13 * 14 * The Original Code is The ECLiPSe Constraint Logic Programming System. 15 * The Initial Developer of the Original Code is Cisco Systems, Inc. 16 * Portions created by the Initial Developer are 17 * Copyright (C) 1989-2006 Cisco Systems, Inc. All Rights Reserved. 18 * 19 * Contributor(s): 20 * 21 * END LICENSE BLOCK */ 22 23/* 24 SccsId = "%W% %E%" 25*/ 26 27/*LINTLIBRARY*/ 28#include "gmp.h" 29 30void mp_set_memory_functions(a,r,f) void *(*a)(),*(*r)(),(*f)(); {} 31 32/**************** Integer (i.e. Z) routines. ****************/ 33 34void mpz_init(x) MP_INT *x; {} 35void mpz_set(x,y) MP_INT *x; MP_INT *y; {} 36void mpz_set_ui(x,y) MP_INT *x; unsigned long int y; {} 37void mpz_set_si(x,y) MP_INT *x; long int y; {} 38int mpz_set_str(x,y,z) MP_INT *x; char *y; int z; {return 0;} 39void mpz_init_set(x,y) MP_INT *x; MP_INT *y; {} 40void mpz_init_set_ui(x,y) MP_INT *x; unsigned long int y; {} 41void mpz_init_set_si(x,y) MP_INT *x; long int y; {} 42int mpz_init_set_str(x,y,z) MP_INT *x; char *y; int z; {return 0;} 43unsigned long int mpz_get_ui(x) MP_INT *x; {return 0;} 44long int mpz_get_si(x) MP_INT *x; {return 0;} 45char * mpz_get_str(x,y,z) char *x; int y; MP_INT *z; {return 0;} 46void mpz_clear(x) MP_INT *x; {} 47void * _mpz_realloc(x,y) MP_INT *x; mp_size y; {return 0;} 48void mpz_add(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 49void mpz_add_ui(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 50void mpz_sub(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 51void mpz_sub_ui(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 52void mpz_mul(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 53void mpz_mul_ui(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 54void mpz_div(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 55void mpz_div_ui(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 56void mpz_mod(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 57void mpz_mod_ui(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 58void mpz_divmod(x,y,z,d) MP_INT *x, *y, *z, *d; {} 59void mpz_divmod_ui(x,y,z,d) MP_INT *x, *y, *z; unsigned long int d; {} 60void mpz_mdiv(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 61void mpz_mdiv_ui(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 62void mpz_mmod(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 63unsigned long int mpz_mmod_ui(x,y,z) MP_INT *x, *y; unsigned long int z; 64 {return 0;} 65void mpz_mdivmod(x,y,z,d) MP_INT *x, *y, *z, *d; {} 66unsigned long int mpz_mdivmod_ui(x,y,z,d) 67 MP_INT *x, *y, *z; unsigned long int d; 68 {return 0;} 69void mpz_sqrt(x,y) MP_INT *x; MP_INT *y; {} 70void mpz_sqrtrem(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 71int mpz_perfect_square_p(x) MP_INT *x; {return 0;} 72int mpz_probab_prime_p(x,y) MP_INT *x; int y; {return 0;} 73void mpz_powm(x,y,z,m) MP_INT *x; MP_INT *y; MP_INT *z; MP_INT *m; {} 74void mpz_powm_ui(x,y,z,m) MP_INT *x,*y; unsigned long int z; MP_INT *m; {} 75void mpz_pow_ui(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 76void mpz_fac_ui(x,y) MP_INT *x; unsigned long int y; {} 77void mpz_gcd(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 78void mpz_gcdext(x,y,z,a,b) MP_INT *x,*y,*z,*a,*b; {} 79void mpz_neg(x,y) MP_INT *x; MP_INT *y; {} 80void mpz_abs(x,y) MP_INT *x; MP_INT *y; {} 81int mpz_cmp(x,y) MP_INT *x; MP_INT *y; {return 0;} 82int mpz_cmp_ui(x,y) MP_INT *x; unsigned long int y; {return 0;} 83int mpz_cmp_si(x,y) MP_INT *x; long int y; {return 0;} 84void mpz_mul_2exp(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 85void mpz_div_2exp(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 86void mpz_mod_2exp(x,y,z) MP_INT *x; MP_INT *y; unsigned long int z; {} 87void mpz_and(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 88void mpz_ior(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 89void mpz_xor(x,y,z) MP_INT *x; MP_INT *y; MP_INT *z; {} 90void mpz_com(x,y) MP_INT *x; MP_INT *y; {} 91 92#ifdef __STDC__ 93#if defined (FILE) || defined (_STDIO_H) || defined (__STDIO_H__) 94void mpz_inp_raw(x,y) MP_INT *x; FILE *y; {} 95void mpz_inp_str(x,y,z) MP_INT *x; FILE *y; int z; {} 96void mpz_out_raw(x,y) FILE *x; MP_INT *y; {} 97void mpz_out_str(x,y,z) FILE *x; int y; MP_INT *z; {} 98#endif 99#else 100void mpz_inp_raw(x,y) MP_INT *x; int *y; {} 101void mpz_inp_str(x,y,z) MP_INT *x; int *y; int z; {} 102void mpz_out_raw(x,y) int *x; MP_INT *y; {} 103void mpz_out_str(x,y,z) int *x; int y; MP_INT *z; {} 104#endif 105 106void mpz_array_init(x,y,z) MP_INT x[]; size_t y; mp_size z; {} 107void mpz_random(x,y) MP_INT *x; mp_size y; {} 108void mpz_random2(x,y) MP_INT *x; mp_size y; {} 109size_t mpz_size(x) MP_INT *x; {return 0;} 110size_t mpz_sizeinbase(x,y) MP_INT *x; int y; {return 0;} 111 112/**************** Rational(x,y) i.e. Q) routines. ****************/ 113 114void mpq_init(x) MP_RAT *x; {} 115void mpq_clear(x) MP_RAT *x; {} 116void mpq_set(x,y) MP_RAT *x; MP_RAT *y; {} 117void mpq_set_ui(x,y,z) MP_RAT *x; unsigned long int y; unsigned long int z; {} 118void mpq_set_si(x,y,z) MP_RAT *x; long int y; unsigned long int z; {} 119void mpq_add(x,y,z) MP_RAT *x; MP_RAT *y; MP_RAT *z; {} 120void mpq_sub(x,y,z) MP_RAT *x; MP_RAT *y; MP_RAT *z; {} 121void mpq_mul(x,y,z) MP_RAT *x; MP_RAT *y; MP_RAT *z; {} 122void mpq_div(x,y,z) MP_RAT *x; MP_RAT *y; MP_RAT *z; {} 123void mpq_neg(x,y) MP_RAT *x; MP_RAT *y; {} 124int mpq_cmp(x,y) MP_RAT *x; MP_RAT *y; {return 0;} 125void mpq_inv(x,y) MP_RAT *x; MP_RAT *y; {} 126void mpq_set_num(x,y) MP_RAT *x; MP_INT *y; {} 127void mpq_set_den(x,y) MP_RAT *x; MP_INT *y; {} 128void mpq_get_num(x,y) MP_INT *x; MP_RAT *y; {} 129void mpq_get_den(x,y) MP_INT *x; MP_RAT *y; {} 130 131/************ Low level positive-integer(x,y) i.e. N) routines. ************/ 132 133mp_limb mpn_add(a,b,c,d,e) mp_ptr a; mp_srcptr b; mp_size c; mp_srcptr d; mp_size e; {return 0;} 134mp_size mpn_sub(a,b,c,d,e) mp_ptr a; mp_srcptr b; mp_size c; mp_srcptr d; mp_size e; {return 0;} 135mp_size mpn_mul(a,b,c,d,e) mp_ptr a; mp_srcptr b; mp_size c; mp_srcptr d; mp_size e; {return 0;} 136mp_size mpn_div(a,b,c,d,e) mp_ptr a; mp_ptr b; mp_size c; mp_srcptr d; mp_size e; {return 0;} 137mp_limb mpn_divmod_1(a,b,c,d,e) mp_ptr a; mp_srcptr b; mp_size c; mp_limb e; {return 0;} 138mp_limb mpn_mod_1(a,b,c) mp_srcptr a; mp_size b; mp_limb c; {return 0;} 139mp_limb mpn_lshift(a,b,c,d) mp_ptr a; mp_srcptr b; mp_size c; unsigned int d; {return 0;} 140mp_size mpn_rshift(a,b,c,d) mp_ptr a; mp_srcptr b; mp_size c; unsigned int d; {return 0;} 141mp_size mpn_rshiftci(a,b,c,d,e) mp_ptr a; mp_srcptr b; mp_size c;unsigned int d; mp_limb e; {return 0;} 142mp_size mpn_sqrt(a,b,c,d) mp_ptr a; mp_ptr b; mp_srcptr c; mp_size d; {return 0;} 143int mpn_cmp(a,b,c) mp_srcptr a; mp_srcptr b; mp_size c; {return 0;} 144