From 1bf60c0cfc8e26d4f9e92e044d37169f55ac170b Mon Sep 17 00:00:00 2001
From: Peter Mikkelsen <petermikkelsen10@gmail.com>
Date: Tue, 25 Jan 2022 17:05:41 +0000
Subject: Get ready for inverse of functions

---
 inverse.c | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 inverse.c

(limited to 'inverse.c')

diff --git a/inverse.c b/inverse.c
new file mode 100644
index 0000000..b37664b
--- /dev/null
+++ b/inverse.c
@@ -0,0 +1,13 @@
+#include <u.h>
+#include <libc.h>
+#include <bio.h>
+
+#include "apl9.h"
+
+Function
+inverse(Function f)
+{
+	Rune *msg = runesmprint("No inverse defined for %S", ppfunction(f));
+	throwerror(msg, EDomain);
+	return f;
+}
\ No newline at end of file
-- 
cgit v1.2.3