complex numbers attempt

1 files changed, 22 insertions, 0 deletions

diff --git a/test/monniaux/complex/complex.c b/test/monniaux/complex/complex.c
new file mode 100644
index 00000000..77fa13da
--- /dev/null
+++ b/test/monniaux/complex/complex.c
@@ -0,0 +1,22 @@
+#include <stdio.h>
+
+typedef struct {
+  double re, im;
+} complex_double;
+
+static inline void add_complex_double(complex_double *r,
+				      const complex_double *x,
+				      const complex_double *y) {
+  double re = x->re + y->re;
+  double im = x->im + y->im;
+  r->re = re;
+  r->im = im;
+}
+
+int main() {
+  complex_double a = { 1, 2 };
+  complex_double b = { 7, 4 };
+  complex_double r;
+  add_complex_double(&r, &a, &b);
+  printf("%g %g\n", r.re, r.im);
+}