1 files changed, 13 insertions, 0 deletions
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