diff options
-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 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 |