summaryrefslogtreecommitdiff
path: root/src/complex/creal.c
diff options
context:
space:
mode:
authorJakob Kaivo <jkk@ung.org>2019-02-27 18:29:03 -0500
committerJakob Kaivo <jkk@ung.org>2019-02-27 18:29:03 -0500
commitfcb83049b1942fafa784fc51869818651c04acbb (patch)
tree199b1662036ac4a5121d755a7a48a2b3c7b3dac2 /src/complex/creal.c
parent5dcfbbdbe08fe7b8cab61ad8f2fe3cd167cb2fc3 (diff)
basic implementation
Diffstat (limited to 'src/complex/creal.c')
-rw-r--r--src/complex/creal.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/complex/creal.c b/src/complex/creal.c
index 86f3cb1b..eac2576e 100644
--- a/src/complex/creal.c
+++ b/src/complex/creal.c
@@ -5,7 +5,11 @@
TYPE TGFN(creal)(TYPE complex z)
{
- return 0.0;
+ union {
+ complex TYPE c;
+ TYPE f[2];
+ } u = { .c = z };
+ return z[0];
}
/*d