in

[macro] in item obj ...

Expands to an expr that tests if item is in obj ....

(mac in (x . choices)
  (w/uniq g
    `(let ,g ,x
       (or ,@(map1 (fn (c) `(is ,g ,c)) choices)))))