RubyGems - long-decimal - Versions diffs - 0.00.15 → 0.00.16 - Mend

long-decimal 0.00.15 → 0.00.16

Files changed (152) hide show

data/doc/dot/f_0.png CHANGED Viewed

Binary file

data/doc/files/lib/long-decimal_rb.html CHANGED Viewed

@@ -56,7 +56,7 @@
     </tr>
     <tr class="top-aligned-row">
       <td><strong>Last Update:</strong></td>
-      <td>Mon Mar 20 23:12:26 CET 2006</td>
+      <td>Fri Mar 24 18:59:00 CET 2006</td>
     </tr>
     </table>
   </div>
@@ -69,13 +69,14 @@
   <div id="contextContent">
     <div id="diagram">
       <map id="map" name="map">
-  <area shape="RECT" coords="251,197,366,245"      href="../../classes/LongDecimalQuot.html" alt="LongDecimalQuot">
-  <area shape="RECT" coords="134,197,227,245"      href="../../classes/LongDecimal.html" alt="LongDecimal">
-  <area shape="RECT" coords="51,5,131,53"      href="../../classes/Comparable.html" alt="Comparable">
-  <area shape="RECT" coords="27,101,155,149"      href="../../classes/LongDecimalRoundingMode/RoundingModeClass.html" alt="RoundingModeClass">
-  <area shape="RECT" coords="239,101,311,149"      href="../../classes/Numeric.html" alt="Numeric">
-  <area shape="RECT" coords="27,187,120,233"      href="../../classes/LongMath.html" alt="LongMath">
-  <area shape="RECT" coords="16,68,192,160"      href="../../classes/LongDecimalRoundingMode.html" alt="LongDecimalRoundingMode">
+  <area shape="RECT" coords="68,197,186,245"      href="../../classes/LongDecimalBase.html" alt="LongDecimalBase">
+  <area shape="RECT" coords="163,5,243,53"      href="../../classes/Comparable.html" alt="Comparable">
+  <area shape="RECT" coords="139,101,267,149"      href="../../classes/LongDecimalRoundingMode/RoundingModeClass.html" alt="RoundingModeClass">
+  <area shape="RECT" coords="6,293,120,341"      href="../../classes/LongDecimalQuot.html" alt="LongDecimalQuot">
+  <area shape="RECT" coords="144,293,238,341"      href="../../classes/LongDecimal.html" alt="LongDecimal">
+  <area shape="RECT" coords="43,101,115,149"      href="../../classes/Numeric.html" alt="Numeric">
+  <area shape="RECT" coords="246,187,339,233"      href="../../classes/LongMath.html" alt="LongMath">
+  <area shape="RECT" coords="128,68,304,160"      href="../../classes/LongDecimalRoundingMode.html" alt="LongDecimalRoundingMode">
 </map>
 <img src="../../dot/f_0.png" usemap="#map" border=0 alt="TopLevel">
     </div>
@@ -87,7 +88,7 @@ point
 </p>
 <p>
 CVS-ID: $Header: /var/cvs/long-decimal/long-decimal/lib/long-decimal.rb,v
-1.6 2006/03/20 21:38:32 bk1 Exp $ CVS-Label: $Name: PRE_ALPHA_0_15 $
+1.9 2006/03/24 17:42:07 bk1 Exp $ CVS-Label: $Name: PRE_ALPHA_0_16 $
 Author: $Author: bk1 $ (Karl Brodowsky)
 </p>

data/doc/{classes/LongMath.src/M000024.html → files/lib/long-decimal_rb.src/M000001.html} RENAMED Viewed

@@ -5,12 +5,12 @@
 <html>
 <head>
-  <title>LongDecimal (LongMath)</title>
+  <title>LongDecimal (lib/long-decimal.rb)</title>
   <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
-  <link rel="stylesheet" href="../.././rdoc-style.css" type="text/css" media="screen" />
+  <link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
 </head>
 <body class="standalone-code">
