mirrors/z3
3
0
Fork 0
mirror of https://github.com/Z3Prover/z3 synced 2025-04-23 17:15:31 +00:00
Code Activity

Internal consistency: FP exponents are always passed before significands.

Browse source
This commit is contained in:
Christoph M. Wintersteiger 2016-01-04 18:57:15 +00:00
parent 758c9cd7a0
commit 677ff221f8
9 changed files with 256 additions and 256 deletions
Download patch file Download diff file Expand all files Collapse all files

358
src/util/mpf.cpp
View file

File diff suppressed because it is too large Load diff

54
src/util/mpf.h
View file

@ -37,7 +37,7 @@ typedef enum {
typedef int64 mpf_exp_t;
class mpf {
class mpf {
friend class mpf_manager;
friend class scoped_mpf;
unsigned ebits:15;
@ -47,11 +47,11 @@ class mpf {
mpf_exp_t exponent;
mpf & operator=(mpf const & other) { UNREACHABLE(); return *this; }
void set(unsigned _ebits, unsigned _sbits);
public:
public:
mpf();
mpf(unsigned ebits, unsigned sbits);
mpf(mpf const & other);
~mpf();
~mpf();
unsigned get_ebits() const { return ebits; }
unsigned get_sbits() const { return sbits; }
void swap(mpf & other);
@ -74,14 +74,14 @@ public:
void set(mpf & o, unsigned ebits, unsigned sbits, double value);
void set(mpf & o, unsigned ebits, unsigned sbits, mpf_rounding_mode rm, mpq const & value);
void set(mpf & o, unsigned ebits, unsigned sbits, mpf_rounding_mode rm, char const * value);
void set(mpf & o, unsigned ebits, unsigned sbits, mpf_rounding_mode rm, mpq const & significand, mpz const & exponent);
void set(mpf & o, unsigned ebits, unsigned sbits, bool sign, uint64 significand, mpf_exp_t exponent);
void set(mpf & o, unsigned ebits, unsigned sbits, bool sign, mpz const & significand, mpf_exp_t exponent);
void set(mpf & o, unsigned ebits, unsigned sbits, mpf_rounding_mode rm, mpz const & exponent, mpq const & significand);
void set(mpf & o, unsigned ebits, unsigned sbits, bool sign, mpf_exp_t exponent, uint64 significand);
void set(mpf & o, unsigned ebits, unsigned sbits, bool sign, mpf_exp_t exponent, mpz const & significand);
void set(mpf & o, mpf const & x);
void set(mpf & o, unsigned ebits, unsigned sbits, mpf_rounding_mode rm, mpf const & x);
void del(mpf & x) {
m_mpz_manager.del(x.significand);
m_mpz_manager.del(x.significand);
}
void abs(mpf & o);
@ -97,14 +97,14 @@ public:
bool is_nzero(mpf const & x);
bool is_pzero(mpf const & x);
// structural eq
bool eq_core(mpf const & x, mpf const & y) {
return
x.ebits == y.ebits &&
x.sbits == y.sbits &&
x.sign == y.sign &&
m_mpz_manager.eq(x.significand, y.significand) &&
return
x.ebits == y.ebits &&
x.sbits == y.sbits &&
x.sign == y.sign &&
m_mpz_manager.eq(x.significand, y.significand) &&
x.exponent == y.exponent;
}
@ -119,7 +119,7 @@ public:
void add(mpf_rounding_mode rm, mpf const & x, mpf const & y, mpf & o);
void sub(mpf_rounding_mode rm, mpf const & x, mpf const & y, mpf & o);
void mul(mpf_rounding_mode rm, mpf const & x, mpf const & y, mpf & o);
void div(mpf_rounding_mode rm, mpf const & x, mpf const & y, mpf & o);
void div(mpf_rounding_mode rm, mpf const & x, mpf const & y, mpf & o);
void fma(mpf_rounding_mode rm, mpf const & x, mpf const & y, mpf const &z, mpf & o);
@ -143,10 +143,10 @@ public:
double to_double(mpf const & x);
float to_float(mpf const & x);
bool sgn(mpf const & x) const { return x.sign; }
const mpz & sig(mpf const & x) const { return x.significand; }
void sig_normalized(mpf const & x, mpz & res) {
void sig_normalized(mpf const & x, mpz & res) {
mpf t;
set(t, x);
unpack(t, true);
@ -154,7 +154,7 @@ public:
del(t);
}
const mpf_exp_t & exp(mpf const & x) const { return x.exponent; }
mpf_exp_t exp_normalized(mpf const & x) {
mpf_exp_t exp_normalized(mpf const & x) {
mpf t;
set(t, x);
unpack(t, true);
@ -186,9 +186,9 @@ public:
unsynch_mpz_manager & mpz_manager(void) { return m_mpz_manager; }
unsynch_mpq_manager & mpq_manager(void) { return m_mpq_manager; }
unsigned hash(mpf const & a) {
return hash_u_u(m_mpz_manager.hash(a.significand),
m_mpz_manager.hash(hash_ull(a.exponent)));
unsigned hash(mpf const & a) {
return hash_u_u(m_mpz_manager.hash(a.significand),
m_mpz_manager.hash(hash_ull(a.exponent)));
}
void mk_max_value(unsigned ebits, unsigned sbits, bool sign, mpf & o);
@ -202,7 +202,7 @@ public:
/**
\brief Return the biggest k s.t. 2^k <= a.
\remark Return 0 if a is not positive.
*/
unsigned prev_power_of_two(mpf const & a);
@ -216,16 +216,16 @@ protected:
bool has_bot_exp(mpf const & x);
bool has_top_exp(mpf const & x);
void unpack(mpf & o, bool normalize);
void unpack(mpf & o, bool normalize);
void add_sub(mpf_rounding_mode rm, mpf const & x, mpf const & y, mpf & o, bool sub);
void round(mpf_rounding_mode rm, mpf & o);
void round_sqrt(mpf_rounding_mode rm, mpf & o);
void round_sqrt(mpf_rounding_mode rm, mpf & o);
void mk_round_inf(mpf_rounding_mode rm, mpf & o);
void mk_round_inf(mpf_rounding_mode rm, mpf & o);
// Convert x into a mpz numeral. zm is the manager that owns o.
void to_mpz(mpf const & x, unsynch_mpz_manager & zm, mpz & o);
void to_mpz(mpf const & x, scoped_mpz & o) { to_mpz(x, o.m(), o); }
void to_mpz(mpf const & x, scoped_mpz & o) { to_mpz(x, o.m(), o); }
class powers2 {
unsynch_mpz_manager & m;
@ -239,7 +239,7 @@ protected:
dispose(m_p);
dispose(m_pn);
dispose(m_pm1);
dispose(m_pm1n);
dispose(m_pm1n);
}
void dispose(u_map<mpz*> & map) {
@ -275,7 +275,7 @@ protected:
m.dec(*new_obj);
if (negated) m.neg(*new_obj);
return *new_obj;
}
}
}
};