(and)
(and 0 "" x)
(and false (/ 1 0))
(and null (/ 1 0))
(let [m {n 0}] [(and (do (patch .m {n (+ (get .m n) 1)}) x) y) (get .m n)])