From 2d498de6c105e57c32c9048e5901955556ab38bf Mon Sep 17 00:00:00 2001 From: Peter Mikkelsen Date: Thu, 13 Jan 2022 20:33:51 +0000 Subject: =?UTF-8?q?Implement=20dyadic=20(integer=20only)=20version=20of=20?= =?UTF-8?q?+=20-=20=C3=97=20=C3=B7=20*=20=E2=8D=9F?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- apl9.h | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'apl9.h') diff --git a/apl9.h b/apl9.h index 7c44980..63b6d7a 100644 --- a/apl9.h +++ b/apl9.h @@ -116,6 +116,8 @@ Array *mkscalarint(vlong); Array *duparray(Array *); int simplearray(Array *); int simplescalar(Array *); +Array *extend(Array *, Array *); +int scalarextend(Array *, Array *, Array **, Array **); /* eval.c */ Datum *eval(Statement *); @@ -141,6 +143,12 @@ Array *fnRavel(Array *); Array *fnShape(Array *); /* Dyadic functions from functions.h */ +Array *fnPlus(Array *, Array *); +Array *fnMinus(Array *, Array *); +Array *fnTimes(Array *, Array *); +Array *fnDivide(Array *, Array *); +Array *fnPower(Array *, Array *); +Array *fnLogarithm(Array *, Array *); Array *fnLeft(Array *, Array *); Array *fnRight(Array *, Array *); Array *fnCatenateFirst(Array *, Array *); -- cgit v1.2.3