From 960ac4694db2060429ec54c9ff2878cad34d8661 Mon Sep 17 00:00:00 2001
From: Peter Mikkelsen <petermikkelsen10@gmail.com>
Date: Thu, 20 Jan 2022 17:55:27 +0000
Subject: =?UTF-8?q?Implement=20dyadic=20=E2=8C=B7,=20monadic=20=E2=8D=8B?=
 =?UTF-8?q?=20and=20monadic=20=E2=8D=92?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 apl9.h | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'apl9.h')

diff --git a/apl9.h b/apl9.h
index 2320bb2..24ddc01 100644
--- a/apl9.h
+++ b/apl9.h
@@ -169,7 +169,7 @@ int scalarextend(Array *, Array *, Array **, Array **);
 int commontype(Array *, Array *, Array **, Array **, int);
 Array *arrayitem(Array *, int);
 Array *simplifyarray(Array *);
-int comparearray(Array *, Array *);
+int comparearray(Array *, Array *, int);
 
 /* eval.c */
 Datum *eval(Statement *);
@@ -198,6 +198,8 @@ Array *fnSame(Array *);
 Array *fnTally(Array *);
 Array *fnEnclose(Array *);
 Array *fnNest(Array *);
+Array *fnGradeUp(Array *);
+Array *fnGradeDown(Array *);
 Array *fnIndexGenerator(Array *);
 Array *fnRavel(Array *);
 Array *fnTable(Array *);
@@ -216,6 +218,7 @@ Array *fnLogarithm(Array *, Array *);
 Array *fnLeft(Array *, Array *);
 Array *fnRight(Array *, Array *);
 Array *fnMatch(Array *, Array *);
+Array *fnIndex(Array *, Array *);
 Array *fnCatenateFirst(Array *, Array *);
 Array *fnReshape(Array *, Array *);
 
-- 
cgit v1.2.3