From b884c2e0185e24fc498827b3a53becea9e646b85 Mon Sep 17 00:00:00 2001 From: Regina Henschel Date: Wed, 30 Jan 2013 17:34:27 +0100 Subject: resolved fdo#60078 correctly calculate IMCSCH and IMSECH For the transformation used see http://de.wikipedia.org/wiki/Sekans_Hyperbolicus_und_Kosekans_Hyperbolicus#Komplexes_Argument (German only) Change-Id: If502b7333308069d7fcbe09e954b26ce8b7268b6 --- scaddins/source/analysis/analysishelper.cxx | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/scaddins/source/analysis/analysishelper.cxx b/scaddins/source/analysis/analysishelper.cxx index 08a096794c1a..8fddc7bd2d0a 100644 --- a/scaddins/source/analysis/analysishelper.cxx +++ b/scaddins/source/analysis/analysishelper.cxx @@ -2075,8 +2075,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 @@ -2096,8 +2096,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 -- cgit v1.2.3