mirror of
https://github.com/curioustorvald/tsvm.git
synced 2026-03-07 19:51:51 +09:00
5 lines
120 B
QBasic
5 lines
120 B
QBasic
10 DEFUN F(K,T)=ABS(T)==K
|
|
20 CF=F<~32
|
|
30 PRINT CF(24) : REM will print 'false'
|
|
40 PRINT CF(-32) : REM will print 'true'
|