summaryrefslogtreecommitdiff
path: root/src/type/doubleComplex.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/type/doubleComplex.c')
-rw-r--r--src/type/doubleComplex.c34
1 files changed, 0 insertions, 34 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
-}
-
-
-/*
-** }
-*/