diff options
| author | Regina Henschel <regina@apache.org> | 2013-03-18 11:21:29 +0000 |
|---|---|---|
| committer | Regina Henschel <regina@apache.org> | 2013-03-18 11:21:29 +0000 |
| commit | 606d879864a9450bc362f26ee007fd610b1cf135 (patch) | |
| tree | b448b8fc1ea2260fabb002241bc30c3415b0a07a /scaddins | |
| parent | aa70a3d7c9df5d19b837a1b684fc44bf871e17d4 (diff) | |
i121722 corrected calculation for IMCSCH and IMSECH
Author: Maarten Kesselaers
Review by: Regina Henschel
Notes
Notes:
prefer: b884c2e0185e24fc498827b3a53becea9e646b85
Diffstat (limited to 'scaddins')
| -rw-r--r-- | scaddins/source/analysis/analysishelper.cxx | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/scaddins/source/analysis/analysishelper.cxx b/scaddins/source/analysis/analysishelper.cxx index 278bd4e3f035..32edb3fad7eb 100644 --- a/scaddins/source/analysis/analysishelper.cxx +++ b/scaddins/source/analysis/analysishelper.cxx @@ -2223,8 +2223,8 @@ void Complex::Sech(void) THROWDEF_RTE_IAE THROW_IAE; double fScale =1.0 / ( cosh( 2.0 * r ) + cos( 2.0 * i )); double r_; - r_ = 2.0 * cosh( 2.0 * r ) * cos( i ) * fScale; - i = - (2.0 * sinh( 2.0 * r ) * sin( i ) * fScale ); + r_ = 2.0 * cosh( r ) * cos( i ) * fScale; + i = - (2.0 * sinh( r ) * sin( i ) * fScale ); r = r_ ; } else @@ -2246,8 +2246,8 @@ void Complex::Csch(void) THROWDEF_RTE_IAE THROW_IAE; double fScale =1.0 / ( cosh( 2.0 * r ) - cos( 2.0 * i )); double r_; - r_ = 2.0 * sinh( 2.0 * r ) * cos( i ) * fScale; - i = - ( 2.0 * cosh( 2.0 * r ) * sin( i ) * fScale ); + r_ = 2.0 * sinh( r ) * cos( i ) * fScale; + i = - ( 2.0 * cosh( r ) * sin( i ) * fScale ); r = r_ ; } else |