From d0350fd2b634e73e8f6ef2a0927ae2decef81602 Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Sat, 22 Jan 2022 14:18:09 +0000 Subject: =?UTF-8?q?Implement=20<=20=E2=89=A4=20=3D=20=E2=89=A5=20>=20?= =?UTF-8?q?=E2=89=A0,=20but=20=3D=20and=20=E2=89=A0=20doesn't=20compare=20?= =?UTF-8?q?runes=20with=20numbers=20yet?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- apl9.h | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'apl9.h') diff --git a/apl9.h b/apl9.h index 94ae192..21c1282 100644 --- a/apl9.h +++ b/apl9.h @@ -188,6 +188,7 @@ Array *mkscalarfloat(double); Array *mkscalarrune(Rune); Array *mkrunearray(Rune *); Array *duparray(Array *); +Array *duparrayshape(Array *, int); int simplearray(Array *); int simplescalar(Array *); Array *extend(Array *, Array *); @@ -260,6 +261,12 @@ Array *fnMaximum(Array *, Array *); Array *fnMinimum(Array *, Array *); Array *fnLeft(Array *, Array *); Array *fnRight(Array *, Array *); +Array *fnEqual(Array *, Array *); +Array *fnNotEqual(Array *, Array *); +Array *fnLessEqual(Array *, Array *); +Array *fnLess(Array *, Array *); +Array *fnGreater(Array *, Array *); +Array *fnGreaterEqual(Array *, Array *); Array *fnMatch(Array *, Array *); Array *fnTake(Array *, Array *); Array *fnIndex(Array *, Array *); -- cgit v1.2.3