Implement pick ⊃

1 files changed, 1 insertions, 0 deletions

diff --git a/apl9.h b/apl9.h
index 83cee4a..0bfa6e9 100644
--- a/apl9.h
+++ b/apl9.h
@@ -344,6 +344,7 @@ Array *fnAnd(Array *, Array *);
 Array *fnNand(Array *, Array *);
 Array *fnNor(Array *, Array *);
 Array *fnTake(Array *, Array *);
+Array *fnPick(Array *, Array *);
 Array *fnIndex(Array *, Array *);
 Array *fnIndexOf(Array *, Array *);
 Array *fnMembership(Array *, Array *);