-  <pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line 2202</span>
+  <pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line 1578</span>
 <span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongDecimal</span>(<span class="ruby-identifier">a</span>, <span class="ruby-identifier">b</span> = <span class="ruby-value">0</span>)
   <span class="ruby-keyword kw">if</span> <span class="ruby-identifier">b</span> <span class="ruby-operator">==</span> <span class="ruby-value">0</span> <span class="ruby-operator">&amp;&amp;</span> (<span class="ruby-identifier">a</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimal</span>) <span class="ruby-keyword kw">then</span>
     <span class="ruby-identifier">a</span>

data/doc/{classes/LongMath.src/M000025.html → files/lib/long-decimal_rb.src/M000002.html} RENAMED Viewed

@@ -5,12 +5,12 @@
 <html>
 <head>
-  <title>LongDecimalQuot (LongMath)</title>
+  <title>LongDecimalQuot (lib/long-decimal.rb)</title>
   <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
-  <link rel="stylesheet" href="../.././rdoc-style.css" type="text/css" media="screen" />
+  <link rel="stylesheet" href="../../.././rdoc-style.css" type="text/css" media="screen" />
 </head>
 <body class="standalone-code">
-  <pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line 2215</span>
+  <pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line 1591</span>
 <span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongDecimalQuot</span>(<span class="ruby-identifier">first</span>, <span class="ruby-identifier">second</span>)
   <span class="ruby-constant">LongDecimalQuot</span>.<span class="ruby-identifier">new!</span>(<span class="ruby-identifier">first</span>, <span class="ruby-identifier">second</span>)
 <span class="ruby-keyword kw">end</span></pre>

data/doc/fr_class_index.html CHANGED Viewed

@@ -21,6 +21,7 @@
   <h1 class="section-bar">Classes</h1>
   <div id="index-entries">
     <a href="classes/LongDecimal.html">LongDecimal</a><br />
+    <a href="classes/LongDecimalBase.html">LongDecimalBase</a><br />
     <a href="classes/LongDecimalQuot.html">LongDecimalQuot</a><br />
     <a href="classes/LongDecimalRoundingMode.html">LongDecimalRoundingMode</a><br />
     <a href="classes/LongDecimalRoundingMode/RoundingModeClass.html">LongDecimalRoundingMode::RoundingModeClass</a><br />

data/doc/fr_method_index.html CHANGED Viewed

@@ -20,142 +20,141 @@
 <div id="index">
   <h1 class="section-bar">Methods</h1>
   <div id="index-entries">
