ack/lang/basic/test/test29.b

15 lines
428 B
Brainfuck
Raw Normal View History

1985-01-24 11:27:36 +00:00
5 print not 1, not 0
10 print 1 and 1, 1 and 0, 0 and 1, 0 and 0
13 print 1 or 1, 1 or 0, 0 or 1, 0 or 0
15 print 1 xor 1, 1 xor 0, 0 xor 1, 0 xor 0
20 print 1 eqv 1, 1 eqv 0, 0 eqv 1, 0 eqv 0
30 print 1 imp 1, 1 imp 0, 0 imp 1, 0 imp 0
40 print 63 and 16, "=16?"
50 print 15 and 14, "=14?"
60 print -1 and 8, "=8?"
70 print 4 or 2, "=6?"
80 print 10 or 10 , "is 10?"
90 print -1 or -2 "=-1?"
100 print not 13
110 print -(13+1)