lang/basic/test/test29.b

   1 5 print not 1, not 0
   2 10 print 1 and 1, 1 and 0, 0 and 1, 0 and 0
   3 13 print 1 or 1, 1 or 0, 0 or 1, 0 or 0
   4 15 print 1 xor 1, 1 xor 0, 0 xor 1, 0 xor 0
   5 20 print 1 eqv 1, 1 eqv 0, 0 eqv 1, 0 eqv 0
   6 30 print 1 imp 1, 1 imp 0, 0 imp 1, 0 imp 0
   7 40 print 63 and 16, "=16?"
   8 50 print 15 and 14, "=14?"
   9 60 print -1 and 8, "=8?"
  10 70 print 4 or 2, "=6?"
  11 80 print 10 or 10 , "is 10?"
  12 90 print -1 or -2 "=-1?"
  13 100 print not 13
  14 110 print -(13+1)