basic: trying to solve why currying does not work as it should do in recursive function

This commit is contained in:
minjaesong
2020-12-21 17:50:27 +09:00
parent e11038254a
commit 8600207e34
4 changed files with 69 additions and 15 deletions

4
assets/filtercurry.bas Normal file
View File

@@ -0,0 +1,4 @@
1 XS=4!1!2!3!5!NIL
10 DEFUN K(P,X)=X<P
20 NXS=FILTER(CURRY(K,XS(0)),XS)
30 PRINT NXS