mirror of
https://github.com/curioustorvald/tsvm.git
synced 2026-03-08 04:01:51 +09:00
5 lines
87 B
QBasic
5 lines
87 B
QBasic
1 KS=4!1!2!5!3!NIL
|
|
10 DEFUN LESSER(P,X)=X<P
|
|
11 KLS=CURRY(LESSER,KS(0))
|
|
20 PRINT KLS(6)
|