RosettaCodeData/Task/Bitwise-operations/PicoLisp/bitwise-operations-1.l

6 lines
33 B
Common Lisp

: (& 6 3)
-> 2
: (& 7 3 1)
-> 1