-    <a href="classes/LongDecimalQuot.html#M000020">% (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000079">% (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000080">& (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000016">* (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000072">* (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000077">** (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000018">** (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000070">+ (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000014">+ (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000012">+@ (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000068">+@ (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000015">- (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000071">- (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000069">-@ (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000013">-@ (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000076">/ (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000017">/ (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000084"><< (LongDecimal)</a><br />
-    <a href="classes/LongDecimalRoundingMode/RoundingModeClass.html#M000136"><=> (LongDecimalRoundingMode::RoundingModeClass)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000028"><=> (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000099"><=> (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000027">== (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000107">== (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000085">>> (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000072">% (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000021">% (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000073">& (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000065">* (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000017">* (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000070">** (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000019">** (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000015">+ (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000063">+ (LongDecimal)</a><br />
+    <a href="classes/LongDecimalBase.html#M000104">+@ (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimal.html#M000064">- (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000016">- (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000062">-@ (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000014">-@ (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000069">/ (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000018">/ (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000077"><< (LongDecimal)</a><br />
+    <a href="classes/LongDecimalBase.html#M000109"><=> (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimalRoundingMode/RoundingModeClass.html#M000135"><=> (LongDecimalRoundingMode::RoundingModeClass)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000025">== (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000094">== (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000095">=== (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000078">>> (LongDecimal)</a><br />
     <a href="files/lib/long-decimal_rb.html#M000001">LongDecimal (lib/long-decimal.rb)</a><br />
     <a href="files/lib/long-decimal_rb.html#M000002">LongDecimalQuot (lib/long-decimal.rb)</a><br />
-    <a href="classes/LongDecimal.html#M000086">[] (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000082">^ (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000097">abs (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000023">abs (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000024">abs2 (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000098">abs2 (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000059">anti_equalize_scale (LongDecimal)</a><br />
-    <a href="classes/LongMath.html#M000128">calc_iprec_for_exp (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000126">calc_pi (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000114">check_is_int (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000115">check_is_ld (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000117">check_is_mode (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000116">check_is_prec (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000113">check_word_len (LongMath)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000026">coerce (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000102">coerce (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000064">dec (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000066">dec! (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000079">[] (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000075">^ (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000088">abs (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000022">abs (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimalBase.html#M000108">abs2 (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimal.html#M000055">anti_equalize_scale (LongDecimal)</a><br />
+    <a href="classes/LongMath.html#M000127">calc_iprec_for_exp (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000125">calc_pi (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000113">check_is_int (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000114">check_is_ld (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000116">check_is_mode (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000115">check_is_prec (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000112">check_word_len (LongMath)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000024">coerce (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000089">coerce (LongDecimal)</a><br />
+    <a href="classes/LongDecimalBase.html#M000103">dec (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimal.html#M000060">dec! (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000013">dec! (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000051">denominator (LongDecimal)</a><br />
     <a href="classes/LongDecimalQuot.html#M000006">denominator (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000055">denominator (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000073">divide (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000074">divide_s (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000078">divmod (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000019">divmod (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000058">equalize_scale (LongDecimal)</a><br />
-    <a href="classes/LongMath.html#M000127">exp (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000129">exp_internal (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000124">gcd_with_high_power (LongMath)</a><br />
-    <a href="classes/LongDecimal.html#M000110">hash (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000035">hash (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000063">inc (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000065">inc! (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000111">inspect (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000036">inspect (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000057">int_digits10 (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000056">int_digits2 (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000096">inverse (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000031">is_int? (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000103">is_int? (LongDecimal)</a><br />
-    <a href="classes/LongMath.html#M000130">log (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000131">log10 (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000132">log2 (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000133">log_internal (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000119">merge_from_words (LongMath)</a><br />
-    <a href="classes/LongDecimal.html#M000042">minus_one! (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000088">move_point_left (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000090">move_point_left_int (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000089">move_point_right (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000091">move_point_right_int (LongDecimal)</a><br />
-    <a href="classes/LongMath.html#M000125">multiplicity_of_factor (LongMath)</a><br />
-    <a href="classes/LongDecimal.html#M000044">new (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000066">divide (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000067">divide_s (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000071">divmod (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000020">divmod (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000054">equalize_scale (LongDecimal)</a><br />
+    <a href="classes/LongMath.html#M000126">exp (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000128">exp_internal (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000123">gcd_with_high_power (LongMath)</a><br />
+    <a href="classes/LongDecimal.html#M000098">hash (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000032">hash (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimalBase.html#M000102">inc (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimal.html#M000059">inc! (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000012">inc! (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000033">inspect (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000099">inspect (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000053">int_digits10 (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000052">int_digits2 (LongDecimal)</a><br />
+    <a href="classes/LongDecimalBase.html#M000107">inverse (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000028">is_int? (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000090">is_int? (LongDecimal)</a><br />
+    <a href="classes/LongMath.html#M000129">log (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000130">log10 (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000131">log2 (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000132">log_internal (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000118">merge_from_words (LongMath)</a><br />
+    <a href="classes/LongDecimal.html#M000039">minus_one! (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000081">move_point_left (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000083">move_point_left_int (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000082">move_point_right (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000084">move_point_right_int (LongDecimal)</a><br />
+    <a href="classes/LongMath.html#M000124">multiplicity_of_factor (LongMath)</a><br />
     <a href="classes/LongDecimalQuot.html#M000004">new (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000041">new (LongDecimal)</a><br />
     <a href="classes/LongDecimalQuot.html#M000003">new! (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000037">new! (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000061">next (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000034">new! (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000057">next (LongDecimal)</a><br />
     <a href="classes/LongDecimalQuot.html#M000005">numerator (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000039">one! (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000109">one? (LongDecimal)</a><br />
-    <a href="classes/LongMath.html#M000134">power (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000135">power_internal (LongMath)</a><br />
-    <a href="classes/LongDecimal.html#M000043">power_of_ten! (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000062">pred (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000075">rdiv (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000022">reciprocal (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000095">reciprocal (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000046">round_to_scale (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000025">round_to_scale (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000045">scale= (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000101">scale_equal (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000030">scale_equal (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000100">scale_ufo (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000029">scale_ufo (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000032">sgn (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000104">sgn (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000106">sign (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000034">sign (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000105">signum (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000033">signum (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000087">size (LongDecimal)</a><br />
-    <a href="classes/LongMath.html#M000118">split_to_words (LongMath)</a><br />
-    <a href="classes/LongDecimal.html#M000093">sqrt (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000094">sqrt_with_remainder (LongDecimal)</a><br />
-    <a href="classes/LongMath.html#M000120">sqrtb (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000121">sqrtb_with_remainder (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000122">sqrtw (LongMath)</a><br />
-    <a href="classes/LongMath.html#M000123">sqrtw_with_remainder (LongMath)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000021">square (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000092">square (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000060">succ (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000041">ten! (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000054">to_bd (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000009">to_f (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000051">to_f (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000052">to_i (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000036">one! (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000027">one? (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000097">one? (LongDecimal)</a><br />
+    <a href="classes/LongMath.html#M000133">power (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000134">power_internal (LongMath)</a><br />
+    <a href="classes/LongDecimal.html#M000040">power_of_ten! (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000058">pred (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000068">rdiv (LongDecimal)</a><br />
+    <a href="classes/LongDecimalBase.html#M000106">reciprocal (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000023">round_to_scale (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000043">round_to_scale (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000042">scale= (LongDecimal)</a><br />
+    <a href="classes/LongDecimalBase.html#M000111">scale_equal (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimalBase.html#M000110">scale_ufo (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000029">sgn (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000091">sgn (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000093">sign (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000031">sign (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000092">signum (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000030">signum (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000080">size (LongDecimal)</a><br />
+    <a href="classes/LongMath.html#M000117">split_to_words (LongMath)</a><br />
+    <a href="classes/LongDecimal.html#M000086">sqrt (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000087">sqrt_with_remainder (LongDecimal)</a><br />
+    <a href="classes/LongMath.html#M000119">sqrtb (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000120">sqrtb_with_remainder (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000121">sqrtw (LongMath)</a><br />
+    <a href="classes/LongMath.html#M000122">sqrtw_with_remainder (LongMath)</a><br />
+    <a href="classes/LongDecimalBase.html#M000105">square (LongDecimalBase)</a><br />
+    <a href="classes/LongDecimal.html#M000085">square (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000056">succ (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000038">ten! (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000009">to_bd (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000050">to_bd (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000008">to_f (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000047">to_f (LongDecimal)</a><br />
     <a href="classes/LongDecimalQuot.html#M000010">to_i (LongDecimalQuot)</a><br />
-    <a href="classes/Numeric.html#M000112">to_ld (Numeric)</a><br />
+    <a href="classes/LongDecimal.html#M000048">to_i (LongDecimal)</a><br />
     <a href="classes/LongDecimalQuot.html#M000011">to_ld (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000053">to_ld (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000050">to_r (LongDecimal)</a><br />
-    <a href="classes/LongDecimalQuot.html#M000008">to_r (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000047">to_s (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000049">to_ld (LongDecimal)</a><br />
+    <a href="classes/Numeric.html#M000100">to_ld (Numeric)</a><br />
+    <a href="classes/LongDecimalBase.html#M000101">to_r (LongDecimalBase)</a><br />
     <a href="classes/LongDecimalQuot.html#M000007">to_s (LongDecimalQuot)</a><br />
-    <a href="classes/LongDecimal.html#M000048">to_s_10 (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000049">to_s_internal (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000040">two! (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000067">unit (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000038">zero! (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000108">zero? (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000081">| (LongDecimal)</a><br />
-    <a href="classes/LongDecimal.html#M000083">~ (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000044">to_s (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000045">to_s_10 (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000046">to_s_internal (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000037">two! (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000061">unit (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000035">zero! (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000096">zero? (LongDecimal)</a><br />
+    <a href="classes/LongDecimalQuot.html#M000026">zero? (LongDecimalQuot)</a><br />
+    <a href="classes/LongDecimal.html#M000074">| (LongDecimal)</a><br />
+    <a href="classes/LongDecimal.html#M000076">~ (LongDecimal)</a><br />
   </div>
 </div>
 </body>

data/lib/long-decimal.rb CHANGED Viewed

@@ -1,8 +1,8 @@
 #
 # long-decimal.rb -- Arbitrary precision decimals with fixed decimal point
 #
-# CVS-ID:    $Header: /var/cvs/long-decimal/long-decimal/lib/long-decimal.rb,v 1.6 2006/03/20 21:38:32 bk1 Exp $
-# CVS-Label: $Name: PRE_ALPHA_0_15 $
+# CVS-ID:    $Header: /var/cvs/long-decimal/long-decimal/lib/long-decimal.rb,v 1.9 2006/03/24 17:42:07 bk1 Exp $
+# CVS-Label: $Name: PRE_ALPHA_0_16 $
 # Author:    $Author: bk1 $ (Karl Brodowsky)
 #
 require "complex"
@@ -52,15 +52,114 @@ module LongDecimalRoundingMode
 end # LongDecimalRoundingMode
+#
+# common base class for LongDecimal and LongDecimalQuot
+#
+class LongDecimalBase < Numeric
+  @RCS_ID='-$Id: long-decimal.rb,v 1.9 2006/03/24 17:42:07 bk1 Exp $-'
+  include LongDecimalRoundingMode
+  #
+  # convert self into Rational
+  # this works quite straitforward.
+  # in case of LongDecimal use int_val as numerator and a power of 10
+  # as denominator, which happens to be the way numerator and
+  # denominator are defined
+  #
+  def to_r
+    Rational(numerator, denominator)
+  end
+  #
+  # self + 1
+  #
+  def inc
+    self + 1
+  end
+  #
+  # self - 1
+  #
+  def dec
+    self - 1
+  end
+  #
+  # unary plus returns self
+  #
+  def +@
+    self
+  end
+  #
+  # calculate the square of self
+  #
+  def square
+    self * self
+  end
+  #
+  # calculate the multiplicative inverse
+  #
+  def reciprocal
+    1 / self
+  end
+  alias inverse reciprocal
+  #
+  # square of absolute value
+  # happens to be the square
+  #
+  alias abs2 square
+  #
+  # Compares the two numbers.
+  # returns -1 if self < other
+  #          0 if self-other = 0
+  #         +1 if self > other
+  # it needs to be observed, that
+  # x == y implies (x <=> y) == 0
+  # but not
+  # (x <=> y) == 0 implies x == y
+  # because == also takes the scale into account and considers two
+  # numbers only equal, if they have the same number of potentially
+  # zero digits after the decimal point.
+  #
+  def <=> (other)
+    diff = (self - other)
+    if (diff.kind_of? LongDecimalBase) then
+      diff.sgn
+    else
+      diff <=> 0
+    end
+  end
+  #
+  # <=>-comparison for the scales
+  #
+  def scale_ufo(other)
+    raise TypeError, "only works for LongDecimal or LongDecimalQuot" unless (other.kind_of? LongDecimalBase)
+    self.scale <=> other.scale
+  end
+  #
+  # ==-comparison for the scales
+  #
+  def scale_equal(other)
+    scale_ufo(other).zero?
+  end
+end
 #
 # class for holding fixed point long decimal numbers
 # these can be considered as a pair of two integer.  One contains the
 # digits and the other one the position of the decimal point.
 #
-class LongDecimal < Numeric
-  @RCS_ID='-$Id: long-decimal.rb,v 1.6 2006/03/20 21:38:32 bk1 Exp $-'
-  include LongDecimalRoundingMode
+class LongDecimal < LongDecimalBase
+  @RCS_ID='-$Id: long-decimal.rb,v 1.9 2006/03/24 17:42:07 bk1 Exp $-'
   #  MINUS_ONE = LongDecimal(-1)
   #  ZERO      = LongDecimal(0)
@@ -365,15 +464,6 @@ class LongDecimal < Numeric
   protected :to_s_10
   protected :to_s_internal
-  #
-  # convert self into Rational
-  # this works quite straitforward.  use int_val as numerator and a
-  # power of 10 as denominator
-  #
-  def to_r
-    Rational(numerator, denominator)
-  end
   #
   # convert self into Float
   # this works straitforward by dividing int_val by power of 10 in
@@ -507,7 +597,6 @@ class LongDecimal < Numeric
       idx -= 1
       expon = 1 << idx
       power = powers[idx]
-      # puts("i=#{int_part} p=#{power}\n")
       while int_part >= power
         id += expon
         int_part = (int_part / power).to_i
@@ -576,20 +665,6 @@ class LongDecimal < Numeric
     LongDecimal(int_val - 1, scale)
   end
-  #
-  # self + 1
-  #
-  def inc
-    self + 1
-  end
-  #
-  # self - 1
-  #
-  def dec
-    self - 1
-  end
   #
   # self += 1
   #
@@ -611,14 +686,6 @@ class LongDecimal < Numeric
     LongDecimal(1, scale)
   end
-  #
-  # apply unary +
-  # (returns self)
-  #
-  def +@
-    self
-  end
   #
   # apply unary -
   # (returns negated self)
@@ -699,7 +766,7 @@ class LongDecimal < Numeric
     if (q.kind_of? Float) then
       q = LongDecimal(q)
     end
-    if (q.kind_of? LongDecimal) || (q.kind_of? LongDecimalQuot) then
+    if (q.kind_of? LongDecimalBase) then
       if (new_scale.nil?) then
         new_scale = q.scale
       end
@@ -753,7 +820,7 @@ class LongDecimal < Numeric
   # applying power, usually resulting in a Float as power.
   #
   def **(other)
-    if ((other.kind_of? LongDecimal) || (other.kind_of? LongDecimalQuot)) && other.is_int? then
+    if (other.kind_of? LongDecimalBase) && other.is_int? then
       other = other.to_i
     end
     if other.kind_of? Integer then
@@ -765,7 +832,7 @@ class LongDecimal < Numeric
         LongDecimalQuot(Rational(10 ** new_scale, int_val ** abs_other), new_scale)
       end
     else
-      if (other.kind_of? LongDecimal) || (other.kind_of? LongDecimalQuot) then
+      if (other.kind_of? LongDecimalBase) then
         other = other.to_r
       end
       self.to_r ** other
@@ -965,7 +1032,7 @@ class LongDecimal < Numeric
       return [ y, r ]
     else
       if ((rounding_mode == ROUND_HALF_EVEN || rounding_mode == ROUND_HALF_DOWN) && rem > 0) then
-	rounding_mode = ROUND_HALF_UP
+        rounding_mode = ROUND_HALF_UP
       end
       y = y.round_to_scale(new_scale, rounding_mode)
       return y
@@ -974,15 +1041,6 @@ class LongDecimal < Numeric
   private :sqrt_internal
-  #
-  # calculate the multiplicative inverse
-  #
-  def reciprocal
-    1 / self
-  end
-  alias inverse reciprocal
   #
   # Absolute value
   #
@@ -990,49 +1048,6 @@ class LongDecimal < Numeric
     LongDecimal(int_val.abs, scale)
   end
-  #
-  # square of absolute value
-  # happens to be the square
-  #
-  alias abs2 square
-  #
-  # Compares the two numbers.
-  # returns -1 if self < other
-  #          0 if self-other = 0
-  #         +1 if self > other
-  # it needs to be observed, that
-  # x == y implies (x <=> y) == 0
-  # but not
-  # (x <=> y) == 0 implies x == y
-  # because == also takes the scale into account and considers two
-  # numbers only equal, if they have the same number of potentially
-  # zero digits after the decimal point.
-  #
-  def <=> (other)
-    diff = (self - other)
-    if (diff.kind_of? LongDecimal) || (diff.kind_of? LongDecimalQuot) then
-      diff.sgn
-    else
-      diff <=> 0
-    end
-  end
-  #
-  # <=>-comparison for the scales
-  #
-  def scale_ufo(other)
-    raise TypeError, "only works for LongDecimal and LongDecimalQuot" unless (other.kind_of? LongDecimal) || (other.kind_of? LongDecimalQuot)
-    self.scale <=> other.scale
-  end
-  #
-  # ==-comparison for the scales
-  #
-  def scale_equal(other)
-    scale_ufo(other).zero?
-  end
   #
   # return a pair o, s resembling other, self, but potentially
   # converted to compatible types and ready for
@@ -1101,6 +1116,15 @@ class LongDecimal < Numeric
     (other.kind_of? LongDecimal) && self.int_val == other.int_val && self.scale == other.scale
   end
+  #
+  # comparison of self with other for equality
+  # takes into account the values expressed by self and other and the
+  # equality of the number of digits.
+  #
+  def ===(other)
+    (other.kind_of? LongDecimal) && self.int_val == other.int_val
+  end
   #
   # check if the number expressed by self is 0 (zero)
   # with any number of 0s after the decimal point.
@@ -1138,11 +1162,9 @@ end # LongDecimal
 # performed a division.  The division cannot be completed without
 # providing additional information on how to round the result.
 #
-class LongDecimalQuot < Numeric
+class LongDecimalQuot < LongDecimalBase
-  @RCS_ID='-$Id: long-decimal.rb,v 1.6 2006/03/20 21:38:32 bk1 Exp $-'
-  include LongDecimalRoundingMode
+  @RCS_ID='-$Id: long-decimal.rb,v 1.9 2006/03/24 17:42:07 bk1 Exp $-'
   #
   # constructor
@@ -1212,13 +1234,6 @@ class LongDecimalQuot < Numeric
     str + "[" + scale.to_s + "]"
   end
-  #
-  # conversion to rational
-  #
-  def to_r
-    Rational(numerator, denominator)
-  end
   #
   # convert into Float
   #
@@ -1226,6 +1241,13 @@ class LongDecimalQuot < Numeric
     to_r.to_f
   end
+  #
+  # conversion to BigDecimal
+  #
+  def to_bd
+    to_ld.to_bd
+  end
   #
   # convert into Integer
   #
@@ -1241,10 +1263,17 @@ class LongDecimalQuot < Numeric
   end
   #
-  # unary plus returns self
+  # self += 1
   #
-  def +@
-    self
+  def inc!
+    @rat += 1
+  end
+  #
+  # self -= 1
+  #
+  def dec!
+    @rat -= 1
   end
   #
@@ -1326,7 +1355,7 @@ class LongDecimalQuot < Numeric
   # otherwise result will be Float, BigDecimal or Complex
   #
   def **(other)
-    if (other.kind_of? LongDecimal) || (other.kind_of? LongDecimalQuot) then
+    if (other.kind_of? LongDecimalBase) then
       if other.is_int? then
         other = other.to_i
       else
@@ -1348,9 +1377,9 @@ class LongDecimalQuot < Numeric
   #
   # division with remainder
-  # calculate q and r such that
+  # calculate q and r such that
   # q is an integer and r is non-negative and less or equal the
-  # divisor.
+  # divisor.
   #
   def divmod(other)
     if (other.kind_of? Complex) then
@@ -1359,7 +1388,7 @@ class LongDecimalQuot < Numeric
     q = (self / other).to_i
     return q, self - other * q
   end
   #
   # division with remainder
   # only return the remainder
@@ -1369,20 +1398,6 @@ class LongDecimalQuot < Numeric
     r
   end
-  #
-  # calculate the square of self
-  #
-  def square
-    self * self
-  end
-  #
-  # calculate the multiplicative inverse
-  #
-  def reciprocal
-    1 / self
-  end
   #
   # Absolute value
   #
@@ -1392,10 +1407,9 @@ class LongDecimalQuot < Numeric
   #
   # square of absolute value
+  # happens to be the square
   #
-  def abs2
-    self.abs.square
-  end
+  alias abs2 square
   #
   # convert LongDecimalQuot to LongDecimal with the given precision
@@ -1510,30 +1524,19 @@ class LongDecimalQuot < Numeric
   end
   #
-  # Compares the two numbers for < and > etc.
-  #
-  def <=> (other)
-    diff = (self - other)
-    if (diff.kind_of? LongDecimal) || (diff.kind_of? LongDecimalQuot) then
-      diff.sgn
-    else
-      diff <=> 0
-    end
-  end
-  #
-  # compare scales with <=>
+  # check if the number expressed by self is 0 (zero)
+  # with any number of 0s after the decimal point.
   #
-  def scale_ufo(other)
-    raise TypeError, "only works for LongDecimal and LongDecimalQuot" unless (other.kind_of? LongDecimal) || (other.kind_of? LongDecimalQuot)
-    self.scale <=> other.scale
+  def zero?
+    @rat.zero?
   end
   #
-  # check if scales are equal
+  # check if the number expressed by self is 1 (one)
+  # with any number of 0s after the decimal point.
   #
-  def scale_equal(other)
-    scale_ufo(other).zero?
+  def one?
+    (@rat == 1)
   end
   #
@@ -1791,7 +1794,6 @@ module LongMath
       return sqrtb_with_remainder(xwords[0])
     end
-    # puts(xwords.inspect + "\n")
     xi = (xwords[0] << n2) + xwords[1]
     a  = sqrtb_with_remainder(xi)
     yi = a[0]
@@ -1811,7 +1813,6 @@ module LongMath
         d = d0 + q
         r = xi - (q * d)
         break if (0 <= r && (r < d || was_negative))
-        # puts("i=#{i} j=#{j} q=#{q} d0=#{d0} d=#{d} r=#{r} yi=#{yi} xi=#{xi}\n")
         if (r < 0) then
           was_negative = true
           q = q-1
@@ -1820,7 +1821,6 @@ module LongMath
         end
         j += 1
         if (j > 10) then
-          # puts("i=#{i} j=#{j} q=#{q} q0=#{q0} d0=#{d0} d=#{d} r=#{r} yi=#{yi} xi=#{xi}\n")
           break
         end
       end
@@ -1831,7 +1831,6 @@ module LongMath
   end
   #
   # find the gcd of an Integer x with b**n0 where n0 is a sufficiently
   # high exponent
   # such that gcd(x, b**m) = gcd(x, b**n) for all m, n >= n0
@@ -1940,7 +1939,6 @@ module LongMath
       last_diff = diff
       k += 1
       pow_k = pow_k << 1
-      # puts("k=#{k} pi=#{pi.to_s}\nd=#{diff}\n\n")
     end
     pi.round_to_scale(prec, final_mode)
   end
@@ -1975,7 +1973,6 @@ module LongMath
     if (iprec < prec) then
       iprec = prec
     end
-    # puts("calc_iprec_for_exp: x=#{x} prec=#{prec} iprec=#{iprec} iprec_extra=#{iprec_extra}\n")
     iprec
   end
@@ -2032,7 +2029,6 @@ module LongMath
       iprec = calc_iprec_for_exp(x, prec)
     end
     check_is_prec(iprec, "iprec")
-    # puts("exp_internal: x=#{x} prec=#{prec} iprec=#{iprec}\n")
     dprec = [ iprec, (prec + 1) << 1 ].min
@@ -2062,13 +2058,10 @@ module LongMath
       if (i > 0) then
         x_i = (x_i * x_k).round_to_scale(iprec, mode)
       end
-      # puts("y_k=#{y_k}\ni=#{i} j=#{j} k=#{k} x=#{x}\nx_k=#{x_k}\nx_j=#{x_j}\nx_i=#{x_i}\ns[i]=#{s[i]}\n\n")
       y_k += (s[i] * x_i).round_to_scale(iprec, mode)
     end
-    # puts("y_k = #{y_k}\n")
     k.times do |i|
       y_k = y_k.square.round_to_scale(iprec, mode)
-      # puts("i=#{i} y_k = #{y_k}\n")
     end
     y = y_k.round_to_scale(prec, final_mode)
     y
@@ -2231,7 +2224,7 @@ module LongMath
     # puts("y=#{y} s=#{s} f=#{factor} sum=#{sum}\n")
     return y.round_to_scale(prec, final_mode)
-  end
+  end # log_internal
   #
   # calc the power of x with exponent y to the given precision as
@@ -2281,7 +2274,8 @@ module LongMath
     xy = exp_internal(logx_y, prec + 1, mode)
     # puts("power_internal: x=#{x} logx=#{logx} y=#{y} logx_y=#{logx_y} xy=#{xy} iprec=#{iprec} prec=#{prec}\n")
     xy.round_to_scale(prec, final_mode)
-  end
+  end # power_internal
 end # LongMath