<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
<title>CVC3: rational-gmp.cpp Source File</title>
<link href="tabs.css" rel="stylesheet" type="text/css"/>
<link href="doxygen.css" rel="stylesheet" type="text/css"/>
</head>
<body>
<!-- Generated by Doxygen 1.7.4 -->
<div id="top">
<div id="titlearea">
<table cellspacing="0" cellpadding="0">
<tbody>
<tr style="height: 56px;">
<td style="padding-left: 0.5em;">
<div id="projectname">CVC3 <span id="projectnumber">2.4.1</span></div>
</td>
</tr>
</tbody>
</table>
</div>
<div id="navrow1" class="tabs">
<ul class="tablist">
<li><a href="index.html"><span>Main Page</span></a></li>
<li><a href="pages.html"><span>Related Pages</span></a></li>
<li><a href="modules.html"><span>Modules</span></a></li>
<li><a href="namespaces.html"><span>Namespaces</span></a></li>
<li><a href="annotated.html"><span>Classes</span></a></li>
<li class="current"><a href="files.html"><span>Files</span></a></li>
</ul>
</div>
<div id="navrow2" class="tabs2">
<ul class="tablist">
<li><a href="files.html"><span>File List</span></a></li>
<li><a href="globals.html"><span>File Members</span></a></li>
</ul>
</div>
<div class="header">
<div class="headertitle">
<div class="title">rational-gmp.cpp</div> </div>
</div>
<div class="contents">
<a href="rational-gmp_8cpp.html">Go to the documentation of this file.</a><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/*****************************************************************************/</span><span class="comment"></span>
<a name="l00002"></a>00002 <span class="comment">/*!</span>
<a name="l00003"></a>00003 <span class="comment"> * \file rational-gmp.cpp</span>
<a name="l00004"></a>00004 <span class="comment"> *</span>
<a name="l00005"></a>00005 <span class="comment"> * \brief Implementation of class Rational using GMP library (C interface)</span>
<a name="l00006"></a>00006 <span class="comment"> *</span>
<a name="l00007"></a>00007 <span class="comment"> * Author: Sergey Berezin</span>
<a name="l00008"></a>00008 <span class="comment"> *</span>
<a name="l00009"></a>00009 <span class="comment"> * Created: Mon Aug 4 10:06:04 2003</span>
<a name="l00010"></a>00010 <span class="comment"> *</span>
<a name="l00011"></a>00011 <span class="comment"> * <hr></span>
<a name="l00012"></a>00012 <span class="comment"> * License to use, copy, modify, sell and/or distribute this software</span>
<a name="l00013"></a>00013 <span class="comment"> * and its documentation for any purpose is hereby granted without</span>
<a name="l00014"></a>00014 <span class="comment"> * royalty, subject to the terms and conditions defined in the \ref</span>
<a name="l00015"></a>00015 <span class="comment"> * LICENSE file provided with this distribution.</span>
<a name="l00016"></a>00016 <span class="comment"> *</span>
<a name="l00017"></a>00017 <span class="comment"> * <hr></span>
<a name="l00018"></a>00018 <span class="comment"> *</span>
<a name="l00019"></a>00019 <span class="comment"> */</span>
<a name="l00020"></a>00020 <span class="comment">/*****************************************************************************/</span>
<a name="l00021"></a>00021
<a name="l00022"></a>00022 <span class="preprocessor">#ifdef RATIONAL_GMP</span>
<a name="l00023"></a>00023 <span class="preprocessor"></span>
<a name="l00024"></a>00024 <span class="preprocessor">#include "<a class="code" href="compat__hash__set_8h.html">compat_hash_set.h</a>"</span>
<a name="l00025"></a>00025 <span class="preprocessor">#include "<a class="code" href="rational_8h.html">rational.h</a>"</span>
<a name="l00026"></a>00026
<a name="l00027"></a>00027 <span class="preprocessor">#include <climits></span>
<a name="l00028"></a>00028 <span class="preprocessor">#include <sstream></span>
<a name="l00029"></a>00029 <span class="preprocessor">#include <gmp.h></span>
<a name="l00030"></a>00030 <span class="preprocessor">#include <limits.h></span>
<a name="l00031"></a>00031
<a name="l00032"></a>00032 <span class="keyword">namespace </span>CVC3 {
<a name="l00033"></a>00033
<a name="l00034"></a>00034 <span class="keyword">using namespace </span>std;
<a name="l00035"></a>00035 <span class="comment"></span>
<a name="l00036"></a>00036 <span class="comment"> //! Implementation of the forward-declared internal class</span>
<a name="l00037"></a>00037 <span class="comment"></span> <span class="keyword">class </span>Rational::Impl {
<a name="l00038"></a>00038 mpq_t d_n;<span class="comment"></span>
<a name="l00039"></a>00039 <span class="comment"> //! Make the rational number canonical</span>
<a name="l00040"></a>00040 <span class="comment"></span> <span class="keywordtype">void</span> canonicalize() { mpq_canonicalize(d_n); }
<a name="l00041"></a>00041 <span class="keyword">public</span>:<span class="comment"></span>
<a name="l00042"></a>00042 <span class="comment"> //! Default Constructor</span>
<a name="l00043"></a>00043 <span class="comment"></span> Impl() { mpq_init(d_n); }<span class="comment"></span>
<a name="l00044"></a>00044 <span class="comment"> //! Copy constructor (assumes x is canonicalized)</span>
<a name="l00045"></a>00045 <span class="comment"></span> Impl(<span class="keyword">const</span> Impl &x) { mpq_init(d_n); mpq_set(d_n, x.d_n); }<span class="comment"></span>
<a name="l00046"></a>00046 <span class="comment"> //! Constructor from mpq_t</span>
<a name="l00047"></a>00047 <span class="comment"></span> Impl(mpq_t n) {
<a name="l00048"></a>00048 mpq_init(d_n);
<a name="l00049"></a>00049 mpq_set(d_n, n);
<a name="l00050"></a>00050 canonicalize();
<a name="l00051"></a>00051 }<span class="comment"></span>
<a name="l00052"></a>00052 <span class="comment"> //! Constructor from a pair of mpz_t (integers)</span>
<a name="l00053"></a>00053 <span class="comment"></span> Impl(mpz_t n, mpz_t d) {
<a name="l00054"></a>00054 mpq_init(d_n);
<a name="l00055"></a>00055 mpq_set_num(d_n, n); mpq_set_den(d_n, d);
<a name="l00056"></a>00056 canonicalize();
<a name="l00057"></a>00057 }<span class="comment"></span>
<a name="l00058"></a>00058 <span class="comment"> //! Constructor from a single mpz_t (integer)</span>
<a name="l00059"></a>00059 <span class="comment"></span> Impl(mpz_t n) {
<a name="l00060"></a>00060 mpq_init(d_n);
<a name="l00061"></a>00061 mpq_set_num(d_n, n);
<a name="l00062"></a>00062 canonicalize();
<a name="l00063"></a>00063 }<span class="comment"></span>
<a name="l00064"></a>00064 <span class="comment"> //! Constructor from a pair of integers</span>
<a name="l00065"></a>00065 <span class="comment"></span> Impl(<span class="keywordtype">long</span> <span class="keywordtype">int</span> n, <span class="keywordtype">long</span> <span class="keywordtype">int</span> d);<span class="comment"></span>
<a name="l00066"></a>00066 <span class="comment"> //! Constructor from a pair of unsigned integers</span>
<a name="l00067"></a>00067 <span class="comment"></span> Impl(<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> n, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> d, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <span class="comment">/* dummy arg */</span>);<span class="comment"></span>
<a name="l00068"></a>00068 <span class="comment"> //! Constructor from a string</span>
<a name="l00069"></a>00069 <span class="comment"></span> Impl(<span class="keyword">const</span> <span class="keywordtype">string</span> &n, <span class="keywordtype">int</span> base);<span class="comment"></span>
<a name="l00070"></a>00070 <span class="comment"> //! Constructor from a pair of strings</span>
<a name="l00071"></a>00071 <span class="comment"></span> Impl(<span class="keyword">const</span> <span class="keywordtype">string</span> &n, <span class="keyword">const</span> <span class="keywordtype">string</span>& d, <span class="keywordtype">int</span> base);
<a name="l00072"></a>00072 <span class="comment">// Destructor</span>
<a name="l00073"></a>00073 <span class="keyword">virtual</span> ~Impl() { mpq_clear(d_n); }
<a name="l00074"></a>00074 <span class="comment"></span>
<a name="l00075"></a>00075 <span class="comment"> //! Assignment</span>
<a name="l00076"></a>00076 <span class="comment"></span> Impl& operator=(<span class="keyword">const</span> Impl& x) {
<a name="l00077"></a>00077 <span class="keywordflow">if</span>(<span class="keyword">this</span> == &x) <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00078"></a>00078 mpq_set(d_n, x.d_n);
<a name="l00079"></a>00079 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00080"></a>00080 }
<a name="l00081"></a>00081 <span class="comment"></span>
<a name="l00082"></a>00082 <span class="comment"> //! Get numerator</span>
<a name="l00083"></a>00083 <span class="comment"></span> Impl getNum()<span class="keyword"> const </span>{
<a name="l00084"></a>00084 <span class="keywordflow">return</span> Impl(mpq_numref(const_cast<Impl*>(<span class="keyword">this</span>)->d_n));
<a name="l00085"></a>00085 }<span class="comment"></span>
<a name="l00086"></a>00086 <span class="comment"> //! Get denominator</span>
<a name="l00087"></a>00087 <span class="comment"></span> Impl getDen()<span class="keyword"> const </span>{
<a name="l00088"></a>00088 <span class="keywordflow">return</span> Impl(mpq_denref(const_cast<Impl*>(<span class="keyword">this</span>)->d_n));
<a name="l00089"></a>00089 }
<a name="l00090"></a>00090
<a name="l00091"></a>00091 <span class="keywordtype">int</span> getInt()<span class="keyword"> const </span>{
<a name="l00092"></a>00092 <span class="comment">// Check for overflow</span>
<a name="l00093"></a>00093 <span class="keyword">static</span> Impl <a class="code" href="namespaceMiniSat.html#a74c8343998008d4d992e491ec26d4d6a">min</a>((<span class="keywordtype">int</span>)INT_MIN, 1), <a class="code" href="namespaceCVC3.html#a03dcd07dcbd01da970af13f1dfc5e2dd">max</a>((<span class="keywordtype">int</span>)INT_MAX, 1);
<a name="l00094"></a>00094 <a class="code" href="debug_8h.html#a2637b2fffa22e3c9fad40cda8fcc3bce" title="If something goes horribly wrong, print a message and abort immediately with exit(1).">FatalAssert</a>(isInteger() && <a class="code" href="namespaceMiniSat.html#a74c8343998008d4d992e491ec26d4d6a">min</a> <= *<span class="keyword">this</span> && *<span class="keyword">this</span> <= <a class="code" href="namespaceCVC3.html#a03dcd07dcbd01da970af13f1dfc5e2dd">max</a>,
<a name="l00095"></a>00095 <span class="stringliteral">"Rational::getInt(): Arithmetic overflow for "</span>
<a name="l00096"></a>00096 +toString());
<a name="l00097"></a>00097 <span class="keywordflow">return</span> mpz_get_si(mpq_numref(d_n));
<a name="l00098"></a>00098 }
<a name="l00099"></a>00099
<a name="l00100"></a>00100 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> getUnsigned()<span class="keyword"> const </span>{
<a name="l00101"></a>00101 <span class="comment">// Check for overflow</span>
<a name="l00102"></a>00102 <span class="keyword">static</span> Impl <a class="code" href="namespaceMiniSat.html#a74c8343998008d4d992e491ec26d4d6a">min</a>(0, 1, 0), <a class="code" href="namespaceCVC3.html#a03dcd07dcbd01da970af13f1dfc5e2dd">max</a>(UINT_MAX, 1, 0);
<a name="l00103"></a>00103 <a class="code" href="debug_8h.html#a2637b2fffa22e3c9fad40cda8fcc3bce" title="If something goes horribly wrong, print a message and abort immediately with exit(1).">FatalAssert</a>(<a class="code" href="namespaceMiniSat.html#a74c8343998008d4d992e491ec26d4d6a">min</a> <= *<span class="keyword">this</span> && *<span class="keyword">this</span> <= <a class="code" href="namespaceCVC3.html#a03dcd07dcbd01da970af13f1dfc5e2dd">max</a>,
<a name="l00104"></a>00104 <span class="stringliteral">"Rational::getUnsigned(): Arithmetic overflow for "</span>
<a name="l00105"></a>00105 +toString());
<a name="l00106"></a>00106 <span class="keywordflow">return</span> mpz_get_ui(mpq_numref(d_n));
<a name="l00107"></a>00107 }
<a name="l00108"></a>00108
<a name="l00109"></a>00109 Unsigned getUnsignedMP() <span class="keyword">const</span>;
<a name="l00110"></a>00110 <span class="comment"></span>
<a name="l00111"></a>00111 <span class="comment"> //! Unary minus</span>
<a name="l00112"></a>00112 <span class="comment"></span> Impl <a class="code" href="namespaceCVC3.html#aacf567dce1c762f957267427472bd959">operator-</a>() <span class="keyword">const</span>;<span class="comment"></span>
<a name="l00113"></a>00113 <span class="comment"> //! Get the floor</span>
<a name="l00114"></a>00114 <span class="comment"></span> Impl floor() <span class="keyword">const</span>;<span class="comment"></span>
<a name="l00115"></a>00115 <span class="comment"> //! Get the ceiling</span>
<a name="l00116"></a>00116 <span class="comment"></span> Impl ceil() <span class="keyword">const</span>;
<a name="l00117"></a>00117 <span class="comment"></span>
<a name="l00118"></a>00118 <span class="comment"> //! Testing whether the denominator is 1</span>
<a name="l00119"></a>00119 <span class="comment"></span> <span class="keywordtype">bool</span> isInteger() <span class="keyword">const</span>;
<a name="l00120"></a>00120 <span class="comment"></span>
<a name="l00121"></a>00121 <span class="comment"> //! Equality</span>
<a name="l00122"></a>00122 <span class="comment"></span> <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a8e164436388f2d87c971d9bbde973c58">operator==</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00123"></a>00123 <span class="keywordflow">return</span> mpq_equal(x.d_n, y.d_n);
<a name="l00124"></a>00124 }
<a name="l00125"></a>00125 <span class="comment"></span>
<a name="l00126"></a>00126 <span class="comment"> //! Dis-equality</span>
<a name="l00127"></a>00127 <span class="comment"></span> <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a5aa953c549c2e103f3834c48bf6cb9a1">operator!=</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00128"></a>00128 <span class="keywordflow">return</span> !mpq_equal(x.d_n, y.d_n);
<a name="l00129"></a>00129 }<span class="comment"></span>
<a name="l00130"></a>00130 <span class="comment"> //! Less than</span>
<a name="l00131"></a>00131 <span class="comment"></span> <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#ad3e3964a0b8cd9e2749de47b053b9d97">operator<</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00132"></a>00132 <span class="keywordflow">return</span> mpq_cmp(x.d_n, y.d_n) < 0;
<a name="l00133"></a>00133 }
<a name="l00134"></a>00134
<a name="l00135"></a>00135 <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#abccc88aac4f7652def737f1081dc7a89">operator<=</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00136"></a>00136 <span class="keywordflow">return</span> mpq_cmp(x.d_n, y.d_n) <= 0;
<a name="l00137"></a>00137 }
<a name="l00138"></a>00138
<a name="l00139"></a>00139 <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a0d82fd3eb68860cbd01ae86b2b9e3c66">operator></a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00140"></a>00140 <span class="keywordflow">return</span> mpq_cmp(x.d_n, y.d_n) > 0;
<a name="l00141"></a>00141 }
<a name="l00142"></a>00142
<a name="l00143"></a>00143 <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#af997ba8407b661bf2ffe2cb6f52c3e3b">operator>=</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00144"></a>00144 <span class="keywordflow">return</span> mpq_cmp(x.d_n, y.d_n) >= 0;
<a name="l00145"></a>00145 }
<a name="l00146"></a>00146 <span class="comment"></span>
<a name="l00147"></a>00147 <span class="comment"> //! Addition</span>
<a name="l00148"></a>00148 <span class="comment"></span> <span class="keyword">friend</span> Impl <a class="code" href="namespaceCVC3.html#a286cf8699acada708816e72c6b436b90">operator+</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00149"></a>00149 Impl res;
<a name="l00150"></a>00150 mpq_add(res.d_n, x.d_n, y.d_n);
<a name="l00151"></a>00151 <span class="keywordflow">return</span> res;
<a name="l00152"></a>00152 }
<a name="l00153"></a>00153 <span class="comment"></span>
<a name="l00154"></a>00154 <span class="comment"> //! Subtraction</span>
<a name="l00155"></a>00155 <span class="comment"></span> <span class="keyword">friend</span> Impl <a class="code" href="namespaceCVC3.html#aacf567dce1c762f957267427472bd959">operator-</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00156"></a>00156 Impl res;
<a name="l00157"></a>00157 mpq_sub(res.d_n, x.d_n, y.d_n);
<a name="l00158"></a>00158 <span class="keywordflow">return</span> res;
<a name="l00159"></a>00159 }
<a name="l00160"></a>00160 <span class="comment"></span>
<a name="l00161"></a>00161 <span class="comment"> //! Multiplication</span>
<a name="l00162"></a>00162 <span class="comment"></span> <span class="keyword">friend</span> Impl <a class="code" href="namespaceCVC3.html#a300bc9244236ebdb1bff90b0b453034c">operator*</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00163"></a>00163 Impl res;
<a name="l00164"></a>00164 mpq_mul(res.d_n, x.d_n, y.d_n);
<a name="l00165"></a>00165 <span class="keywordflow">return</span> res;
<a name="l00166"></a>00166 }
<a name="l00167"></a>00167 <span class="comment"></span>
<a name="l00168"></a>00168 <span class="comment"> //! Division</span>
<a name="l00169"></a>00169 <span class="comment"></span> <span class="keyword">friend</span> Impl <a class="code" href="namespaceCVC3.html#a069aa16342bb9958a3d576a18a390248">operator/</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00170"></a>00170 Impl res;
<a name="l00171"></a>00171 mpq_div(res.d_n, x.d_n, y.d_n);
<a name="l00172"></a>00172 <span class="keywordflow">return</span> res;
<a name="l00173"></a>00173 }
<a name="l00174"></a>00174
<a name="l00175"></a>00175 <span class="keyword">friend</span> Impl operator%(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00176"></a>00176 <a class="code" href="debug_8h.html#a40dac3bdb2166ffc852ee8b1489d2b56">DebugAssert</a>(x.isInteger() && y.isInteger(),
<a name="l00177"></a>00177 <span class="stringliteral">"Impl % Impl: x and y must be integers"</span>);
<a name="l00178"></a>00178 mpz_t res;
<a name="l00179"></a>00179 mpz_init(res);
<a name="l00180"></a>00180 <span class="comment">// Put the remainder directly into 'res'</span>
<a name="l00181"></a>00181 mpz_fdiv_r(res, mpq_numref(x.d_n), mpq_numref(y.d_n));
<a name="l00182"></a>00182 Impl r(res);
<a name="l00183"></a>00183 mpz_clear(res);
<a name="l00184"></a>00184 <span class="keywordflow">return</span> r;
<a name="l00185"></a>00185 }
<a name="l00186"></a>00186 <span class="comment"></span>
<a name="l00187"></a>00187 <span class="comment"> //! Compute the remainder of x/y</span>
<a name="l00188"></a>00188 <span class="comment"></span> <span class="keyword">friend</span> Impl mod(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00189"></a>00189 <a class="code" href="debug_8h.html#a40dac3bdb2166ffc852ee8b1489d2b56">DebugAssert</a>(x.isInteger() && y.isInteger(),
<a name="l00190"></a>00190 <span class="stringliteral">"Rational::Impl::mod(): x="</span>+x.toString()
<a name="l00191"></a>00191 +<span class="stringliteral">", y="</span>+y.toString());
<a name="l00192"></a>00192 mpz_t res;
<a name="l00193"></a>00193 mpz_init(res);
<a name="l00194"></a>00194 mpz_mod(res, mpq_numref(x.d_n), mpq_numref(y.d_n));
<a name="l00195"></a>00195 Impl r(res);
<a name="l00196"></a>00196 mpz_clear(res);
<a name="l00197"></a>00197 <span class="keywordflow">return</span> r;
<a name="l00198"></a>00198 }
<a name="l00199"></a>00199
<a name="l00200"></a>00200 <span class="keyword">friend</span> Impl intRoot(<span class="keyword">const</span> Impl& x, <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <span class="keywordtype">int</span> y) {
<a name="l00201"></a>00201 <a class="code" href="debug_8h.html#a40dac3bdb2166ffc852ee8b1489d2b56">DebugAssert</a>(x.isInteger(),
<a name="l00202"></a>00202 <span class="stringliteral">"Rational::Impl::intRoot(): x="</span>+x.toString());
<a name="l00203"></a>00203 mpz_t res;
<a name="l00204"></a>00204 mpz_init(res);
<a name="l00205"></a>00205 <span class="keywordtype">int</span> exact = mpz_root(res, mpq_numref(x.d_n), y);
<a name="l00206"></a>00206 <span class="keywordflow">if</span> (!exact) {
<a name="l00207"></a>00207 mpz_set_ui(res, 0);
<a name="l00208"></a>00208 }
<a name="l00209"></a>00209 Impl r(res);
<a name="l00210"></a>00210 mpz_clear(res);
<a name="l00211"></a>00211 <span class="keywordflow">return</span> r;
<a name="l00212"></a>00212 }
<a name="l00213"></a>00213
<a name="l00214"></a>00214 <span class="keyword">friend</span> Impl gcd(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00215"></a>00215 <a class="code" href="debug_8h.html#a40dac3bdb2166ffc852ee8b1489d2b56">DebugAssert</a>(x.isInteger() && y.isInteger(),
<a name="l00216"></a>00216 <span class="stringliteral">"Rational::Impl::gcd(): x="</span>+x.toString()
<a name="l00217"></a>00217 +<span class="stringliteral">", y="</span>+y.toString());
<a name="l00218"></a>00218 <a class="code" href="kinds_8h.html#aa10c9e8951b8ccf714a59ec321bdac5ba7fa27e82c6c4f69434225ed81e5d151e">TRACE</a>(<span class="stringliteral">"rational"</span>, <span class="stringliteral">"Impl::gcd("</span>, x, <span class="stringliteral">", "</span>+y.toString()+<span class="stringliteral">") {"</span>);
<a name="l00219"></a>00219 mpz_t res;
<a name="l00220"></a>00220 mpz_init(res);
<a name="l00221"></a>00221 mpz_gcd(res, mpq_numref(x.d_n), mpq_numref(y.d_n));
<a name="l00222"></a>00222 Impl r(res);
<a name="l00223"></a>00223 mpz_clear(res);
<a name="l00224"></a>00224 <a class="code" href="kinds_8h.html#aa10c9e8951b8ccf714a59ec321bdac5ba7fa27e82c6c4f69434225ed81e5d151e">TRACE</a>(<span class="stringliteral">"rational"</span>, <span class="stringliteral">"Impl::gcd => "</span>, r, <span class="stringliteral">"}"</span>);
<a name="l00225"></a>00225 <span class="keywordflow">return</span> r;
<a name="l00226"></a>00226 }
<a name="l00227"></a>00227
<a name="l00228"></a>00228 <span class="keyword">friend</span> Impl lcm(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00229"></a>00229 <a class="code" href="debug_8h.html#a40dac3bdb2166ffc852ee8b1489d2b56">DebugAssert</a>(x.isInteger() && y.isInteger(),
<a name="l00230"></a>00230 <span class="stringliteral">"Rational::Impl::lcm(): x="</span>+x.toString()
<a name="l00231"></a>00231 +<span class="stringliteral">", y="</span>+y.toString());
<a name="l00232"></a>00232 mpz_t res;
<a name="l00233"></a>00233 mpz_init(res);
<a name="l00234"></a>00234 mpz_lcm(res, mpq_numref(x.d_n), mpq_numref(y.d_n));
<a name="l00235"></a>00235 Impl r(res);
<a name="l00236"></a>00236 mpz_clear(res);
<a name="l00237"></a>00237 <span class="keywordflow">return</span> r;
<a name="l00238"></a>00238 }
<a name="l00239"></a>00239 <span class="comment"></span>
<a name="l00240"></a>00240 <span class="comment"> //! Print to string</span>
<a name="l00241"></a>00241 <span class="comment"></span> <span class="keywordtype">string</span> toString(<span class="keywordtype">int</span> base = 10)<span class="keyword"> const </span>{
<a name="l00242"></a>00242 <span class="keywordtype">char</span>* str = (<span class="keywordtype">char</span>*)malloc(mpz_sizeinbase(mpq_numref(d_n), base)
<a name="l00243"></a>00243 +mpz_sizeinbase(mpq_denref(d_n), base)+3);
<a name="l00244"></a>00244 mpq_get_str(str, base, d_n);
<a name="l00245"></a>00245 <span class="keywordtype">string</span> res(str);
<a name="l00246"></a>00246 free(str);
<a name="l00247"></a>00247 <span class="keywordflow">return</span> res;
<a name="l00248"></a>00248 }
<a name="l00249"></a>00249 };
<a name="l00250"></a>00250
<a name="l00251"></a>00251 <span class="comment">// Constructor from a pair of integers</span>
<a name="l00252"></a>00252 Rational::Impl::Impl(<span class="keywordtype">long</span> <span class="keywordtype">int</span> n, <span class="keywordtype">long</span> <span class="keywordtype">int</span> d) {
<a name="l00253"></a>00253 mpq_init(d_n);
<a name="l00254"></a>00254 <a class="code" href="debug_8h.html#a40dac3bdb2166ffc852ee8b1489d2b56">DebugAssert</a>(d > 0, <span class="stringliteral">"Rational::Impl(long n, long d): d = "</span>+<a class="code" href="namespaceCVC3.html#af69618103f1f0f2eadada0796a2a940c">int2string</a>(d));
<a name="l00255"></a>00255 mpq_set_si(d_n, n, (<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <span class="keywordtype">int</span>)d);
<a name="l00256"></a>00256 canonicalize();
<a name="l00257"></a>00257 }
<a name="l00258"></a>00258
<a name="l00259"></a>00259 <span class="comment">// Constructor from a pair of unsigned integers</span>
<a name="l00260"></a>00260 Rational::Impl::Impl(<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> n, <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> d,
<a name="l00261"></a>00261 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> <span class="comment">/* dummy arg, to disambiguate */</span>) {
<a name="l00262"></a>00262 mpq_init(d_n);
<a name="l00263"></a>00263 mpq_set_ui(d_n, n, (<span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <span class="keywordtype">int</span>)d);
<a name="l00264"></a>00264 canonicalize();
<a name="l00265"></a>00265 }
<a name="l00266"></a>00266
<a name="l00267"></a>00267 <span class="comment">// Constructor from a string</span>
<a name="l00268"></a>00268 Rational::Impl::Impl(<span class="keyword">const</span> <span class="keywordtype">string</span> &n, <span class="keywordtype">int</span> base) {
<a name="l00269"></a>00269 mpq_init(d_n);
<a name="l00270"></a>00270 mpq_set_str(d_n, n.c_str(), base);
<a name="l00271"></a>00271 canonicalize();
<a name="l00272"></a>00272 }
<a name="l00273"></a>00273
<a name="l00274"></a>00274 <span class="comment">// Constructor from a pair of strings</span>
<a name="l00275"></a>00275 Rational::Impl::Impl(<span class="keyword">const</span> <span class="keywordtype">string</span> &n, <span class="keyword">const</span> <span class="keywordtype">string</span>& d, <span class="keywordtype">int</span> base) {
<a name="l00276"></a>00276 mpq_init(d_n);
<a name="l00277"></a>00277 mpq_set_str(d_n, (n+<span class="stringliteral">"/"</span>+d).c_str(), base);
<a name="l00278"></a>00278 canonicalize();
<a name="l00279"></a>00279 }
<a name="l00280"></a>00280
<a name="l00281"></a>00281 Rational::Impl <a class="code" href="namespaceCVC3.html#aacf567dce1c762f957267427472bd959">Rational::Impl::operator-</a>()<span class="keyword"> const </span>{
<a name="l00282"></a>00282 Impl res;
<a name="l00283"></a>00283 mpq_neg(res.d_n, d_n);
<a name="l00284"></a>00284 <span class="keywordflow">return</span> res;
<a name="l00285"></a>00285 }
<a name="l00286"></a>00286
<a name="l00287"></a>00287 Rational::Impl Rational::Impl::floor()<span class="keyword"> const </span>{
<a name="l00288"></a>00288 mpz_t res;
<a name="l00289"></a>00289 mpz_init(res);
<a name="l00290"></a>00290 mpz_fdiv_q(res, mpq_numref(d_n), mpq_denref(d_n));
<a name="l00291"></a>00291 Impl r(res);
<a name="l00292"></a>00292 mpz_clear(res);
<a name="l00293"></a>00293 <span class="keywordflow">return</span> r;
<a name="l00294"></a>00294 }
<a name="l00295"></a>00295
<a name="l00296"></a>00296 Rational::Impl Rational::Impl::ceil()<span class="keyword"> const </span>{
<a name="l00297"></a>00297 mpz_t res;
<a name="l00298"></a>00298 mpz_init(res);
<a name="l00299"></a>00299 mpz_cdiv_q(res, mpq_numref(d_n), mpq_denref(d_n));
<a name="l00300"></a>00300 Impl r(res);
<a name="l00301"></a>00301 mpz_clear(res);
<a name="l00302"></a>00302 <span class="keywordflow">return</span> r;
<a name="l00303"></a>00303 }
<a name="l00304"></a>00304
<a name="l00305"></a>00305 <span class="keywordtype">bool</span> Rational::Impl::isInteger()<span class="keyword"> const </span>{
<a name="l00306"></a>00306 <span class="keywordtype">bool</span> res(mpz_cmp_ui(mpq_denref(d_n), 1) == 0);
<a name="l00307"></a>00307 <a class="code" href="kinds_8h.html#aa10c9e8951b8ccf714a59ec321bdac5ba7fa27e82c6c4f69434225ed81e5d151e">TRACE</a>(<span class="stringliteral">"rational"</span>, <span class="stringliteral">"Impl::isInteger("</span>, *<span class="keyword">this</span>,
<a name="l00308"></a>00308 <span class="stringliteral">") => "</span>+<span class="keywordtype">string</span>(res? <span class="stringliteral">"true"</span> : <span class="stringliteral">"false"</span>));
<a name="l00309"></a>00309 <span class="keywordflow">return</span> res;
<a name="l00310"></a>00310 }
<a name="l00311"></a>00311 <span class="comment"></span>
<a name="l00312"></a>00312 <span class="comment"> //! Default constructor</span>
<a name="l00313"></a>00313 <span class="comment"></span> <a class="code" href="classCVC3_1_1Rational.html#a8f86f975b54d0a491bc909d677023467">Rational::Rational</a>() : d_n(new Impl) {
<a name="l00314"></a>00314 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00315"></a>00315 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00316"></a>00316 num_created++;
<a name="l00317"></a>00317 printStats();
<a name="l00318"></a>00318 <span class="preprocessor">#endif</span>
<a name="l00319"></a>00319 <span class="preprocessor"></span> }<span class="comment"></span>
<a name="l00320"></a>00320 <span class="comment"> //! Copy constructor</span>
<a name="l00321"></a>00321 <span class="comment"></span> Rational::Rational(<span class="keyword">const</span> Rational &n) : d_n(new Impl(*n.d_n)) {
<a name="l00322"></a>00322 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00323"></a>00323 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00324"></a>00324 num_created++;
<a name="l00325"></a>00325 printStats();
<a name="l00326"></a>00326 <span class="preprocessor">#endif</span>
<a name="l00327"></a>00327 <span class="preprocessor"></span> }
<a name="l00328"></a>00328
<a name="l00329"></a>00329 Rational::Rational(<span class="keyword">const</span> Unsigned& n): d_n(new Impl(n.toString(), 10)) {
<a name="l00330"></a>00330 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00331"></a>00331 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00332"></a>00332 num_created++;
<a name="l00333"></a>00333 printStats();
<a name="l00334"></a>00334 <span class="preprocessor">#endif</span>
<a name="l00335"></a>00335 <span class="preprocessor"></span> }<span class="comment"></span>
<a name="l00336"></a>00336 <span class="comment"> //! Private constructor</span>
<a name="l00337"></a>00337 <span class="comment"></span> Rational::Rational(<span class="keyword">const</span> Impl& t): d_n(new Impl(t)) {
<a name="l00338"></a>00338 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00339"></a>00339 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00340"></a>00340 num_created++;
<a name="l00341"></a>00341 printStats();
<a name="l00342"></a>00342 <span class="preprocessor">#endif</span>
<a name="l00343"></a>00343 <span class="preprocessor"></span> }
<a name="l00344"></a>00344 Rational::Rational(<span class="keywordtype">int</span> n, <span class="keywordtype">int</span> d): d_n(new Impl(n, d)) {
<a name="l00345"></a>00345 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00346"></a>00346 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00347"></a>00347 num_created++;
<a name="l00348"></a>00348 printStats();
<a name="l00349"></a>00349 <span class="preprocessor">#endif</span>
<a name="l00350"></a>00350 <span class="preprocessor"></span> }
<a name="l00351"></a>00351 <span class="comment">// Constructors from strings</span>
<a name="l00352"></a>00352 Rational::Rational(<span class="keyword">const</span> <span class="keywordtype">char</span>* n, <span class="keywordtype">int</span> base)
<a name="l00353"></a>00353 : d_n(new Impl(string(n), base)) {
<a name="l00354"></a>00354 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00355"></a>00355 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00356"></a>00356 num_created++;
<a name="l00357"></a>00357 printStats();
<a name="l00358"></a>00358 <span class="preprocessor">#endif</span>
<a name="l00359"></a>00359 <span class="preprocessor"></span> }
<a name="l00360"></a>00360 Rational::Rational(<span class="keyword">const</span> <span class="keywordtype">string</span>& n, <span class="keywordtype">int</span> base)
<a name="l00361"></a>00361 : d_n(new Impl(n, base)) {
<a name="l00362"></a>00362 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00363"></a>00363 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00364"></a>00364 num_created++;
<a name="l00365"></a>00365 printStats();
<a name="l00366"></a>00366 <span class="preprocessor">#endif</span>
<a name="l00367"></a>00367 <span class="preprocessor"></span> }
<a name="l00368"></a>00368 Rational::Rational(<span class="keyword">const</span> <span class="keywordtype">char</span>* n, <span class="keyword">const</span> <span class="keywordtype">char</span>* d, <span class="keywordtype">int</span> base)
<a name="l00369"></a>00369 : d_n(new Impl(string(n), string(d), base)) {
<a name="l00370"></a>00370 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00371"></a>00371 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00372"></a>00372 num_created++;
<a name="l00373"></a>00373 printStats();
<a name="l00374"></a>00374 <span class="preprocessor">#endif</span>
<a name="l00375"></a>00375 <span class="preprocessor"></span> }
<a name="l00376"></a>00376 Rational::Rational(<span class="keyword">const</span> <span class="keywordtype">string</span>& n, <span class="keyword">const</span> <span class="keywordtype">string</span>& d, <span class="keywordtype">int</span> base)
<a name="l00377"></a>00377 : d_n(new Impl(n, d, base)) {
<a name="l00378"></a>00378 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00379"></a>00379 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00380"></a>00380 num_created++;
<a name="l00381"></a>00381 printStats();
<a name="l00382"></a>00382 <span class="preprocessor">#endif</span>
<a name="l00383"></a>00383 <span class="preprocessor"></span> }
<a name="l00384"></a>00384 <span class="comment">// Destructor</span>
<a name="l00385"></a>00385 Rational::~Rational() {
<a name="l00386"></a>00386 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00387"></a>00387 <span class="preprocessor"></span> <span class="keywordtype">int</span> &num_deleted = getDeleted();
<a name="l00388"></a>00388 num_deleted++;
<a name="l00389"></a>00389 printStats();
<a name="l00390"></a>00390 <span class="preprocessor">#endif</span>
<a name="l00391"></a>00391 <span class="preprocessor"></span> <span class="keyword">delete</span> d_n;
<a name="l00392"></a>00392 }
<a name="l00393"></a>00393
<a name="l00394"></a>00394 <span class="comment">// Get components</span>
<a name="l00395"></a>00395 Rational Rational::getNumerator()<span class="keyword"> const</span>
<a name="l00396"></a>00396 <span class="keyword"> </span>{ <span class="keywordflow">return</span> Rational(d_n->getNum()); }
<a name="l00397"></a>00397 Rational Rational::getDenominator()<span class="keyword"> const</span>
<a name="l00398"></a>00398 <span class="keyword"> </span>{ <span class="keywordflow">return</span> Rational(d_n->getDen()); }
<a name="l00399"></a>00399
<a name="l00400"></a>00400 <span class="keywordtype">bool</span> Rational::isInteger()<span class="keyword"> const </span>{ <span class="keywordflow">return</span> d_n->isInteger(); }
<a name="l00401"></a>00401
<a name="l00402"></a>00402 <span class="comment">// Assignment</span>
<a name="l00403"></a>00403 Rational& Rational::operator=(<span class="keyword">const</span> Rational& n) {
<a name="l00404"></a>00404 <span class="keywordflow">if</span>(<span class="keyword">this</span> == &n) <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00405"></a>00405 <span class="keyword">delete</span> d_n;
<a name="l00406"></a>00406 d_n = <span class="keyword">new</span> Impl(*n.d_n);
<a name="l00407"></a>00407 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00408"></a>00408 }
<a name="l00409"></a>00409
<a name="l00410"></a>00410 ostream &<a class="code" href="namespaceCVC3.html#a6b7e38d3c97da1e91e12a6c9555b8163">operator<<</a>(ostream &os, <span class="keyword">const</span> Rational &n) {
<a name="l00411"></a>00411 <span class="keywordflow">return</span>(os << n.toString());
<a name="l00412"></a>00412 }
<a name="l00413"></a>00413 <span class="comment"></span>
<a name="l00414"></a>00414 <span class="comment"> //! Printing to ostream</span>
<a name="l00415"></a>00415 <span class="comment"></span> std::ostream& <a class="code" href="namespaceCVC3.html#a6b7e38d3c97da1e91e12a6c9555b8163">operator<<</a>(std::ostream& os, <span class="keyword">const</span> Rational::Impl& n) {
<a name="l00416"></a>00416 <span class="keywordflow">return</span> os << n.toString();
<a name="l00417"></a>00417 }
<a name="l00418"></a>00418
<a name="l00419"></a>00419
<a name="l00420"></a>00420 <span class="comment">// Check that argument is an int and print an error message otherwise</span>
<a name="l00421"></a>00421
<a name="l00422"></a>00422 <span class="keyword">static</span> <span class="keywordtype">void</span> checkInt(<span class="keyword">const</span> Rational& n, <span class="keyword">const</span> <span class="keywordtype">string</span>& funName) {
<a name="l00423"></a>00423 <a class="code" href="kinds_8h.html#aa10c9e8951b8ccf714a59ec321bdac5ba7fa27e82c6c4f69434225ed81e5d151e">TRACE</a>(<span class="stringliteral">"rational"</span>, <span class="stringliteral">"checkInt("</span>, n, <span class="stringliteral">")"</span>);
<a name="l00424"></a>00424 <a class="code" href="debug_8h.html#a40dac3bdb2166ffc852ee8b1489d2b56">DebugAssert</a>(n.isInteger(),
<a name="l00425"></a>00425 <span class="stringliteral">"CVC3::Rational::"</span> + funName
<a name="l00426"></a>00426 + <span class="stringliteral">": argument is not an integer: "</span> + n.toString());
<a name="l00427"></a>00427 }
<a name="l00428"></a>00428
<a name="l00429"></a>00429 <span class="comment">/* Computes gcd and lcm on *integer* values. Result is always a</span>
<a name="l00430"></a>00430 <span class="comment"> positive integer. In this implementation, it is guaranteed by</span>
<a name="l00431"></a>00431 <span class="comment"> GMP. */</span>
<a name="l00432"></a>00432
<a name="l00433"></a>00433 Rational gcd(<span class="keyword">const</span> Rational &x, <span class="keyword">const</span> Rational &y) {
<a name="l00434"></a>00434 checkInt(x, <span class="stringliteral">"gcd(*x*,y)"</span>);
<a name="l00435"></a>00435 checkInt(y, <span class="stringliteral">"gcd(x,*y*)"</span>);
<a name="l00436"></a>00436 <span class="keywordflow">return</span> Rational(gcd(*x.d_n, *y.d_n));
<a name="l00437"></a>00437 }
<a name="l00438"></a>00438
<a name="l00439"></a>00439 Rational gcd(<span class="keyword">const</span> vector<Rational> &v) {
<a name="l00440"></a>00440 Rational::Impl g(1,1), zero;
<a name="l00441"></a>00441 <span class="keywordflow">if</span>(v.size() > 0) {
<a name="l00442"></a>00442 checkInt(v[0], <span class="stringliteral">"gcd(vector<Rational>[0])"</span>);
<a name="l00443"></a>00443 g = *v[0].d_n;
<a name="l00444"></a>00444 }
<a name="l00445"></a>00445 <span class="keywordflow">for</span>(<span class="keywordtype">size_t</span> i=1; i<v.size(); i++) {
<a name="l00446"></a>00446 checkInt(v[i], <span class="stringliteral">"gcd(vector<Rational>)"</span>);
<a name="l00447"></a>00447 <span class="keywordflow">if</span>(g == zero)
<a name="l00448"></a>00448 g = *(v[i].d_n);
<a name="l00449"></a>00449 <span class="keywordflow">else</span> <span class="keywordflow">if</span>(*(v[i].d_n) != zero)
<a name="l00450"></a>00450 g = gcd(g, *(v[i].d_n));
<a name="l00451"></a>00451 }
<a name="l00452"></a>00452 <span class="keywordflow">return</span> Rational(g);
<a name="l00453"></a>00453 }
<a name="l00454"></a>00454
<a name="l00455"></a>00455 Rational lcm(<span class="keyword">const</span> Rational &x, <span class="keyword">const</span> Rational &y) {
<a name="l00456"></a>00456 checkInt(x, <span class="stringliteral">"lcm(*x*,y)"</span>);
<a name="l00457"></a>00457 checkInt(y, <span class="stringliteral">"lcm(x,*y*)"</span>);
<a name="l00458"></a>00458 <span class="keywordflow">return</span> Rational(lcm(*x.d_n, *y.d_n));
<a name="l00459"></a>00459 }
<a name="l00460"></a>00460
<a name="l00461"></a>00461 Rational lcm(<span class="keyword">const</span> vector<Rational> &v) {
<a name="l00462"></a>00462 Rational::Impl g(1,1), zero;
<a name="l00463"></a>00463 <span class="keywordflow">for</span>(<span class="keywordtype">size_t</span> i=0; i<v.size(); i++) {
<a name="l00464"></a>00464 checkInt(v[i], <span class="stringliteral">"lcm(vector<Rational>)"</span>);
<a name="l00465"></a>00465 <span class="keywordflow">if</span>(*v[i].d_n != zero)
<a name="l00466"></a>00466 g = lcm(g, *v[i].d_n);
<a name="l00467"></a>00467 }
<a name="l00468"></a>00468 <span class="keywordflow">return</span> Rational(g);
<a name="l00469"></a>00469 }
<a name="l00470"></a>00470
<a name="l00471"></a>00471 Rational <a class="code" href="namespaceCVC3.html#a39fc111339d6dffdc98d6a25b68dff0e">abs</a>(<span class="keyword">const</span> Rational &x) {
<a name="l00472"></a>00472 <span class="keywordflow">if</span>(x<0) <span class="keywordflow">return</span> -x;
<a name="l00473"></a>00473 <span class="keywordflow">return</span> x;
<a name="l00474"></a>00474 }
<a name="l00475"></a>00475
<a name="l00476"></a>00476 Rational floor(<span class="keyword">const</span> Rational &x) {
<a name="l00477"></a>00477 <span class="keywordflow">return</span> Rational(x.d_n->floor());
<a name="l00478"></a>00478 }
<a name="l00479"></a>00479
<a name="l00480"></a>00480 Rational ceil(<span class="keyword">const</span> Rational &x) {
<a name="l00481"></a>00481 <span class="keywordflow">return</span> Rational(x.d_n->ceil());
<a name="l00482"></a>00482 }
<a name="l00483"></a>00483
<a name="l00484"></a>00484 Rational mod(<span class="keyword">const</span> Rational &x, <span class="keyword">const</span> Rational &y) {
<a name="l00485"></a>00485 checkInt(x, <span class="stringliteral">"mod(*x*,y)"</span>);
<a name="l00486"></a>00486 checkInt(y, <span class="stringliteral">"mod(x,*y*)"</span>);
<a name="l00487"></a>00487 <span class="keywordflow">return</span>(Rational(mod(*x.d_n, *y.d_n)));
<a name="l00488"></a>00488 }
<a name="l00489"></a>00489
<a name="l00490"></a>00490 Rational intRoot(<span class="keyword">const</span> Rational& base, <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <span class="keywordtype">int</span> n) {
<a name="l00491"></a>00491 checkInt(base, <span class="stringliteral">"intRoot(*x*,y)"</span>);
<a name="l00492"></a>00492 <span class="keywordflow">return</span> Rational(intRoot(*base.d_n, n));
<a name="l00493"></a>00493 }
<a name="l00494"></a>00494
<a name="l00495"></a>00495 <span class="keywordtype">string</span> Rational::toString(<span class="keywordtype">int</span> base)<span class="keyword"> const </span>{
<a name="l00496"></a>00496 <span class="keywordflow">return</span>(d_n->toString(base));
<a name="l00497"></a>00497 }
<a name="l00498"></a>00498
<a name="l00499"></a>00499 <span class="keywordtype">size_t</span> Rational::hash()<span class="keyword"> const </span>{
<a name="l00500"></a>00500 <a class="code" href="structHash_1_1hash_3_01const_01char_01_5_01_4.html">std::hash<const char *></a> h;
<a name="l00501"></a>00501 <span class="keywordflow">return</span> h(toString().c_str());
<a name="l00502"></a>00502 }
<a name="l00503"></a>00503
<a name="l00504"></a>00504 <span class="keywordtype">void</span> Rational::print()<span class="keyword"> const </span>{
<a name="l00505"></a>00505 cout << (*this) << <a class="code" href="group__ExprStream__Manip.html#ga05b0ea7353ec24fa8e7e272d7a7875d8" title="Print the end-of-line.">endl</a>;
<a name="l00506"></a>00506 }
<a name="l00507"></a>00507
<a name="l00508"></a>00508 <span class="comment">// Unary minus</span>
<a name="l00509"></a>00509 Rational <a class="code" href="namespaceCVC3.html#aacf567dce1c762f957267427472bd959">Rational::operator-</a>()<span class="keyword"> const </span>{
<a name="l00510"></a>00510 <span class="keywordflow">return</span> Rational(-(*d_n));
<a name="l00511"></a>00511 }
<a name="l00512"></a>00512
<a name="l00513"></a>00513 Rational &Rational::operator+=(<span class="keyword">const</span> Rational &n2) {
<a name="l00514"></a>00514 *<span class="keyword">this</span> = (*this) + n2;
<a name="l00515"></a>00515 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00516"></a>00516 }
<a name="l00517"></a>00517
<a name="l00518"></a>00518 Rational &Rational::operator-=(<span class="keyword">const</span> Rational &n2) {
<a name="l00519"></a>00519 *<span class="keyword">this</span> = (*this) - n2;
<a name="l00520"></a>00520 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00521"></a>00521 }
<a name="l00522"></a>00522
<a name="l00523"></a>00523 Rational &Rational::operator*=(<span class="keyword">const</span> Rational &n2) {
<a name="l00524"></a>00524 *<span class="keyword">this</span> = (*this) * n2;
<a name="l00525"></a>00525 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00526"></a>00526 }
<a name="l00527"></a>00527
<a name="l00528"></a>00528 Rational &Rational::operator/=(<span class="keyword">const</span> Rational &n2) {
<a name="l00529"></a>00529 *<span class="keyword">this</span> = (*this) / n2;
<a name="l00530"></a>00530 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00531"></a>00531 }
<a name="l00532"></a>00532
<a name="l00533"></a>00533 <span class="keywordtype">int</span> Rational::getInt()<span class="keyword"> const </span>{
<a name="l00534"></a>00534 checkInt(*<span class="keyword">this</span>, <span class="stringliteral">"getInt()"</span>);
<a name="l00535"></a>00535 <span class="keywordflow">return</span> d_n->getInt();
<a name="l00536"></a>00536 }
<a name="l00537"></a>00537
<a name="l00538"></a>00538 <span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> Rational::getUnsigned()<span class="keyword"> const </span>{
<a name="l00539"></a>00539 checkInt(*<span class="keyword">this</span>, <span class="stringliteral">"getUnsigned()"</span>);
<a name="l00540"></a>00540 <span class="keywordflow">return</span> d_n->getUnsigned();
<a name="l00541"></a>00541 }
<a name="l00542"></a>00542
<a name="l00543"></a>00543 Unsigned Rational::getUnsignedMP()<span class="keyword"> const </span>{
<a name="l00544"></a>00544 checkInt(*<span class="keyword">this</span>, <span class="stringliteral">"getUnsignedMP()"</span>);
<a name="l00545"></a>00545 <span class="keywordflow">return</span> d_n->getUnsignedMP();
<a name="l00546"></a>00546 }
<a name="l00547"></a>00547
<a name="l00548"></a>00548 <span class="preprocessor">#ifdef _DEBUG_RATIONAL_</span>
<a name="l00549"></a>00549 <span class="preprocessor"></span> <span class="keywordtype">void</span> Rational::printStats() {
<a name="l00550"></a>00550 <span class="keywordtype">int</span> &num_created = getCreated();
<a name="l00551"></a>00551 <span class="keywordtype">int</span> &num_deleted = getDeleted();
<a name="l00552"></a>00552 <span class="keywordflow">if</span>(num_created % 1000 == 0 || num_deleted % 1000 == 0) {
<a name="l00553"></a>00553 std::cerr << <span class="stringliteral">"Rational("</span> << *d_n << <span class="stringliteral">"): created "</span> << num_created
<a name="l00554"></a>00554 << <span class="stringliteral">", deleted "</span> << num_deleted
<a name="l00555"></a>00555 << <span class="stringliteral">", currently alive "</span> << num_created-num_deleted
<a name="l00556"></a>00556 << <a class="code" href="group__ExprStream__Manip.html#ga05b0ea7353ec24fa8e7e272d7a7875d8" title="Print the end-of-line.">std::endl</a>;
<a name="l00557"></a>00557 }
<a name="l00558"></a>00558 }
<a name="l00559"></a>00559 <span class="preprocessor">#endif</span>
<a name="l00560"></a>00560 <span class="preprocessor"></span>
<a name="l00561"></a>00561 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a8e164436388f2d87c971d9bbde973c58">operator==</a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00562"></a>00562 <span class="keywordflow">return</span>(*n1.d_n == *n2.d_n);
<a name="l00563"></a>00563 }
<a name="l00564"></a>00564
<a name="l00565"></a>00565 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#ad3e3964a0b8cd9e2749de47b053b9d97">operator<</a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00566"></a>00566 <span class="keywordflow">return</span>(*n1.d_n < *n2.d_n);
<a name="l00567"></a>00567 }
<a name="l00568"></a>00568
<a name="l00569"></a>00569 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#abccc88aac4f7652def737f1081dc7a89">operator<=</a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00570"></a>00570 <span class="keywordflow">return</span>(*n1.d_n <= *n2.d_n);
<a name="l00571"></a>00571 }
<a name="l00572"></a>00572
<a name="l00573"></a>00573 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a0d82fd3eb68860cbd01ae86b2b9e3c66">operator></a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00574"></a>00574 <span class="keywordflow">return</span>(*n1.d_n > *n2.d_n);
<a name="l00575"></a>00575 }
<a name="l00576"></a>00576
<a name="l00577"></a>00577 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#af997ba8407b661bf2ffe2cb6f52c3e3b">operator>=</a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00578"></a>00578 <span class="keywordflow">return</span>(*n1.d_n >= *n2.d_n);
<a name="l00579"></a>00579 }
<a name="l00580"></a>00580
<a name="l00581"></a>00581 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a5aa953c549c2e103f3834c48bf6cb9a1">operator!=</a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00582"></a>00582 <span class="keywordflow">return</span>(*n1.d_n != *n2.d_n);
<a name="l00583"></a>00583 }
<a name="l00584"></a>00584
<a name="l00585"></a>00585 Rational <a class="code" href="namespaceCVC3.html#a286cf8699acada708816e72c6b436b90">operator+</a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00586"></a>00586 <span class="keywordflow">return</span> Rational((*n1.d_n) + (*n2.d_n));
<a name="l00587"></a>00587 }
<a name="l00588"></a>00588
<a name="l00589"></a>00589 Rational <a class="code" href="namespaceCVC3.html#aacf567dce1c762f957267427472bd959">operator-</a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00590"></a>00590 <span class="keywordflow">return</span> Rational((*n1.d_n) - (*n2.d_n));
<a name="l00591"></a>00591 }
<a name="l00592"></a>00592
<a name="l00593"></a>00593 Rational <a class="code" href="namespaceCVC3.html#a300bc9244236ebdb1bff90b0b453034c">operator*</a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00594"></a>00594 <span class="keywordflow">return</span> Rational((*n1.d_n) * (*n2.d_n));
<a name="l00595"></a>00595 }
<a name="l00596"></a>00596
<a name="l00597"></a>00597 Rational <a class="code" href="namespaceCVC3.html#a069aa16342bb9958a3d576a18a390248">operator/</a>(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00598"></a>00598 <span class="keywordflow">return</span> Rational((*n1.d_n) / (*n2.d_n));
<a name="l00599"></a>00599 }
<a name="l00600"></a>00600
<a name="l00601"></a>00601 Rational operator%(<span class="keyword">const</span> Rational &n1, <span class="keyword">const</span> Rational &n2) {
<a name="l00602"></a>00602 <span class="keywordflow">return</span> Rational((*n1.d_n) % (*n2.d_n));
<a name="l00603"></a>00603 }
<a name="l00604"></a>00604 <span class="comment"></span>
<a name="l00605"></a>00605 <span class="comment"> //! Implementation of the forward-declared internal class</span>
<a name="l00606"></a>00606 <span class="comment"></span> <span class="keyword">class </span>Unsigned::Impl {
<a name="l00607"></a>00607 mpz_t d_n;
<a name="l00608"></a>00608 <span class="keyword">public</span>:<span class="comment"></span>
<a name="l00609"></a>00609 <span class="comment"> //! Default Constructor</span>
<a name="l00610"></a>00610 <span class="comment"></span> Impl() { mpz_init(d_n); }<span class="comment"></span>
<a name="l00611"></a>00611 <span class="comment"> //! Copy constructor (assumes x is canonicalized)</span>
<a name="l00612"></a>00612 <span class="comment"></span> Impl(<span class="keyword">const</span> Impl &x) { mpz_init(d_n); mpz_set(d_n, x.d_n); }<span class="comment"></span>
<a name="l00613"></a>00613 <span class="comment"> //! Constructor from mpz_t</span>
<a name="l00614"></a>00614 <span class="comment"></span> Impl(<span class="keyword">const</span> mpz_t n) {
<a name="l00615"></a>00615 mpz_init(d_n);
<a name="l00616"></a>00616 mpz_set(d_n, n);
<a name="l00617"></a>00617 }<span class="comment"></span>
<a name="l00618"></a>00618 <span class="comment"> //! Constructor from an unsigned integer</span>
<a name="l00619"></a>00619 <span class="comment"></span> Impl(<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> n);<span class="comment"></span>
<a name="l00620"></a>00620 <span class="comment"> //! Constructor from a string</span>
<a name="l00621"></a>00621 <span class="comment"></span> Impl(<span class="keyword">const</span> <span class="keywordtype">string</span> &n, <span class="keywordtype">int</span> base);
<a name="l00622"></a>00622 <span class="comment">// Destructor</span>
<a name="l00623"></a>00623 <span class="keyword">virtual</span> ~Impl() { mpz_clear(d_n); }
<a name="l00624"></a>00624 <span class="comment"></span>
<a name="l00625"></a>00625 <span class="comment"> //! Assignment</span>
<a name="l00626"></a>00626 <span class="comment"></span> Impl& operator=(<span class="keyword">const</span> Impl& x) {
<a name="l00627"></a>00627 <span class="keywordflow">if</span>(<span class="keyword">this</span> == &x) <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00628"></a>00628 mpz_set(d_n, x.d_n);
<a name="l00629"></a>00629 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00630"></a>00630 }
<a name="l00631"></a>00631
<a name="l00632"></a>00632 <span class="keywordtype">int</span> getInt()<span class="keyword"> const </span>{
<a name="l00633"></a>00633 <span class="comment">// Check for overflow</span>
<a name="l00634"></a>00634 <span class="keyword">static</span> Impl <a class="code" href="namespaceCVC3.html#a03dcd07dcbd01da970af13f1dfc5e2dd">max</a>((<span class="keywordtype">int</span>)INT_MAX);
<a name="l00635"></a>00635 <a class="code" href="debug_8h.html#a2637b2fffa22e3c9fad40cda8fcc3bce" title="If something goes horribly wrong, print a message and abort immediately with exit(1).">FatalAssert</a>(*<span class="keyword">this</span> <= <a class="code" href="namespaceCVC3.html#a03dcd07dcbd01da970af13f1dfc5e2dd">max</a>,
<a name="l00636"></a>00636 <span class="stringliteral">"Unsigned::getInt(): Arithmetic overflow for "</span>
<a name="l00637"></a>00637 +toString());
<a name="l00638"></a>00638 <span class="keywordflow">return</span> mpz_get_si(d_n);
<a name="l00639"></a>00639 }
<a name="l00640"></a>00640
<a name="l00641"></a>00641 <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> getUnsigned()<span class="keyword"> const </span>{
<a name="l00642"></a>00642 <span class="comment">// Check for overflow</span>
<a name="l00643"></a>00643 <span class="keyword">static</span> Impl <a class="code" href="namespaceCVC3.html#a03dcd07dcbd01da970af13f1dfc5e2dd">max</a>(UINT_MAX);
<a name="l00644"></a>00644 <a class="code" href="debug_8h.html#a2637b2fffa22e3c9fad40cda8fcc3bce" title="If something goes horribly wrong, print a message and abort immediately with exit(1).">FatalAssert</a>(*<span class="keyword">this</span> <= <a class="code" href="namespaceCVC3.html#a03dcd07dcbd01da970af13f1dfc5e2dd">max</a>,
<a name="l00645"></a>00645 <span class="stringliteral">"Unsigned::getUnsigned(): Arithmetic overflow for "</span>
<a name="l00646"></a>00646 +toString());
<a name="l00647"></a>00647 <span class="keywordflow">return</span> mpz_get_ui(d_n);
<a name="l00648"></a>00648 }
<a name="l00649"></a>00649 <span class="comment"></span>
<a name="l00650"></a>00650 <span class="comment"> //! Unary minus</span>
<a name="l00651"></a>00651 <span class="comment"></span> Impl <a class="code" href="namespaceCVC3.html#aacf567dce1c762f957267427472bd959">operator-</a>() <span class="keyword">const</span>;
<a name="l00652"></a>00652 <span class="comment"></span>
<a name="l00653"></a>00653 <span class="comment"> //! Equality</span>
<a name="l00654"></a>00654 <span class="comment"></span> <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a8e164436388f2d87c971d9bbde973c58">operator==</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00655"></a>00655 <span class="keywordflow">return</span> mpz_cmp(x.d_n, y.d_n) == 0;
<a name="l00656"></a>00656 }
<a name="l00657"></a>00657 <span class="comment"></span>
<a name="l00658"></a>00658 <span class="comment"> //! Dis-equality</span>
<a name="l00659"></a>00659 <span class="comment"></span> <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a5aa953c549c2e103f3834c48bf6cb9a1">operator!=</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00660"></a>00660 <span class="keywordflow">return</span> mpz_cmp(x.d_n, y.d_n) != 0;
<a name="l00661"></a>00661 }<span class="comment"></span>
<a name="l00662"></a>00662 <span class="comment"> //! Less than</span>
<a name="l00663"></a>00663 <span class="comment"></span> <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#ad3e3964a0b8cd9e2749de47b053b9d97">operator<</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00664"></a>00664 <span class="keywordflow">return</span> mpz_cmp(x.d_n, y.d_n) < 0;
<a name="l00665"></a>00665 }
<a name="l00666"></a>00666
<a name="l00667"></a>00667 <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#abccc88aac4f7652def737f1081dc7a89">operator<=</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00668"></a>00668 <span class="keywordflow">return</span> mpz_cmp(x.d_n, y.d_n) <= 0;
<a name="l00669"></a>00669 }
<a name="l00670"></a>00670
<a name="l00671"></a>00671 <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a0d82fd3eb68860cbd01ae86b2b9e3c66">operator></a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00672"></a>00672 <span class="keywordflow">return</span> mpz_cmp(x.d_n, y.d_n) > 0;
<a name="l00673"></a>00673 }
<a name="l00674"></a>00674
<a name="l00675"></a>00675 <span class="keyword">friend</span> <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#af997ba8407b661bf2ffe2cb6f52c3e3b">operator>=</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00676"></a>00676 <span class="keywordflow">return</span> mpz_cmp(x.d_n, y.d_n) >= 0;
<a name="l00677"></a>00677 }
<a name="l00678"></a>00678 <span class="comment"></span>
<a name="l00679"></a>00679 <span class="comment"> //! Addition</span>
<a name="l00680"></a>00680 <span class="comment"></span> <span class="keyword">friend</span> Impl <a class="code" href="namespaceCVC3.html#a286cf8699acada708816e72c6b436b90">operator+</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00681"></a>00681 Impl res;
<a name="l00682"></a>00682 mpz_add(res.d_n, x.d_n, y.d_n);
<a name="l00683"></a>00683 <span class="keywordflow">return</span> res;
<a name="l00684"></a>00684 }
<a name="l00685"></a>00685 <span class="comment"></span>
<a name="l00686"></a>00686 <span class="comment"> //! Subtraction</span>
<a name="l00687"></a>00687 <span class="comment"></span> <span class="keyword">friend</span> Impl <a class="code" href="namespaceCVC3.html#aacf567dce1c762f957267427472bd959">operator-</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00688"></a>00688 Impl res;
<a name="l00689"></a>00689 mpz_sub(res.d_n, x.d_n, y.d_n);
<a name="l00690"></a>00690 <span class="keywordflow">return</span> res;
<a name="l00691"></a>00691 }
<a name="l00692"></a>00692 <span class="comment"></span>
<a name="l00693"></a>00693 <span class="comment"> //! Multiplication</span>
<a name="l00694"></a>00694 <span class="comment"></span> <span class="keyword">friend</span> Impl <a class="code" href="namespaceCVC3.html#a300bc9244236ebdb1bff90b0b453034c">operator*</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00695"></a>00695 Impl res;
<a name="l00696"></a>00696 mpz_mul(res.d_n, x.d_n, y.d_n);
<a name="l00697"></a>00697 <span class="keywordflow">return</span> res;
<a name="l00698"></a>00698 }
<a name="l00699"></a>00699 <span class="comment"></span>
<a name="l00700"></a>00700 <span class="comment"> //! Division</span>
<a name="l00701"></a>00701 <span class="comment"></span> <span class="keyword">friend</span> Impl <a class="code" href="namespaceCVC3.html#a069aa16342bb9958a3d576a18a390248">operator/</a>(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00702"></a>00702 Impl res;
<a name="l00703"></a>00703 mpz_div(res.d_n, x.d_n, y.d_n);
<a name="l00704"></a>00704 <span class="keywordflow">return</span> res;
<a name="l00705"></a>00705 }
<a name="l00706"></a>00706
<a name="l00707"></a>00707 <span class="keyword">friend</span> Impl operator%(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00708"></a>00708 mpz_t res;
<a name="l00709"></a>00709 mpz_init(res);
<a name="l00710"></a>00710 <span class="comment">// Put the remainder directly into 'res'</span>
<a name="l00711"></a>00711 mpz_fdiv_r(res, x.d_n, y.d_n);
<a name="l00712"></a>00712 Impl r(res);
<a name="l00713"></a>00713 mpz_clear(res);
<a name="l00714"></a>00714 <span class="keywordflow">return</span> r;
<a name="l00715"></a>00715 }
<a name="l00716"></a>00716
<a name="l00717"></a>00717 <span class="keyword">friend</span> Impl <a class="code" href="namespaceCVC3.html#a6b7e38d3c97da1e91e12a6c9555b8163">operator<<</a>(<span class="keyword">const</span> Impl& x, <span class="keywordtype">unsigned</span> y) {
<a name="l00718"></a>00718 mpz_t res;
<a name="l00719"></a>00719 mpz_init(res);
<a name="l00720"></a>00720 mpz_mul_2exp (res, x.d_n, y);
<a name="l00721"></a>00721 Impl r(res);
<a name="l00722"></a>00722 mpz_clear(res);
<a name="l00723"></a>00723 <span class="keywordflow">return</span> r;
<a name="l00724"></a>00724 }
<a name="l00725"></a>00725
<a name="l00726"></a>00726 <span class="keyword">friend</span> Impl operator&(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00727"></a>00727 mpz_t res;
<a name="l00728"></a>00728 mpz_init(res);
<a name="l00729"></a>00729 mpz_and (res, x.d_n, y.d_n);
<a name="l00730"></a>00730 Impl r(res);
<a name="l00731"></a>00731 mpz_clear(res);
<a name="l00732"></a>00732 <span class="keywordflow">return</span> r;
<a name="l00733"></a>00733 }
<a name="l00734"></a>00734 <span class="comment"></span>
<a name="l00735"></a>00735 <span class="comment"> //! Compute the remainder of x/y</span>
<a name="l00736"></a>00736 <span class="comment"></span> <span class="keyword">friend</span> Impl mod(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00737"></a>00737 mpz_t res;
<a name="l00738"></a>00738 mpz_init(res);
<a name="l00739"></a>00739 mpz_mod(res, x.d_n, y.d_n);
<a name="l00740"></a>00740 Impl r(res);
<a name="l00741"></a>00741 mpz_clear(res);
<a name="l00742"></a>00742 <span class="keywordflow">return</span> r;
<a name="l00743"></a>00743 }
<a name="l00744"></a>00744
<a name="l00745"></a>00745 <span class="keyword">friend</span> Impl intRoot(<span class="keyword">const</span> Impl& x, <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <span class="keywordtype">int</span> y) {
<a name="l00746"></a>00746 mpz_t res;
<a name="l00747"></a>00747 mpz_init(res);
<a name="l00748"></a>00748 <span class="keywordtype">int</span> exact = mpz_root(res, x.d_n, y);
<a name="l00749"></a>00749 <span class="keywordflow">if</span> (!exact) {
<a name="l00750"></a>00750 mpz_set_ui(res, 0);
<a name="l00751"></a>00751 }
<a name="l00752"></a>00752 Impl r(res);
<a name="l00753"></a>00753 mpz_clear(res);
<a name="l00754"></a>00754 <span class="keywordflow">return</span> r;
<a name="l00755"></a>00755 }
<a name="l00756"></a>00756
<a name="l00757"></a>00757 <span class="keyword">friend</span> Impl gcd(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00758"></a>00758 mpz_t res;
<a name="l00759"></a>00759 mpz_init(res);
<a name="l00760"></a>00760 mpz_gcd(res, x.d_n, y.d_n);
<a name="l00761"></a>00761 Impl r(res);
<a name="l00762"></a>00762 mpz_clear(res);
<a name="l00763"></a>00763 <span class="keywordflow">return</span> r;
<a name="l00764"></a>00764 }
<a name="l00765"></a>00765
<a name="l00766"></a>00766 <span class="keyword">friend</span> Impl lcm(<span class="keyword">const</span> Impl& x, <span class="keyword">const</span> Impl& y) {
<a name="l00767"></a>00767 mpz_t res;
<a name="l00768"></a>00768 mpz_init(res);
<a name="l00769"></a>00769 mpz_lcm(res, x.d_n, y.d_n);
<a name="l00770"></a>00770 Impl r(res);
<a name="l00771"></a>00771 mpz_clear(res);
<a name="l00772"></a>00772 <span class="keywordflow">return</span> r;
<a name="l00773"></a>00773 }
<a name="l00774"></a>00774 <span class="comment"></span>
<a name="l00775"></a>00775 <span class="comment"> //! Print to string</span>
<a name="l00776"></a>00776 <span class="comment"></span> <span class="keywordtype">string</span> toString(<span class="keywordtype">int</span> base = 10)<span class="keyword"> const </span>{
<a name="l00777"></a>00777 <span class="keywordtype">char</span>* str = (<span class="keywordtype">char</span>*)malloc(mpz_sizeinbase(d_n, base)+2);
<a name="l00778"></a>00778 mpz_get_str(str, base, d_n);
<a name="l00779"></a>00779 <span class="keywordtype">string</span> res(str);
<a name="l00780"></a>00780 free(str);
<a name="l00781"></a>00781 <span class="keywordflow">return</span> res;
<a name="l00782"></a>00782 }
<a name="l00783"></a>00783 <span class="comment"></span>
<a name="l00784"></a>00784 <span class="comment"> //! Printing to ostream</span>
<a name="l00785"></a>00785 <span class="comment"></span> <span class="keyword">friend</span> ostream& <a class="code" href="namespaceCVC3.html#a6b7e38d3c97da1e91e12a6c9555b8163">operator<<</a>(ostream& os, <span class="keyword">const</span> Unsigned::Impl& n) {
<a name="l00786"></a>00786 <span class="keywordflow">return</span> os << n.toString();
<a name="l00787"></a>00787 }
<a name="l00788"></a>00788
<a name="l00789"></a>00789 };
<a name="l00790"></a>00790
<a name="l00791"></a>00791 <span class="comment">// Constructor from a pair of unsigned integers</span>
<a name="l00792"></a>00792 Unsigned::Impl::Impl(<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span> n) {
<a name="l00793"></a>00793 mpz_init(d_n);
<a name="l00794"></a>00794 mpz_set_ui(d_n, n);
<a name="l00795"></a>00795 }
<a name="l00796"></a>00796
<a name="l00797"></a>00797 <span class="comment">// Constructor from a string</span>
<a name="l00798"></a>00798 Unsigned::Impl::Impl(<span class="keyword">const</span> <span class="keywordtype">string</span> &n, <span class="keywordtype">int</span> base) {
<a name="l00799"></a>00799 mpz_init(d_n);
<a name="l00800"></a>00800 mpz_set_str(d_n, n.c_str(), base);
<a name="l00801"></a>00801 }
<a name="l00802"></a>00802
<a name="l00803"></a>00803 Unsigned::Impl <a class="code" href="namespaceCVC3.html#aacf567dce1c762f957267427472bd959">Unsigned::Impl::operator-</a>()<span class="keyword"> const </span>{
<a name="l00804"></a>00804 Impl res;
<a name="l00805"></a>00805 mpz_neg(res.d_n, d_n);
<a name="l00806"></a>00806 <span class="keywordflow">return</span> res;
<a name="l00807"></a>00807 }
<a name="l00808"></a>00808 <span class="comment"></span>
<a name="l00809"></a>00809 <span class="comment"> //! Default constructor</span>
<a name="l00810"></a>00810 <span class="comment"></span> Unsigned::Unsigned() : d_n(new Impl) { }<span class="comment"></span>
<a name="l00811"></a>00811 <span class="comment"> //! Copy constructor</span>
<a name="l00812"></a>00812 <span class="comment"></span> Unsigned::Unsigned(<span class="keyword">const</span> Unsigned &n) : d_n(new Impl(*n.d_n)) { }
<a name="l00813"></a>00813
<a name="l00814"></a>00814 Unsigned::Unsigned(<span class="keywordtype">int</span> n) : d_n(new Impl((unsigned)n)) { }
<a name="l00815"></a>00815
<a name="l00816"></a>00816 Unsigned::Unsigned(<span class="keywordtype">unsigned</span> n) : d_n(new Impl(n)) { }<span class="comment"></span>
<a name="l00817"></a>00817 <span class="comment"> //! Private constructor</span>
<a name="l00818"></a>00818 <span class="comment"></span> Unsigned::Unsigned(<span class="keyword">const</span> Impl& t): d_n(new Impl(t)) { }
<a name="l00819"></a>00819 <span class="comment">// Constructors from strings</span>
<a name="l00820"></a>00820 Unsigned::Unsigned(<span class="keyword">const</span> <span class="keywordtype">char</span>* n, <span class="keywordtype">int</span> base)
<a name="l00821"></a>00821 : d_n(new Impl(string(n), base)) { }
<a name="l00822"></a>00822 Unsigned::Unsigned(<span class="keyword">const</span> <span class="keywordtype">string</span>& n, <span class="keywordtype">int</span> base)
<a name="l00823"></a>00823 : d_n(new Impl(n, base)) { }
<a name="l00824"></a>00824 <span class="comment">// Destructor</span>
<a name="l00825"></a>00825 Unsigned::~Unsigned() {
<a name="l00826"></a>00826 <span class="keyword">delete</span> d_n;
<a name="l00827"></a>00827 }
<a name="l00828"></a>00828
<a name="l00829"></a>00829 <span class="comment">// Assignment</span>
<a name="l00830"></a>00830 Unsigned& Unsigned::operator=(<span class="keyword">const</span> Unsigned& n) {
<a name="l00831"></a>00831 <span class="keywordflow">if</span>(<span class="keyword">this</span> == &n) <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00832"></a>00832 <span class="keyword">delete</span> d_n;
<a name="l00833"></a>00833 d_n = <span class="keyword">new</span> Impl(*n.d_n);
<a name="l00834"></a>00834 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00835"></a>00835 }
<a name="l00836"></a>00836
<a name="l00837"></a>00837 ostream &<a class="code" href="namespaceCVC3.html#a6b7e38d3c97da1e91e12a6c9555b8163">operator<<</a>(ostream &os, <span class="keyword">const</span> Unsigned &n) {
<a name="l00838"></a>00838 <span class="keywordflow">return</span>(os << n.toString());
<a name="l00839"></a>00839 }
<a name="l00840"></a>00840
<a name="l00841"></a>00841
<a name="l00842"></a>00842 <span class="comment">// Check that argument is an int and print an error message otherwise</span>
<a name="l00843"></a>00843
<a name="l00844"></a>00844 <span class="comment">/* Computes gcd and lcm on *integer* values. Result is always a</span>
<a name="l00845"></a>00845 <span class="comment"> positive integer. In this implementation, it is guaranteed by</span>
<a name="l00846"></a>00846 <span class="comment"> GMP. */</span>
<a name="l00847"></a>00847
<a name="l00848"></a>00848 Unsigned gcd(<span class="keyword">const</span> Unsigned &x, <span class="keyword">const</span> Unsigned &y) {
<a name="l00849"></a>00849 <span class="keywordflow">return</span> Unsigned(gcd(*x.d_n, *y.d_n));
<a name="l00850"></a>00850 }
<a name="l00851"></a>00851
<a name="l00852"></a>00852 Unsigned gcd(<span class="keyword">const</span> vector<Unsigned> &v) {
<a name="l00853"></a>00853 Unsigned::Impl g(1), zero;
<a name="l00854"></a>00854 <span class="keywordflow">if</span>(v.size() > 0) {
<a name="l00855"></a>00855 g = *v[0].d_n;
<a name="l00856"></a>00856 }
<a name="l00857"></a>00857 <span class="keywordflow">for</span>(<span class="keywordtype">size_t</span> i=1; i<v.size(); i++) {
<a name="l00858"></a>00858 <span class="keywordflow">if</span>(g == zero)
<a name="l00859"></a>00859 g = *(v[i].d_n);
<a name="l00860"></a>00860 <span class="keywordflow">else</span> <span class="keywordflow">if</span>(*(v[i].d_n) != zero)
<a name="l00861"></a>00861 g = gcd(g, *(v[i].d_n));
<a name="l00862"></a>00862 }
<a name="l00863"></a>00863 <span class="keywordflow">return</span> Unsigned(g);
<a name="l00864"></a>00864 }
<a name="l00865"></a>00865
<a name="l00866"></a>00866 Unsigned lcm(<span class="keyword">const</span> Unsigned &x, <span class="keyword">const</span> Unsigned &y) {
<a name="l00867"></a>00867 <span class="keywordflow">return</span> Unsigned(lcm(*x.d_n, *y.d_n));
<a name="l00868"></a>00868 }
<a name="l00869"></a>00869
<a name="l00870"></a>00870 Unsigned lcm(<span class="keyword">const</span> vector<Unsigned> &v) {
<a name="l00871"></a>00871 Unsigned::Impl g(1), zero;
<a name="l00872"></a>00872 <span class="keywordflow">for</span>(<span class="keywordtype">size_t</span> i=0; i<v.size(); i++) {
<a name="l00873"></a>00873 <span class="keywordflow">if</span>(*v[i].d_n != zero)
<a name="l00874"></a>00874 g = lcm(g, *v[i].d_n);
<a name="l00875"></a>00875 }
<a name="l00876"></a>00876 <span class="keywordflow">return</span> Unsigned(g);
<a name="l00877"></a>00877 }
<a name="l00878"></a>00878
<a name="l00879"></a>00879 Unsigned mod(<span class="keyword">const</span> Unsigned &x, <span class="keyword">const</span> Unsigned &y) {
<a name="l00880"></a>00880 <span class="keywordflow">return</span>(Unsigned(mod(*x.d_n, *y.d_n)));
<a name="l00881"></a>00881 }
<a name="l00882"></a>00882
<a name="l00883"></a>00883 Unsigned intRoot(<span class="keyword">const</span> Unsigned& base, <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> <span class="keywordtype">int</span> n) {
<a name="l00884"></a>00884 <span class="keywordflow">return</span> Unsigned(intRoot(*base.d_n, n));
<a name="l00885"></a>00885 }
<a name="l00886"></a>00886
<a name="l00887"></a>00887 <span class="keywordtype">string</span> Unsigned::toString(<span class="keywordtype">int</span> base)<span class="keyword"> const </span>{
<a name="l00888"></a>00888 <span class="keywordflow">return</span>(d_n->toString(base));
<a name="l00889"></a>00889 }
<a name="l00890"></a>00890
<a name="l00891"></a>00891 <span class="keywordtype">size_t</span> Unsigned::hash()<span class="keyword"> const </span>{
<a name="l00892"></a>00892 <a class="code" href="structHash_1_1hash_3_01const_01char_01_5_01_4.html">std::hash<const char *></a> h;
<a name="l00893"></a>00893 <span class="keywordflow">return</span> h(toString().c_str());
<a name="l00894"></a>00894 }
<a name="l00895"></a>00895
<a name="l00896"></a>00896 <span class="keywordtype">void</span> Unsigned::print()<span class="keyword"> const </span>{
<a name="l00897"></a>00897 cout << (*this) << <a class="code" href="group__ExprStream__Manip.html#ga05b0ea7353ec24fa8e7e272d7a7875d8" title="Print the end-of-line.">endl</a>;
<a name="l00898"></a>00898 }
<a name="l00899"></a>00899
<a name="l00900"></a>00900 Unsigned &Unsigned::operator+=(<span class="keyword">const</span> Unsigned &n2) {
<a name="l00901"></a>00901 *<span class="keyword">this</span> = (*this) + n2;
<a name="l00902"></a>00902 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00903"></a>00903 }
<a name="l00904"></a>00904
<a name="l00905"></a>00905 Unsigned &Unsigned::operator-=(<span class="keyword">const</span> Unsigned &n2) {
<a name="l00906"></a>00906 *<span class="keyword">this</span> = (*this) - n2;
<a name="l00907"></a>00907 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00908"></a>00908 }
<a name="l00909"></a>00909
<a name="l00910"></a>00910 Unsigned &Unsigned::operator*=(<span class="keyword">const</span> Unsigned &n2) {
<a name="l00911"></a>00911 *<span class="keyword">this</span> = (*this) * n2;
<a name="l00912"></a>00912 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00913"></a>00913 }
<a name="l00914"></a>00914
<a name="l00915"></a>00915 Unsigned &Unsigned::operator/=(<span class="keyword">const</span> Unsigned &n2) {
<a name="l00916"></a>00916 *<span class="keyword">this</span> = (*this) / n2;
<a name="l00917"></a>00917 <span class="keywordflow">return</span> *<span class="keyword">this</span>;
<a name="l00918"></a>00918 }
<a name="l00919"></a>00919
<a name="l00920"></a>00920 <span class="keywordtype">unsigned</span> <span class="keywordtype">long</span> Unsigned::getUnsigned()<span class="keyword"> const </span>{
<a name="l00921"></a>00921 <span class="keywordflow">return</span> d_n->getUnsigned();
<a name="l00922"></a>00922 }
<a name="l00923"></a>00923
<a name="l00924"></a>00924 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a8e164436388f2d87c971d9bbde973c58">operator==</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00925"></a>00925 <span class="keywordflow">return</span>(*n1.d_n == *n2.d_n);
<a name="l00926"></a>00926 }
<a name="l00927"></a>00927
<a name="l00928"></a>00928 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#ad3e3964a0b8cd9e2749de47b053b9d97">operator<</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00929"></a>00929 <span class="keywordflow">return</span>(*n1.d_n < *n2.d_n);
<a name="l00930"></a>00930 }
<a name="l00931"></a>00931
<a name="l00932"></a>00932 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#abccc88aac4f7652def737f1081dc7a89">operator<=</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00933"></a>00933 <span class="keywordflow">return</span>(*n1.d_n <= *n2.d_n);
<a name="l00934"></a>00934 }
<a name="l00935"></a>00935
<a name="l00936"></a>00936 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a0d82fd3eb68860cbd01ae86b2b9e3c66">operator></a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00937"></a>00937 <span class="keywordflow">return</span>(*n1.d_n > *n2.d_n);
<a name="l00938"></a>00938 }
<a name="l00939"></a>00939
<a name="l00940"></a>00940 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#af997ba8407b661bf2ffe2cb6f52c3e3b">operator>=</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00941"></a>00941 <span class="keywordflow">return</span>(*n1.d_n >= *n2.d_n);
<a name="l00942"></a>00942 }
<a name="l00943"></a>00943
<a name="l00944"></a>00944 <span class="keywordtype">bool</span> <a class="code" href="namespaceCVC3.html#a5aa953c549c2e103f3834c48bf6cb9a1">operator!=</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00945"></a>00945 <span class="keywordflow">return</span>(*n1.d_n != *n2.d_n);
<a name="l00946"></a>00946 }
<a name="l00947"></a>00947
<a name="l00948"></a>00948 Unsigned <a class="code" href="namespaceCVC3.html#a286cf8699acada708816e72c6b436b90">operator+</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00949"></a>00949 <span class="keywordflow">return</span> Unsigned((*n1.d_n) + (*n2.d_n));
<a name="l00950"></a>00950 }
<a name="l00951"></a>00951
<a name="l00952"></a>00952 Unsigned <a class="code" href="namespaceCVC3.html#aacf567dce1c762f957267427472bd959">operator-</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00953"></a>00953 <span class="keywordflow">return</span> Unsigned((*n1.d_n) - (*n2.d_n));
<a name="l00954"></a>00954 }
<a name="l00955"></a>00955
<a name="l00956"></a>00956 Unsigned <a class="code" href="namespaceCVC3.html#a300bc9244236ebdb1bff90b0b453034c">operator*</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00957"></a>00957 <span class="keywordflow">return</span> Unsigned((*n1.d_n) * (*n2.d_n));
<a name="l00958"></a>00958 }
<a name="l00959"></a>00959
<a name="l00960"></a>00960 Unsigned <a class="code" href="namespaceCVC3.html#a069aa16342bb9958a3d576a18a390248">operator/</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00961"></a>00961 <span class="keywordflow">return</span> Unsigned((*n1.d_n) / (*n2.d_n));
<a name="l00962"></a>00962 }
<a name="l00963"></a>00963
<a name="l00964"></a>00964 Unsigned operator%(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00965"></a>00965 <span class="keywordflow">return</span> Unsigned((*n1.d_n) % (*n2.d_n));
<a name="l00966"></a>00966 }
<a name="l00967"></a>00967
<a name="l00968"></a>00968 Unsigned <a class="code" href="namespaceCVC3.html#a6b7e38d3c97da1e91e12a6c9555b8163">operator<<</a>(<span class="keyword">const</span> Unsigned &n1, <span class="keywordtype">unsigned</span> n2) {
<a name="l00969"></a>00969 <span class="keywordflow">return</span> Unsigned((*n1.d_n) << n2);
<a name="l00970"></a>00970 }
<a name="l00971"></a>00971
<a name="l00972"></a>00972 Unsigned operator&(<span class="keyword">const</span> Unsigned &n1, <span class="keyword">const</span> Unsigned &n2) {
<a name="l00973"></a>00973 <span class="keywordflow">return</span> Unsigned((*n1.d_n) & (*n2.d_n));
<a name="l00974"></a>00974 }
<a name="l00975"></a>00975
<a name="l00976"></a>00976 Unsigned Rational::Impl::getUnsignedMP()<span class="keyword"> const </span>{
<a name="l00977"></a>00977 <span class="keywordflow">return</span> Unsigned(Unsigned::Impl(mpq_numref(d_n)));
<a name="l00978"></a>00978 }
<a name="l00979"></a>00979
<a name="l00980"></a>00980
<a name="l00981"></a>00981 } <span class="comment">/* close namespace */</span>
<a name="l00982"></a>00982
<a name="l00983"></a>00983 <span class="preprocessor">#endif</span>
</pre></div></div>
</div>
<hr class="footer"/><address class="footer"><small>Generated on Wed Sep 7 2011 for CVC3 by 
<a href="http://www.doxygen.org/index.html">
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.7.4 </small></address>
</body>
</html>
