aboutsummaryrefslogtreecommitdiffhomepage
path: root/std/Math/Complex.bruijn
diff options
context:
space:
mode:
Diffstat (limited to 'std/Math/Complex.bruijn')
-rw-r--r--std/Math/Complex.bruijn6
1 files changed, 6 insertions, 0 deletions
diff --git a/std/Math/Complex.bruijn b/std/Math/Complex.bruijn
index ec83462..a20717f 100644
--- a/std/Math/Complex.bruijn
+++ b/std/Math/Complex.bruijn
@@ -7,6 +7,12 @@
ι (+0.0r) : (+1.0r)
+# returns true of two complex numbers are equal approximately
+approx-eq? [[[R.approx-eq? 2 (1 2) (0 2)]]] ⧗ Number → Complex → Complex → Boolean
+
+# TODO: bigger value (higher performance first!)
+…≈?… approx-eq? (+1000)
+
# adds two complex numbers
add &[[&[[(R.add 3 1) : (R.add 2 0)]]]] ⧗ Complex → Complex → Complex