diff options
Diffstat (limited to 'src/type')
-rw-r--r-- | src/type/doubleComplex.c | 34 | ||||
-rw-r--r-- | src/type/doubleComplex.h | 2 | ||||
-rw-r--r-- | src/type/floatComplex.c | 35 | ||||
-rw-r--r-- | src/type/floatComplex.h | 3 |
4 files changed, 0 insertions, 74 deletions
diff --git a/src/type/doubleComplex.c b/src/type/doubleComplex.c index 6ef9deeb..710a13f9 100644 --- a/src/type/doubleComplex.c +++ b/src/type/doubleComplex.c @@ -133,38 +133,4 @@ bool zisimags(doubleComplex z) { return false; } -/* -** Operators -** { -*/ - -/* -** \function ztimess -** \brief Multiply 2 Complex numbers. -*/ -doubleComplex ztimess(doubleComplex z1, doubleComplex z2) { -#ifndef STDC99 - return DoubleComplex(z1.real*z2.real - z1.imag*z2.imag, - z1.real*z2.imag + z2.real*z1.imag); -#else - return z1 * z2; -#endif -} -/* -** \function zdivides -** \brief Divide 2 Complex numbers. -*/ -doubleComplex zdevides(doubleComplex z1, doubleComplex z2) { -#ifndef STDC99 - return DoubleComplex((z1.real*z2.real + z1.imag*z2.imag) / (z2.real*z2.real + z2.imag* z2.imag), - (z1.imag*z2.real - z1.real*z2.imag) / (z2.real*z2.real + z2.imag* z2.imag)); -#else - return z1 / z2; -#endif -} - - -/* -** } -*/ diff --git a/src/type/doubleComplex.h b/src/type/doubleComplex.h index ce491b90..51cede5d 100644 --- a/src/type/doubleComplex.h +++ b/src/type/doubleComplex.h @@ -64,6 +64,4 @@ doubleComplex* DoubleComplexMatrix(double*, double*, int); bool zisreals(doubleComplex); bool zisimags(doubleComplex); -doubleComplex ztimess(doubleComplex, doubleComplex); -doubleComplex zdevides(doubleComplex, doubleComplex); #endif /* !__DOUBLECOMPLEX_H__ */ diff --git a/src/type/floatComplex.c b/src/type/floatComplex.c index 09ae0159..d160e2d3 100644 --- a/src/type/floatComplex.c +++ b/src/type/floatComplex.c @@ -135,39 +135,4 @@ bool cisimags(floatComplex z) { return false; } -/* -** Operators -** { -*/ - -/* -** \function ctimess -** \brief Multiply 2 Complex numbers. -*/ -floatComplex ctimess(floatComplex z1, floatComplex z2) { -#ifndef STDC99 - return FloatComplex(z1.real*z2.real - z1.imag*z2.imag, - z1.real*z2.imag + z2.real*z1.imag); -#else - return z1 * z2; -#endif -} - -/* -** \function cdivides -** \brief Divide 2 Complex numbers. -*/ -floatComplex cdevides(floatComplex z1, floatComplex z2) { -#ifndef STDC99 - return FloatComplex((z1.real*z2.real + z1.imag*z2.imag) / (z2.real*z2.real + z2.imag* z2.imag), - (z1.imag*z2.real - z1.real*z2.imag) / (z2.real*z2.real + z2.imag* z2.imag)); -#else - return z1 / z2; -#endif -} - - -/* -** } -*/ diff --git a/src/type/floatComplex.h b/src/type/floatComplex.h index 47a77899..a4e4f658 100644 --- a/src/type/floatComplex.h +++ b/src/type/floatComplex.h @@ -64,7 +64,4 @@ floatComplex* FloatComplexMatrix(float*, float*, int); bool cisreals(floatComplex); bool cisimags(floatComplex); -floatComplex ctimess(floatComplex, floatComplex); -floatComplex cdevides(floatComplex, floatComplex); - #endif /* !__FLOATCOMPLEX_H__ */ |