long-decimal 0.00.20 → 0.00.21
Sign up to get free protection for your applications and to get access to all the features.
- data/README +32 -31
- data/Rakefile +1 -1
- data/VERSION +1 -1
- data/doc/classes/LongDecimal.src/M000088.html +1 -1
- data/doc/classes/LongDecimal.src/M000089.html +1 -1
- data/doc/classes/LongDecimal.src/M000090.html +1 -1
- data/doc/classes/LongDecimal.src/M000091.html +1 -1
- data/doc/classes/LongDecimal.src/M000092.html +1 -1
- data/doc/classes/LongDecimal.src/M000093.html +1 -1
- data/doc/classes/LongDecimal.src/M000096.html +1 -1
- data/doc/classes/LongDecimal.src/M000097.html +1 -1
- data/doc/classes/LongDecimal.src/M000098.html +1 -1
- data/doc/classes/LongDecimal.src/M000099.html +1 -1
- data/doc/classes/LongDecimal.src/M000100.html +1 -1
- data/doc/classes/LongDecimal.src/M000101.html +1 -1
- data/doc/classes/LongDecimalBase.html +53 -53
- data/doc/classes/LongDecimalBase.src/M000105.html +4 -4
- data/doc/classes/LongDecimalBase.src/M000106.html +4 -4
- data/doc/classes/LongDecimalBase.src/M000107.html +4 -4
- data/doc/classes/LongDecimalBase.src/M000108.html +4 -4
- data/doc/classes/LongDecimalBase.src/M000109.html +4 -4
- data/doc/classes/LongDecimalBase.src/M000110.html +4 -9
- data/doc/classes/LongDecimalBase.src/M000113.html +9 -5
- data/doc/classes/LongDecimalBase.src/M000114.html +5 -4
- data/doc/classes/LongDecimalQuot.src/M000003.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000004.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000005.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000006.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000007.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000008.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000009.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000010.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000011.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000012.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000013.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000014.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000015.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000016.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000017.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000018.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000019.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000020.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000021.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000022.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000023.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000024.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000025.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000026.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000027.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000028.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000029.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000032.html +1 -1
- data/doc/classes/LongDecimalQuot.src/M000033.html +1 -1
- data/doc/classes/LongDecimalRoundingMode/RoundingModeClass.html +10 -10
- data/doc/classes/LongMath.html +170 -151
- data/doc/classes/LongMath.src/M000116.html +5 -4
- data/doc/classes/LongMath.src/M000117.html +4 -4
- data/doc/classes/LongMath.src/M000118.html +4 -5
- data/doc/classes/LongMath.src/M000119.html +5 -4
- data/doc/classes/LongMath.src/M000120.html +4 -18
- data/doc/classes/LongMath.src/M000121.html +14 -14
- data/doc/classes/LongMath.src/M000122.html +18 -5
- data/doc/classes/LongMath.src/M000123.html +5 -29
- data/doc/classes/LongMath.src/M000124.html +29 -5
- data/doc/classes/LongMath.src/M000125.html +5 -56
- data/doc/classes/LongMath.src/M000126.html +55 -19
- data/doc/classes/LongMath.src/M000127.html +20 -35
- data/doc/classes/LongMath.src/M000128.html +36 -6
- data/doc/classes/LongMath.src/M000129.html +6 -33
- data/doc/classes/LongMath.src/M000130.html +26 -41
- data/doc/classes/LongMath.src/M000131.html +46 -6
- data/doc/classes/LongMath.src/M000132.html +8 -4
- data/doc/classes/LongMath.src/M000133.html +4 -4
- data/doc/classes/LongMath.src/M000134.html +4 -64
- data/doc/classes/LongMath.src/M000135.html +59 -38
- data/doc/classes/LongMath.src/M000136.html +41 -8
- data/doc/classes/LongMath.src/M000137.html +4 -7
- data/doc/classes/LongMath.src/M000138.html +4 -20
- data/doc/classes/LongMath.src/M000139.html +4 -17
- data/doc/classes/LongMath.src/M000140.html +11 -34
- data/doc/classes/LongMath.src/M000141.html +14 -199
- data/doc/classes/LongMath.src/M000142.html +40 -16
- data/doc/classes/LongMath.src/M000143.html +211 -8
- data/doc/classes/LongMath.src/M000144.html +16 -41
- data/doc/classes/LongMath/CacheKey.html +5 -5
- data/doc/classes/Numeric.html +18 -0
- data/doc/classes/Numeric.src/M000102.html +1 -1
- data/doc/classes/Rational.html +5 -5
- data/doc/created.rid +1 -1
- data/doc/files/lib/long-decimal_rb.html +2 -2
- data/doc/files/lib/long-decimal_rb.src/M000001.html +1 -1
- data/doc/files/lib/long-decimal_rb.src/M000002.html +1 -1
- data/doc/fr_method_index.html +61 -59
- data/lib/long-decimal.rb +173 -80
- data/test/testlongdecimal.rb +258 -58
- metadata +2 -2
@@ -5,28 +5,52 @@
|
|
5
5
|
|
6
6
|
<html>
|
7
7
|
<head>
|
8
|
-
<title>
|
8
|
+
<title>log_internal (LongMath)</title>
|
9
9
|
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
10
10
|
<link rel="stylesheet" href="../.././rdoc-style.css" type="text/css" media="screen" />
|
11
11
|
</head>
|
12
12
|
<body class="standalone-code">
|
13
|
-
<pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line
|
14
|
-
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">
|
15
|
-
<span class="ruby-
|
16
|
-
<span class="ruby-identifier">
|
17
|
-
<span class="ruby-
|
18
|
-
|
19
|
-
|
20
|
-
|
21
|
-
|
22
|
-
|
23
|
-
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">logx_f</span> <span class="ruby-operator"><</span> <span class="ruby-value">0</span>)
|
24
|
-
<span class="ruby-identifier">iprec_x</span> <span class="ruby-operator">-=</span> (<span class="ruby-identifier">logx_f</span><span class="ruby-operator">/</span><span class="ruby-constant">LOG10</span>).<span class="ruby-identifier">round</span>
|
13
|
+
<pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line 2568</span>
|
14
|
+
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">log_internal</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">prec</span> = <span class="ruby-keyword kw">nil</span>, <span class="ruby-identifier">final_mode</span> = <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_HALF_DOWN</span>, <span class="ruby-identifier">iprec</span> = <span class="ruby-keyword kw">nil</span>, <span class="ruby-identifier">mode</span> = <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_HALF_DOWN</span>, <span class="ruby-identifier">cache_result</span> = <span class="ruby-keyword kw">true</span>)
|
15
|
+
<span class="ruby-comment cmt"># check_is_ld(x)</span>
|
16
|
+
<span class="ruby-identifier">raise</span> <span class="ruby-constant">TypeError</span>, <span class="ruby-node">"x=#{x.inspect} must not be positive"</span> <span class="ruby-keyword kw">unless</span> <span class="ruby-identifier">x</span> <span class="ruby-operator">></span> <span class="ruby-value">0</span>
|
17
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">prec</span> <span class="ruby-operator">==</span> <span class="ruby-keyword kw">nil</span>) <span class="ruby-keyword kw">then</span>
|
18
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">x</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimalBase</span>)
|
19
|
+
<span class="ruby-identifier">prec</span> = <span class="ruby-identifier">x</span>.<span class="ruby-identifier">scale</span>
|
20
|
+
<span class="ruby-keyword kw">else</span>
|
21
|
+
<span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>, <span class="ruby-node">"precision must be supplied either as precision of x=#{x} or explicitely"</span>
|
22
|
+
<span class="ruby-keyword kw">end</span>
|
25
23
|
<span class="ruby-keyword kw">end</span>
|
26
|
-
<span class="ruby-
|
27
|
-
|
24
|
+
<span class="ruby-identifier">check_is_prec</span>(<span class="ruby-identifier">prec</span>, <span class="ruby-value str">"prec"</span>)
|
25
|
+
|
26
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">final_mode</span> <span class="ruby-operator">==</span> <span class="ruby-keyword kw">nil</span>)
|
27
|
+
<span class="ruby-identifier">final_mode</span> = <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_HALF_DOWN</span>
|
28
|
+
<span class="ruby-keyword kw">end</span>
|
29
|
+
<span class="ruby-identifier">check_is_mode</span>(<span class="ruby-identifier">final_mode</span>, <span class="ruby-value str">"final_mode"</span>)
|
30
|
+
<span class="ruby-identifier">check_is_mode</span>(<span class="ruby-identifier">mode</span>, <span class="ruby-value str">"mode"</span>)
|
31
|
+
|
32
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">iprec</span> <span class="ruby-operator">==</span> <span class="ruby-keyword kw">nil</span>) <span class="ruby-keyword kw">then</span>
|
33
|
+
<span class="ruby-identifier">iprec</span> = ((<span class="ruby-identifier">prec</span><span class="ruby-operator">+</span><span class="ruby-value">10</span>)<span class="ruby-operator">*</span><span class="ruby-value">1.20</span>).<span class="ruby-identifier">round</span>
|
34
|
+
<span class="ruby-keyword kw">end</span>
|
35
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">iprec</span> <span class="ruby-operator"><</span> <span class="ruby-identifier">prec</span>) <span class="ruby-keyword kw">then</span>
|
36
|
+
<span class="ruby-identifier">iprec</span> = <span class="ruby-identifier">prec</span>
|
37
|
+
<span class="ruby-keyword kw">end</span>
|
38
|
+
<span class="ruby-identifier">check_is_prec</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-value str">"iprec"</span>)
|
39
|
+
<span class="ruby-keyword kw">unless</span> (<span class="ruby-identifier">x</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimal</span>)
|
40
|
+
<span class="ruby-identifier">x</span> = <span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_ld</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
28
41
|
<span class="ruby-keyword kw">end</span>
|
29
|
-
|
42
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">x</span>.<span class="ruby-identifier">one?</span>) <span class="ruby-keyword kw">then</span>
|
43
|
+
<span class="ruby-keyword kw">return</span> <span class="ruby-constant">LongDecimal</span>.<span class="ruby-identifier">zero!</span>(<span class="ruby-identifier">prec</span>)
|
44
|
+
<span class="ruby-keyword kw">end</span>
|
45
|
+
|
46
|
+
<span class="ruby-identifier">cache_key</span> = <span class="ruby-identifier">get_cache_key</span>(<span class="ruby-value str">"log"</span>, <span class="ruby-identifier">x</span>, <span class="ruby-identifier">mode</span>, [<span class="ruby-value">2</span>, <span class="ruby-value">3</span>, <span class="ruby-value">5</span>, <span class="ruby-value">10</span>])
|
47
|
+
<span class="ruby-identifier">y</span> = <span class="ruby-identifier">get_cached</span>(<span class="ruby-identifier">cache_key</span>, <span class="ruby-identifier">x</span>, <span class="ruby-identifier">iprec</span>)
|
48
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">y</span>.<span class="ruby-identifier">nil?</span>)
|
49
|
+
<span class="ruby-identifier">y</span> = <span class="ruby-identifier">log_raw</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">prec</span>, <span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
50
|
+
<span class="ruby-identifier">set_cached</span>(<span class="ruby-identifier">cache_key</span>, <span class="ruby-identifier">y</span>) <span class="ruby-keyword kw">if</span> <span class="ruby-identifier">cache_result</span>
|
51
|
+
<span class="ruby-keyword kw">end</span>
|
52
|
+
|
53
|
+
<span class="ruby-keyword kw">return</span> <span class="ruby-identifier">y</span>.<span class="ruby-identifier">round_to_scale</span>(<span class="ruby-identifier">prec</span>, <span class="ruby-identifier">final_mode</span>)
|
30
54
|
|
31
55
|
<span class="ruby-keyword kw">end</span></pre>
|
32
56
|
</body>
|
@@ -5,25 +5,175 @@
|
|
5
5
|
|
6
6
|
<html>
|
7
7
|
<head>
|
8
|
-
<title>
|
8
|
+
<title>log_raw (LongMath)</title>
|
9
9
|
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
10
10
|
<link rel="stylesheet" href="../.././rdoc-style.css" type="text/css" media="screen" />
|
11
11
|
</head>
|
12
12
|
<body class="standalone-code">
|
13
|
-
<pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line
|
13
|
+
<pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line 2616</span>
|
14
|
+
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">log_raw</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">prec</span>, <span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
15
|
+
|
16
|
+
<span class="ruby-comment cmt"># t0 = Time.new</span>
|
17
|
+
<span class="ruby-comment cmt"># puts("log_raw start")</span>
|
18
|
+
|
19
|
+
<span class="ruby-comment cmt"># we have to rely on iprec being at least 10</span>
|
20
|
+
<span class="ruby-identifier">raise</span> <span class="ruby-constant">TypeError</span>, <span class="ruby-node">"iprec=#{iprec} out of range"</span> <span class="ruby-keyword kw">unless</span> (<span class="ruby-identifier">iprec</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">Fixnum</span>) <span class="ruby-operator">&&</span> <span class="ruby-identifier">iprec</span> <span class="ruby-operator">>=</span> <span class="ruby-value">10</span>
|
21
|
+
|
22
|
+
<span class="ruby-comment cmt"># dprec = [ iprec - 1, (prec + 1) << 1 ].min</span>
|
23
|
+
<span class="ruby-comment cmt"># dprec >= 9</span>
|
24
|
+
<span class="ruby-identifier">dprec</span> = <span class="ruby-identifier">iprec</span> <span class="ruby-operator">-</span> <span class="ruby-value">1</span>
|
25
|
+
|
26
|
+
<span class="ruby-comment cmt"># result is stored in y</span>
|
27
|
+
<span class="ruby-identifier">y</span> = <span class="ruby-value">0</span>
|
28
|
+
<span class="ruby-comment cmt"># sign of result</span>
|
29
|
+
<span class="ruby-identifier">s</span> = <span class="ruby-value">1</span>
|
30
|
+
<span class="ruby-comment cmt"># make sure x is >= 1</span>
|
31
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">x</span> <span class="ruby-operator"><</span> <span class="ruby-value">1</span>) <span class="ruby-keyword kw">then</span>
|
32
|
+
<span class="ruby-identifier">x</span> = (<span class="ruby-value">1</span> <span class="ruby-operator">/</span> <span class="ruby-identifier">x</span>).<span class="ruby-identifier">round_to_scale</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
33
|
+
<span class="ruby-identifier">s</span> = <span class="ruby-value">-1</span>
|
34
|
+
<span class="ruby-keyword kw">end</span>
|
35
|
+
<span class="ruby-comment cmt"># puts("log_raw prepared t=#{Time.new-t0}")</span>
|
36
|
+
|
37
|
+
<span class="ruby-comment cmt"># number that are beyond the usual range of Float need to be</span>
|
38
|
+
<span class="ruby-comment cmt"># handled specially to reduce to something expressable as Float</span>
|
39
|
+
<span class="ruby-identifier">exp_part</span> = <span class="ruby-value">0</span>
|
40
|
+
<span class="ruby-identifier">estimate</span> = <span class="ruby-value">0</span>
|
41
|
+
<span class="ruby-comment cmt"># while (x > MAX_FLOATABLE) do</span>
|
42
|
+
<span class="ruby-comment cmt"># if (exp_part == 0) then</span>
|
43
|
+
<span class="ruby-comment cmt"># estimate = MAX_EXP_ABLE.to_i.to_ld</span>
|
44
|
+
<span class="ruby-comment cmt"># exp_part = exp(estimate, iprec)</span>
|
45
|
+
<span class="ruby-comment cmt"># end</span>
|
46
|
+
<span class="ruby-comment cmt"># x = (x / exp_part).round_to_scale(iprec, mode)</span>
|
47
|
+
<span class="ruby-comment cmt"># if (s < 0) then</span>
|
48
|
+
<span class="ruby-comment cmt"># y -= estimate</span>
|
49
|
+
<span class="ruby-comment cmt"># else</span>
|
50
|
+
<span class="ruby-comment cmt"># y += estimate</span>
|
51
|
+
<span class="ruby-comment cmt"># end</span>
|
52
|
+
<span class="ruby-comment cmt"># end</span>
|
53
|
+
<span class="ruby-identifier">exp_keys</span> = [ <span class="ruby-constant">MAX_EXP_ABLE</span>.<span class="ruby-identifier">to_i</span>, <span class="ruby-value">100</span>, <span class="ruby-value">10</span>, <span class="ruby-value">1</span> ]
|
54
|
+
<span class="ruby-identifier">exp_keys</span>.<span class="ruby-identifier">each</span> <span class="ruby-keyword kw">do</span> <span class="ruby-operator">|</span><span class="ruby-identifier">exp_key</span><span class="ruby-operator">|</span>
|
55
|
+
<span class="ruby-identifier">exp_val</span> = <span class="ruby-identifier">exp</span>(<span class="ruby-identifier">exp_key</span>, <span class="ruby-identifier">iprec</span>)
|
56
|
+
<span class="ruby-keyword kw">while</span> (<span class="ruby-identifier">x</span> <span class="ruby-operator">></span> <span class="ruby-identifier">exp_val</span>) <span class="ruby-keyword kw">do</span>
|
57
|
+
<span class="ruby-identifier">x</span> = (<span class="ruby-identifier">x</span> <span class="ruby-operator">/</span> <span class="ruby-identifier">exp_val</span>).<span class="ruby-identifier">round_to_scale</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
58
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">s</span> <span class="ruby-operator"><</span> <span class="ruby-value">0</span>) <span class="ruby-keyword kw">then</span>
|
59
|
+
<span class="ruby-identifier">y</span> <span class="ruby-operator">-=</span> <span class="ruby-identifier">exp_key</span>
|
60
|
+
<span class="ruby-keyword kw">else</span>
|
61
|
+
<span class="ruby-identifier">y</span> <span class="ruby-operator">+=</span> <span class="ruby-identifier">exp_key</span>
|
62
|
+
<span class="ruby-keyword kw">end</span>
|
63
|
+
<span class="ruby-keyword kw">end</span>
|
64
|
+
<span class="ruby-keyword kw">end</span>
|
65
|
+
<span class="ruby-comment cmt"># puts("log_raw divided t=#{Time.new-t0}")</span>
|
66
|
+
|
67
|
+
<span class="ruby-comment cmt"># # make sure x is close enough to 1 in order to ensure good</span>
|
68
|
+
<span class="ruby-comment cmt"># # convergence of the Taylor-series</span>
|
69
|
+
<span class="ruby-comment cmt"># s2 = s</span>
|
70
|
+
<span class="ruby-comment cmt"># delta = LongDecimal(1, 3)</span>
|
71
|
+
<span class="ruby-comment cmt"># while (x - 1).abs > delta do</span>
|
72
|
+
<span class="ruby-comment cmt"># xf = x.to_f</span>
|
73
|
+
<span class="ruby-comment cmt"># mlx = Math.log(xf)</span>
|
74
|
+
<span class="ruby-comment cmt"># estimate = mlx.to_ld(20, LongDecimal::ROUND_DOWN)</span>
|
75
|
+
<span class="ruby-comment cmt"># exp_part = exp(estimate, (1.01 * iprec).ceil)</span>
|
76
|
+
<span class="ruby-comment cmt"># # exp_part = exp(estimate, iprec << 1)</span>
|
77
|
+
<span class="ruby-comment cmt"># xq = (x / exp_part)</span>
|
78
|
+
<span class="ruby-comment cmt"># if (xq < 1)</span>
|
79
|
+
<span class="ruby-comment cmt"># xq = 1/xq</span>
|
80
|
+
<span class="ruby-comment cmt"># s = -s</span>
|
81
|
+
<span class="ruby-comment cmt"># end</span>
|
82
|
+
<span class="ruby-comment cmt"># x = xq.round_to_scale(iprec, mode)</span>
|
83
|
+
<span class="ruby-comment cmt"># if (x < 1)</span>
|
84
|
+
<span class="ruby-comment cmt"># puts("x=#{x} < 1 est=#{estimate} part=#{exp_part} s=#{s} s2=#{s2}\n")</span>
|
85
|
+
<span class="ruby-comment cmt"># end</span>
|
86
|
+
|
87
|
+
<span class="ruby-comment cmt"># # add/subtract to y what we have already found</span>
|
88
|
+
<span class="ruby-comment cmt"># if (s2 < 0) then</span>
|
89
|
+
<span class="ruby-comment cmt"># y -= estimate</span>
|
90
|
+
<span class="ruby-comment cmt"># else</span>
|
91
|
+
<span class="ruby-comment cmt"># y += estimate</span>
|
92
|
+
<span class="ruby-comment cmt"># end</span>
|
93
|
+
<span class="ruby-comment cmt"># end</span>
|
94
|
+
|
95
|
+
<span class="ruby-identifier">factor</span> = <span class="ruby-value">1</span>
|
96
|
+
<span class="ruby-identifier">sprec</span> = (<span class="ruby-identifier">iprec</span> <span class="ruby-operator">*</span> <span class="ruby-value">1.5</span>).<span class="ruby-identifier">round</span>
|
97
|
+
<span class="ruby-comment cmt"># delta = LongDecimal(1, (iprec.to_f**(1/3)).round)</span>
|
98
|
+
<span class="ruby-comment cmt"># delta = LongDecimal(1, (iprec.to_f**0.3).round)</span>
|
99
|
+
<span class="ruby-identifier">delta</span> = <span class="ruby-constant">LongDecimal</span>(<span class="ruby-value">1</span>, (<span class="ruby-identifier">iprec</span>.<span class="ruby-identifier">to_f</span><span class="ruby-operator">**</span><span class="ruby-value">0</span><span class="ruby-value">.45</span>).<span class="ruby-identifier">round</span>)
|
100
|
+
<span class="ruby-comment cmt"># delta = LongDecimal(1, LongMath.sqrtw(iprec))</span>
|
101
|
+
<span class="ruby-comment cmt"># delta = LongDecimal(1, LongMath.sqrtw(LongMath.sqrtw(iprec+1)+1))</span>
|
102
|
+
<span class="ruby-keyword kw">while</span> (<span class="ruby-identifier">x</span> <span class="ruby-operator">-</span> <span class="ruby-value">1</span>).<span class="ruby-identifier">abs</span> <span class="ruby-operator">></span> <span class="ruby-identifier">delta</span> <span class="ruby-keyword kw">do</span>
|
103
|
+
<span class="ruby-identifier">x</span> = <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">sqrt</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">sprec</span>, <span class="ruby-identifier">mode</span>)
|
104
|
+
<span class="ruby-identifier">factor</span> <span class="ruby-operator">*=</span> <span class="ruby-value">2</span>
|
105
|
+
<span class="ruby-keyword kw">end</span>
|
106
|
+
<span class="ruby-comment cmt"># puts("log_raw rooted t=#{Time.new-t0}")</span>
|
107
|
+
|
108
|
+
<span class="ruby-identifier">sum</span> = <span class="ruby-value">0</span>
|
109
|
+
<span class="ruby-identifier">z</span> = <span class="ruby-value">1</span> <span class="ruby-operator">-</span> <span class="ruby-identifier">x</span>
|
110
|
+
<span class="ruby-identifier">i</span> = <span class="ruby-value">1</span>
|
111
|
+
<span class="ruby-identifier">p</span> = <span class="ruby-value">1</span>.<span class="ruby-identifier">to_ld</span>
|
112
|
+
<span class="ruby-identifier">d</span> = <span class="ruby-value">1</span>.<span class="ruby-identifier">to_ld</span>
|
113
|
+
<span class="ruby-keyword kw">until</span> <span class="ruby-identifier">p</span>.<span class="ruby-identifier">abs</span>.<span class="ruby-identifier">round_to_scale</span>(<span class="ruby-identifier">dprec</span>, <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_DOWN</span>).<span class="ruby-identifier">zero?</span> <span class="ruby-keyword kw">do</span>
|
114
|
+
<span class="ruby-identifier">p</span> = (<span class="ruby-identifier">p</span> <span class="ruby-operator">*</span> <span class="ruby-identifier">z</span>).<span class="ruby-identifier">round_to_scale</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
115
|
+
<span class="ruby-identifier">d</span> = (<span class="ruby-identifier">p</span> <span class="ruby-operator">/</span> <span class="ruby-identifier">i</span>).<span class="ruby-identifier">round_to_scale</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
116
|
+
<span class="ruby-identifier">i</span> <span class="ruby-operator">+=</span> <span class="ruby-value">1</span>
|
117
|
+
<span class="ruby-identifier">sum</span> <span class="ruby-operator">+=</span> <span class="ruby-identifier">d</span>
|
118
|
+
|
119
|
+
<span class="ruby-keyword kw">end</span>
|
120
|
+
<span class="ruby-comment cmt"># puts("log_raw summed t=#{Time.new-t0}")</span>
|
121
|
+
|
122
|
+
<span class="ruby-identifier">y</span> <span class="ruby-operator">-=</span> ((<span class="ruby-identifier">s</span> <span class="ruby-operator">*</span> <span class="ruby-identifier">factor</span>) <span class="ruby-operator">*</span> <span class="ruby-identifier">sum</span>).<span class="ruby-identifier">round_to_scale</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
123
|
+
<span class="ruby-comment cmt"># puts("log_raw done t=#{Time.new-t0}")</span>
|
124
|
+
<span class="ruby-keyword kw">return</span> <span class="ruby-identifier">y</span>
|
125
|
+
<span class="ruby-keyword kw">end</span>
|
126
|
+
|
127
|
+
<span class="ruby-identifier">private</span>
|
128
|
+
|
129
|
+
<span class="ruby-comment cmt">#</span>
|
130
|
+
<span class="ruby-comment cmt"># internal helper method for calculating the internal precision for power</span>
|
131
|
+
<span class="ruby-comment cmt">#</span>
|
132
|
+
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">calc_iprec_for_power</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">y</span>, <span class="ruby-identifier">prec</span>)
|
133
|
+
<span class="ruby-identifier">x_f</span> = <span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_f</span>
|
134
|
+
<span class="ruby-identifier">y_f</span> = <span class="ruby-identifier">y</span>.<span class="ruby-identifier">to_f</span>
|
135
|
+
<span class="ruby-identifier">logx_f</span> = <span class="ruby-constant">Math</span>.<span class="ruby-identifier">log</span>(<span class="ruby-identifier">x_f</span>.<span class="ruby-identifier">abs</span>)
|
136
|
+
<span class="ruby-identifier">logy_f</span> = <span class="ruby-constant">Math</span>.<span class="ruby-identifier">log</span>(<span class="ruby-identifier">y_f</span>.<span class="ruby-identifier">abs</span>)
|
137
|
+
<span class="ruby-identifier">logx_y_f</span> = <span class="ruby-identifier">logx_f</span> <span class="ruby-operator">*</span> <span class="ruby-identifier">y_f</span>
|
138
|
+
<span class="ruby-identifier">iprec_x</span> = <span class="ruby-identifier">calc_iprec_for_exp</span>(<span class="ruby-identifier">logx_y_f</span>, <span class="ruby-identifier">prec</span>)
|
139
|
+
<span class="ruby-identifier">iprec_y</span> = <span class="ruby-identifier">iprec_x</span>
|
140
|
+
<span class="ruby-identifier">iprec</span> = <span class="ruby-identifier">iprec_x</span> <span class="ruby-operator">+</span> <span class="ruby-value">2</span>
|
141
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">logx_f</span> <span class="ruby-operator"><</span> <span class="ruby-value">0</span>)
|
142
|
+
<span class="ruby-identifier">iprec_x</span> <span class="ruby-operator">-=</span> (<span class="ruby-identifier">logx_f</span><span class="ruby-operator">/</span><span class="ruby-constant">LOG10</span>).<span class="ruby-identifier">round</span>
|
143
|
+
<span class="ruby-keyword kw">end</span>
|
144
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">logy_f</span> <span class="ruby-operator"><</span> <span class="ruby-value">0</span>)
|
145
|
+
<span class="ruby-identifier">iprec_y</span> <span class="ruby-operator">-=</span> (<span class="ruby-identifier">logy_f</span><span class="ruby-operator">/</span><span class="ruby-constant">LOG10</span>).<span class="ruby-identifier">round</span>
|
146
|
+
<span class="ruby-keyword kw">end</span>
|
147
|
+
[ <span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">iprec_x</span>, <span class="ruby-identifier">iprec_y</span> ]
|
148
|
+
|
149
|
+
<span class="ruby-keyword kw">end</span>
|
150
|
+
|
151
|
+
<span class="ruby-identifier">public</span>
|
152
|
+
|
153
|
+
<span class="ruby-comment cmt">#</span>
|
154
|
+
<span class="ruby-comment cmt"># calc the power of x with exponent y to the given precision as</span>
|
155
|
+
<span class="ruby-comment cmt"># LongDecimal. Only supports values of y such that exp(y) still</span>
|
156
|
+
<span class="ruby-comment cmt"># fits into a float (y <= 709)</span>
|
157
|
+
<span class="ruby-comment cmt">#</span>
|
14
158
|
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">power</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">y</span>, <span class="ruby-identifier">prec</span>, <span class="ruby-identifier">mode</span> = <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_HALF_DOWN</span>)
|
15
|
-
|
16
|
-
<span class="ruby-
|
17
|
-
<span class="ruby-identifier">raise</span> <span class="ruby-constant">TypeError</span>, <span class="ruby-node">"y=#{y
|
18
|
-
<span class="ruby-
|
19
|
-
<span class="ruby-
|
159
|
+
|
160
|
+
<span class="ruby-identifier">raise</span> <span class="ruby-constant">TypeError</span>, <span class="ruby-node">"x=#{x} must be numeric"</span> <span class="ruby-keyword kw">unless</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">Numeric</span>
|
161
|
+
<span class="ruby-identifier">raise</span> <span class="ruby-constant">TypeError</span>, <span class="ruby-node">"y=#{y} must be numeric"</span> <span class="ruby-keyword kw">unless</span> <span class="ruby-identifier">y</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">Numeric</span>
|
162
|
+
<span class="ruby-comment cmt"># raise TypeError, "y=#{y.inspect} must not be greater #{MAX_EXP_ABLE}" unless y <= MAX_EXP_ABLE</span>
|
163
|
+
<span class="ruby-comment cmt"># raise TypeError, "x=#{x.inspect} must not be greater #{MAX_FLOATABLE}" unless x <= MAX_FLOATABLE</span>
|
164
|
+
<span class="ruby-identifier">raise</span> <span class="ruby-constant">TypeError</span>, <span class="ruby-node">"x=#{x.inspect} must not positive"</span> <span class="ruby-keyword kw">unless</span> <span class="ruby-identifier">x</span> <span class="ruby-operator">>=</span> <span class="ruby-value">0</span>
|
20
165
|
<span class="ruby-identifier">check_is_prec</span>(<span class="ruby-identifier">prec</span>, <span class="ruby-value str">"prec"</span>)
|
21
166
|
<span class="ruby-identifier">check_is_mode</span>(<span class="ruby-identifier">mode</span>, <span class="ruby-value str">"mode"</span>)
|
22
167
|
|
168
|
+
<span class="ruby-comment cmt"># handle the special cases where base or exponent are 0 or 1 explicitely</span>
|
23
169
|
<span class="ruby-keyword kw">if</span> <span class="ruby-identifier">y</span>.<span class="ruby-identifier">zero?</span> <span class="ruby-keyword kw">then</span>
|
24
170
|
<span class="ruby-keyword kw">return</span> <span class="ruby-constant">LongDecimal</span>.<span class="ruby-identifier">one!</span>(<span class="ruby-identifier">prec</span>)
|
25
171
|
<span class="ruby-keyword kw">elsif</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">zero?</span> <span class="ruby-keyword kw">then</span>
|
26
172
|
<span class="ruby-keyword kw">return</span> <span class="ruby-constant">LongDecimal</span>.<span class="ruby-identifier">zero!</span>(<span class="ruby-identifier">prec</span>)
|
173
|
+
<span class="ruby-keyword kw">elsif</span> <span class="ruby-identifier">y</span>.<span class="ruby-identifier">one?</span> <span class="ruby-keyword kw">then</span>
|
174
|
+
<span class="ruby-keyword kw">return</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_ld</span>(<span class="ruby-identifier">prec</span>, <span class="ruby-identifier">mode</span>)
|
175
|
+
<span class="ruby-keyword kw">elsif</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">one?</span> <span class="ruby-keyword kw">then</span>
|
176
|
+
<span class="ruby-keyword kw">return</span> <span class="ruby-constant">LongDecimal</span>.<span class="ruby-identifier">one!</span>(<span class="ruby-identifier">prec</span>)
|
27
177
|
<span class="ruby-keyword kw">end</span>
|
28
178
|
|
29
179
|
<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">iprec_x</span>, <span class="ruby-identifier">iprec_y</span> = <span class="ruby-identifier">calc_iprec_for_power</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">y</span>, <span class="ruby-identifier">prec</span>)
|
@@ -65,6 +215,59 @@
|
|
65
215
|
<span class="ruby-identifier">z1</span> = <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">power_internal</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">y1</span>, <span class="ruby-identifier">prec</span><span class="ruby-operator">+</span><span class="ruby-identifier">prec_extra</span>, <span class="ruby-identifier">mode</span>)
|
66
216
|
<span class="ruby-identifier">z</span> = <span class="ruby-identifier">z0</span> <span class="ruby-operator">*</span> <span class="ruby-identifier">z1</span>
|
67
217
|
<span class="ruby-keyword kw">return</span> <span class="ruby-identifier">z</span>.<span class="ruby-identifier">to_ld</span>(<span class="ruby-identifier">prec</span>, <span class="ruby-identifier">mode</span>)
|
68
|
-
<span class="ruby-keyword kw">end</span
|
218
|
+
<span class="ruby-keyword kw">end</span>
|
219
|
+
|
220
|
+
<span class="ruby-comment cmt">#</span>
|
221
|
+
<span class="ruby-comment cmt"># internal functionality of exp. exposes some more parameters, that</span>
|
222
|
+
<span class="ruby-comment cmt"># should usually be set to defaut values, in order to allow better testing.</span>
|
223
|
+
<span class="ruby-comment cmt"># do not actually call this method unless you are testing exp.</span>
|
224
|
+
<span class="ruby-comment cmt"># create a bug report, if the default settings for the parameters do</span>
|
225
|
+
<span class="ruby-comment cmt"># not work correctly</span>
|
226
|
+
<span class="ruby-comment cmt">#</span>
|
227
|
+
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">power_internal</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">y</span>, <span class="ruby-identifier">prec</span> = <span class="ruby-keyword kw">nil</span>, <span class="ruby-identifier">final_mode</span> = <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_HALF_DOWN</span>, <span class="ruby-identifier">iprec</span> = <span class="ruby-keyword kw">nil</span>, <span class="ruby-identifier">mode</span> = <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_HALF_DOWN</span>)
|
228
|
+
|
229
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">prec</span> <span class="ruby-operator">==</span> <span class="ruby-keyword kw">nil</span>) <span class="ruby-keyword kw">then</span>
|
230
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">x</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimalBase</span>) <span class="ruby-operator">&&</span> (<span class="ruby-identifier">y</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimalBase</span>)
|
231
|
+
<span class="ruby-identifier">prec</span> = [<span class="ruby-identifier">x</span>.<span class="ruby-identifier">scale</span>, <span class="ruby-identifier">y</span>.<span class="ruby-identifier">scale</span>].<span class="ruby-identifier">max</span>
|
232
|
+
<span class="ruby-keyword kw">elsif</span> (<span class="ruby-identifier">x</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimalBase</span>)
|
233
|
+
<span class="ruby-identifier">prec</span> = <span class="ruby-identifier">x</span>.<span class="ruby-identifier">scale</span>
|
234
|
+
<span class="ruby-keyword kw">elsif</span> (<span class="ruby-identifier">y</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimalBase</span>)
|
235
|
+
<span class="ruby-identifier">prec</span> = <span class="ruby-identifier">y</span>.<span class="ruby-identifier">scale</span>
|
236
|
+
<span class="ruby-keyword kw">else</span>
|
237
|
+
<span class="ruby-identifier">raise</span> <span class="ruby-constant">ArgumentError</span>, <span class="ruby-node">"precision must be supplied either as precision of x=#{x} or explicitely"</span>
|
238
|
+
<span class="ruby-keyword kw">end</span>
|
239
|
+
<span class="ruby-keyword kw">end</span>
|
240
|
+
<span class="ruby-identifier">check_is_prec</span>(<span class="ruby-identifier">prec</span>, <span class="ruby-value str">"prec"</span>)
|
241
|
+
|
242
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">final_mode</span> <span class="ruby-operator">==</span> <span class="ruby-keyword kw">nil</span>)
|
243
|
+
<span class="ruby-identifier">final_mode</span> = <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_HALF_DOWN</span>
|
244
|
+
<span class="ruby-keyword kw">end</span>
|
245
|
+
<span class="ruby-identifier">check_is_mode</span>(<span class="ruby-identifier">final_mode</span>, <span class="ruby-value str">"final_mode"</span>)
|
246
|
+
<span class="ruby-identifier">check_is_mode</span>(<span class="ruby-identifier">mode</span>, <span class="ruby-value str">"mode"</span>)
|
247
|
+
|
248
|
+
<span class="ruby-keyword kw">if</span> <span class="ruby-identifier">y</span>.<span class="ruby-identifier">zero?</span> <span class="ruby-keyword kw">then</span>
|
249
|
+
<span class="ruby-keyword kw">return</span> <span class="ruby-constant">LongDecimal</span>.<span class="ruby-identifier">one!</span>(<span class="ruby-identifier">prec</span>)
|
250
|
+
<span class="ruby-keyword kw">elsif</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">zero?</span> <span class="ruby-keyword kw">then</span>
|
251
|
+
<span class="ruby-keyword kw">return</span> <span class="ruby-constant">LongDecimal</span>.<span class="ruby-identifier">zero!</span>(<span class="ruby-identifier">prec</span>)
|
252
|
+
<span class="ruby-keyword kw">end</span>
|
253
|
+
|
254
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">iprec</span> <span class="ruby-operator">==</span> <span class="ruby-keyword kw">nil</span>) <span class="ruby-keyword kw">then</span>
|
255
|
+
<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">iprec_x</span>, <span class="ruby-identifier">iprec_y</span> = <span class="ruby-identifier">calc_iprec_for_power</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">y</span>, <span class="ruby-identifier">prec</span>)
|
256
|
+
<span class="ruby-keyword kw">end</span>
|
257
|
+
<span class="ruby-keyword kw">unless</span> (<span class="ruby-identifier">x</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimal</span>)
|
258
|
+
<span class="ruby-identifier">x</span> = <span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_ld</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
259
|
+
<span class="ruby-keyword kw">end</span>
|
260
|
+
<span class="ruby-keyword kw">unless</span> (<span class="ruby-identifier">y</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimal</span>)
|
261
|
+
<span class="ruby-identifier">y</span> = <span class="ruby-identifier">y</span>.<span class="ruby-identifier">to_ld</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
262
|
+
<span class="ruby-keyword kw">end</span>
|
263
|
+
|
264
|
+
<span class="ruby-identifier">logx</span> = <span class="ruby-identifier">log</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
265
|
+
<span class="ruby-identifier">logx_y</span> = <span class="ruby-identifier">logx</span><span class="ruby-operator">*</span><span class="ruby-identifier">y</span>
|
266
|
+
<span class="ruby-identifier">xy</span> = <span class="ruby-identifier">exp_internal</span>(<span class="ruby-identifier">logx_y</span>, <span class="ruby-identifier">prec</span> <span class="ruby-operator">+</span> <span class="ruby-value">1</span>, <span class="ruby-identifier">mode</span>)
|
267
|
+
<span class="ruby-identifier">xy</span>.<span class="ruby-identifier">round_to_scale</span>(<span class="ruby-identifier">prec</span>, <span class="ruby-identifier">final_mode</span>)
|
268
|
+
|
269
|
+
<span class="ruby-keyword kw">end</span> <span class="ruby-comment cmt"># power_internal</span>
|
270
|
+
|
271
|
+
<span class="ruby-keyword kw">end</span></pre>
|
69
272
|
</body>
|
70
273
|
</html>
|
@@ -5,53 +5,28 @@
|
|
5
5
|
|
6
6
|
<html>
|
7
7
|
<head>
|
8
|
-
<title>
|
8
|
+
<title>calc_iprec_for_power (LongMath)</title>
|
9
9
|
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
10
10
|
<link rel="stylesheet" href="../.././rdoc-style.css" type="text/css" media="screen" />
|
11
11
|
</head>
|
12
12
|
<body class="standalone-code">
|
13
|
-
<pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line
|
14
|
-
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">
|
15
|
-
|
16
|
-
<span class="ruby-
|
17
|
-
|
18
|
-
|
19
|
-
|
20
|
-
|
21
|
-
|
22
|
-
|
23
|
-
|
24
|
-
|
25
|
-
<span class="ruby-keyword kw">end</span>
|
13
|
+
<pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line 2734</span>
|
14
|
+
<span class="ruby-keyword kw">def</span> <span class="ruby-constant">LongMath</span>.<span class="ruby-identifier">calc_iprec_for_power</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">y</span>, <span class="ruby-identifier">prec</span>)
|
15
|
+
<span class="ruby-identifier">x_f</span> = <span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_f</span>
|
16
|
+
<span class="ruby-identifier">y_f</span> = <span class="ruby-identifier">y</span>.<span class="ruby-identifier">to_f</span>
|
17
|
+
<span class="ruby-identifier">logx_f</span> = <span class="ruby-constant">Math</span>.<span class="ruby-identifier">log</span>(<span class="ruby-identifier">x_f</span>.<span class="ruby-identifier">abs</span>)
|
18
|
+
<span class="ruby-identifier">logy_f</span> = <span class="ruby-constant">Math</span>.<span class="ruby-identifier">log</span>(<span class="ruby-identifier">y_f</span>.<span class="ruby-identifier">abs</span>)
|
19
|
+
<span class="ruby-identifier">logx_y_f</span> = <span class="ruby-identifier">logx_f</span> <span class="ruby-operator">*</span> <span class="ruby-identifier">y_f</span>
|
20
|
+
<span class="ruby-identifier">iprec_x</span> = <span class="ruby-identifier">calc_iprec_for_exp</span>(<span class="ruby-identifier">logx_y_f</span>, <span class="ruby-identifier">prec</span>)
|
21
|
+
<span class="ruby-identifier">iprec_y</span> = <span class="ruby-identifier">iprec_x</span>
|
22
|
+
<span class="ruby-identifier">iprec</span> = <span class="ruby-identifier">iprec_x</span> <span class="ruby-operator">+</span> <span class="ruby-value">2</span>
|
23
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">logx_f</span> <span class="ruby-operator"><</span> <span class="ruby-value">0</span>)
|
24
|
+
<span class="ruby-identifier">iprec_x</span> <span class="ruby-operator">-=</span> (<span class="ruby-identifier">logx_f</span><span class="ruby-operator">/</span><span class="ruby-constant">LOG10</span>).<span class="ruby-identifier">round</span>
|
26
25
|
<span class="ruby-keyword kw">end</span>
|
27
|
-
<span class="ruby-
|
28
|
-
|
29
|
-
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">final_mode</span> <span class="ruby-operator">==</span> <span class="ruby-keyword kw">nil</span>)
|
30
|
-
<span class="ruby-identifier">final_mode</span> = <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_HALF_DOWN</span>
|
26
|
+
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">logy_f</span> <span class="ruby-operator"><</span> <span class="ruby-value">0</span>)
|
27
|
+
<span class="ruby-identifier">iprec_y</span> <span class="ruby-operator">-=</span> (<span class="ruby-identifier">logy_f</span><span class="ruby-operator">/</span><span class="ruby-constant">LOG10</span>).<span class="ruby-identifier">round</span>
|
31
28
|
<span class="ruby-keyword kw">end</span>
|
32
|
-
<span class="ruby-identifier">
|
33
|
-
<span class="ruby-identifier">check_is_mode</span>(<span class="ruby-identifier">mode</span>, <span class="ruby-value str">"mode"</span>)
|
34
|
-
|
35
|
-
<span class="ruby-keyword kw">if</span> <span class="ruby-identifier">y</span>.<span class="ruby-identifier">zero?</span> <span class="ruby-keyword kw">then</span>
|
36
|
-
<span class="ruby-keyword kw">return</span> <span class="ruby-constant">LongDecimal</span>.<span class="ruby-identifier">one!</span>(<span class="ruby-identifier">prec</span>)
|
37
|
-
<span class="ruby-keyword kw">elsif</span> <span class="ruby-identifier">x</span>.<span class="ruby-identifier">zero?</span> <span class="ruby-keyword kw">then</span>
|
38
|
-
<span class="ruby-keyword kw">return</span> <span class="ruby-constant">LongDecimal</span>.<span class="ruby-identifier">zero!</span>(<span class="ruby-identifier">prec</span>)
|
39
|
-
<span class="ruby-keyword kw">end</span>
|
40
|
-
|
41
|
-
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">iprec</span> <span class="ruby-operator">==</span> <span class="ruby-keyword kw">nil</span>) <span class="ruby-keyword kw">then</span>
|
42
|
-
<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">iprec_x</span>, <span class="ruby-identifier">iprec_y</span> = <span class="ruby-identifier">calc_iprec_for_power</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">y</span>, <span class="ruby-identifier">prec</span>)
|
43
|
-
<span class="ruby-keyword kw">end</span>
|
44
|
-
<span class="ruby-keyword kw">unless</span> (<span class="ruby-identifier">x</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimal</span>)
|
45
|
-
<span class="ruby-identifier">x</span> = <span class="ruby-identifier">x</span>.<span class="ruby-identifier">to_ld</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
46
|
-
<span class="ruby-keyword kw">end</span>
|
47
|
-
<span class="ruby-keyword kw">unless</span> (<span class="ruby-identifier">y</span>.<span class="ruby-identifier">kind_of?</span> <span class="ruby-constant">LongDecimal</span>)
|
48
|
-
<span class="ruby-identifier">y</span> = <span class="ruby-identifier">y</span>.<span class="ruby-identifier">to_ld</span>(<span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
49
|
-
<span class="ruby-keyword kw">end</span>
|
50
|
-
|
51
|
-
<span class="ruby-identifier">logx</span> = <span class="ruby-identifier">log</span>(<span class="ruby-identifier">x</span>, <span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">mode</span>)
|
52
|
-
<span class="ruby-identifier">logx_y</span> = <span class="ruby-identifier">logx</span><span class="ruby-operator">*</span><span class="ruby-identifier">y</span>
|
53
|
-
<span class="ruby-identifier">xy</span> = <span class="ruby-identifier">exp_internal</span>(<span class="ruby-identifier">logx_y</span>, <span class="ruby-identifier">prec</span> <span class="ruby-operator">+</span> <span class="ruby-value">1</span>, <span class="ruby-identifier">mode</span>)
|
54
|
-
<span class="ruby-identifier">xy</span>.<span class="ruby-identifier">round_to_scale</span>(<span class="ruby-identifier">prec</span>, <span class="ruby-identifier">final_mode</span>)
|
29
|
+
[ <span class="ruby-identifier">iprec</span>, <span class="ruby-identifier">iprec_x</span>, <span class="ruby-identifier">iprec_y</span> ]
|
55
30
|
|
56
31
|
<span class="ruby-keyword kw">end</span></pre>
|
57
32
|
</body>
|
@@ -103,7 +103,7 @@ internal rounding mode (mode)
|
|
103
103
|
<h3 class="section-bar">Methods</h3>
|
104
104
|
|
105
105
|
<div class="name-list">
|
106
|
-
<a href="#
|
106
|
+
<a href="#M000147"><=></a>
|
107
107
|
</div>
|
108
108
|
</div>
|
109
109
|
|
@@ -132,12 +132,12 @@ internal rounding mode (mode)
|
|
132
132
|
<div id="methods">
|
133
133
|
<h3 class="section-bar">Public Instance methods</h3>
|
134
134
|
|
135
|
-
<div id="method-
|
136
|
-
<a name="
|
135
|
+
<div id="method-M000147" class="method-detail">
|
136
|
+
<a name="M000147"></a>
|
137
137
|
|
138
138
|
<div class="method-heading">
|
139
|
-
<a href="CacheKey.src/
|
140
|
-
onclick="popupCode('CacheKey.src/
|
139
|
+
<a href="CacheKey.src/M000147.html" target="Code" class="method-signature"
|
140
|
+
onclick="popupCode('CacheKey.src/M000147.html');return false;">
|
141
141
|
<span class="method-name"><=></span><span class="method-args">(o)</span>
|
142
142
|
</a>
|
143
143
|
</div>
|
data/doc/classes/Numeric.html
CHANGED
@@ -101,6 +101,7 @@
|
|
101
101
|
<h3 class="section-bar">Methods</h3>
|
102
102
|
|
103
103
|
<div class="name-list">
|
104
|
+
<a href="#M000103">one?</a>
|
104
105
|
<a href="#M000102">to_ld</a>
|
105
106
|
</div>
|
106
107
|
</div>
|
@@ -123,6 +124,23 @@
|
|
123
124
|
<div id="methods">
|
124
125
|
<h3 class="section-bar">Public Instance methods</h3>
|
125
126
|
|
127
|
+
<div id="method-M000103" class="method-detail">
|
128
|
+
<a name="M000103"></a>
|
129
|
+
|
130
|
+
<div class="method-heading">
|
131
|
+
<a href="Numeric.src/M000103.html" target="Code" class="method-signature"
|
132
|
+
onclick="popupCode('Numeric.src/M000103.html');return false;">
|
133
|
+
<span class="method-name">one?</span><span class="method-args">()</span>
|
134
|
+
</a>
|
135
|
+
</div>
|
136
|
+
|
137
|
+
<div class="method-description">
|
138
|
+
<p>
|
139
|
+
test if 1 (like zero?)
|
140
|
+
</p>
|
141
|
+
</div>
|
142
|
+
</div>
|
143
|
+
|
126
144
|
<div id="method-M000102" class="method-detail">
|
127
145
|
<a name="M000102"></a>
|
128
146
|
|
@@ -10,7 +10,7 @@
|
|
10
10
|
<link rel="stylesheet" href="../.././rdoc-style.css" type="text/css" media="screen" />
|
11
11
|
</head>
|
12
12
|
<body class="standalone-code">
|
13
|
-
<pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line
|
13
|
+
<pre><span class="ruby-comment cmt"># File lib/long-decimal.rb, line 1704</span>
|
14
14
|
<span class="ruby-keyword kw">def</span> <span class="ruby-identifier">to_ld</span>(<span class="ruby-identifier">prec</span> = <span class="ruby-keyword kw">nil</span>, <span class="ruby-identifier">mode</span> = <span class="ruby-constant">LongDecimal</span><span class="ruby-operator">::</span><span class="ruby-constant">ROUND_HALF_UP</span>)
|
15
15
|
<span class="ruby-identifier">l</span> = <span class="ruby-constant">LongDecimal</span>(<span class="ruby-keyword kw">self</span>)
|
16
16
|
<span class="ruby-keyword kw">if</span> (<span class="ruby-identifier">prec</span>.<span class="ruby-identifier">nil?</span>)
|