mirror of
https://github.com/curioustorvald/tsvm.git
synced 2026-03-15 23:46:06 +09:00
basic: trying to solve why currying does not work as it should do in recursive function
This commit is contained in:
4
assets/filtercurry.bas
Normal file
4
assets/filtercurry.bas
Normal 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
|
||||
Reference in New Issue
Block a user