summaryrefslogtreecommitdiff
path: root/src/auxiliaryFunctions/pythag
diff options
context:
space:
mode:
Diffstat (limited to 'src/auxiliaryFunctions/pythag')
-rw-r--r--src/auxiliaryFunctions/pythag/cpythags.c4
-rw-r--r--src/auxiliaryFunctions/pythag/zpythags.c4
2 files changed, 4 insertions, 4 deletions
diff --git a/src/auxiliaryFunctions/pythag/cpythags.c b/src/auxiliaryFunctions/pythag/cpythags.c
index b505195c..2f4ad33d 100644
--- a/src/auxiliaryFunctions/pythag/cpythags.c
+++ b/src/auxiliaryFunctions/pythag/cpythags.c
@@ -13,6 +13,6 @@
#include "pythag.h"
floatComplex cpythags(floatComplex x, floatComplex y) {
- return (csqrts( cadds(ctimess(x,x),
- ctimess(y,y)) ));
+ return (csqrts( cadds(cmuls(x,x),
+ cmuls(y,y)) ));
}
diff --git a/src/auxiliaryFunctions/pythag/zpythags.c b/src/auxiliaryFunctions/pythag/zpythags.c
index c5ac30ad..5ba7dba9 100644
--- a/src/auxiliaryFunctions/pythag/zpythags.c
+++ b/src/auxiliaryFunctions/pythag/zpythags.c
@@ -13,6 +13,6 @@
#include "pythag.h"
doubleComplex zpythags(doubleComplex x, doubleComplex y) {
- return (zsqrts( zadds(ztimess(x,x),
- ztimess(y,y)) ));
+ return (zsqrts( zadds(zmuls(x,x),
+ zmuls(y,y)) ));
}