(def >> (val . (f . rest)) (if rest (apply >> (f val) rest) (f val)))
(>> 1 [* 20 _] prn [* 2 _] prn [/ _ 8])