(defmacro/g! times [n &rest body]
  `(for [_ (range 0 ~n)] ~@body))

(defmacro $= [ident value] `(setv ~ident ~value))
(defmacro += [ident &rest values] `(setv ~ident (+ ~ident ~@values)))

(defmacro for-zip [xs &rest body]
  `(for [(, ~@(get xs (slice 0 None 2))) (zip ~@(get xs (slice 1 None 2)))]
    ~@body))