summaryrefslogtreecommitdiff
path: root/scaddins
diff options
context:
space:
mode:
authorRegina Henschel <rb.henschel@t-online.de>2013-01-30 17:34:27 +0100
committerEike Rathke <erack@redhat.com>2013-01-30 17:38:50 +0100
commitb884c2e0185e24fc498827b3a53becea9e646b85 (patch)
tree72f251993e65f14f876a86602830e0eb001fe904 /scaddins
parent7877638814de86202d33b5653a0f91d63341e98c (diff)
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
Diffstat (limited to 'scaddins')
-rw-r--r--scaddins/source/analysis/analysishelper.cxx8
1 files 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