diff options
author | tadf <tadf@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2009-08-16 23:12:41 +0000 |
---|---|---|
committer | tadf <tadf@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2009-08-16 23:12:41 +0000 |
commit | 01971cad759a43c0d4358f2fb28c7d2811673de4 (patch) | |
tree | a788441119b881dad82a75c91ffead1e67968886 | |
parent | 02a7cbec822ba2f2c1b830a9f1747e84822aaddf (diff) | |
download | ruby-01971cad759a43c0d4358f2fb28c7d2811673de4.tar.gz |
use num#i.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@24564 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r-- | ChangeLog | 4 | ||||
-rw-r--r-- | lib/cmath.rb | 8 |
2 files changed, 8 insertions, 4 deletions
@@ -1,3 +1,7 @@ +Mon Aug 17 08:11:53 2009 Tadayoshi Funaba <tadf@dotrb.org> + + * lib/cmath.rb: use num#i. + Mon Aug 17 07:59:00 2009 Tadayoshi Funaba <tadf@dotrb.org> * numeric.c (flo_pow,fix_pow): may return complex number. diff --git a/lib/cmath.rb b/lib/cmath.rb index c4b14e3ef6..b23dac239c 100644 --- a/lib/cmath.rb +++ b/lib/cmath.rb @@ -148,7 +148,7 @@ module CMath if z.real? and z >= -1 and z <= 1 asin!(z) else - Complex(0, -1.0) * log(Complex(0, 1.0) * z + sqrt(1.0 - z * z)) + (-1.0).i * log(1.0.i * z + sqrt(1.0 - z * z)) end end @@ -156,7 +156,7 @@ module CMath if z.real? and z >= -1 and z <= 1 acos!(z) else - Complex(0, -1.0) * log(z + Complex(0, 1.0) * sqrt(1.0 - z * z)) + (-1.0).i * log(z + 1.0.i * sqrt(1.0 - z * z)) end end @@ -164,7 +164,7 @@ module CMath if z.real? atan!(z) else - Complex(0, 1.0) * log((Complex(0, 1.0) + z) / (Complex(0, 1.0) - z)) / 2.0 + 1.0.i * log((1.0.i + z) / (1.0.i - z)) / 2.0 end end @@ -172,7 +172,7 @@ module CMath if y.real? and x.real? atan2!(y,x) else - Complex(0, -1.0) * log((x + Complex(0, 1.0) * y) / sqrt(x * x + y * y)) + (-1.0).i * log((x + 1.0.i * y) / sqrt(x * x + y * y)) end end |