result.clj

<amalloy> (macroexpand-all (quote (for [x xs y ys] [x y])))
<sexpbot> ⟹ (let* [iter__4063__auto__ (fn* iter__10212 ([s__10213]
(new clojure.lang.LazySeq (fn* [] (loop* [s__10213 s__10213] (if
(clojure.core/seq s__10213) (do (let* [x (clojure.core/first s__10213)]
(let* [iterys__4059__auto__ (fn* iter__10214 ([s__10215] (new
clojure.lang.LazySeq (fn* [] (loop* [s__10215 s__10215] (let*
[temp__3589__auto__ (clojure.core/seq s__10215)] (if
temp__3589__auto__ (do (let* [s__10215 temp__3589__auto__] (if
(clojure.core/chunked-seq? s__10215) (let* [c__4061__auto__
(clojure.core/chunk-first s__10215) size__4062__auto__
(clojure.core/int (clojure.core/count c__4061__auto__)) b__10217
(clojure.core/chunk-buffer size__4062__auto__)] (if (loop* [i__10216
(clojure.core/int 0)] (if (clojure.core/< i__10216 size__4062__auto__)
(let* [y (. c__4061__auto__ nth i__10216)] (do (clojure.core/chunk-append
b__10217 [x y]) (recur (clojure.core/unchecked-inc i__10216)))) true))
(clojure.core/chunk-cons (clojure.core/chunk b__10217) (iter__10214
(clojure.core/chunk-rest s__10215))) (clojure.core/chunk-cons
(clojure.core/chunk b__10217) nil))) (let* [y (clojure.core/first
s__10215)] (clojure.core/cons [x y] (iter__10214 (clojure.core/rest
s__10215)))))))))))))) fs__4060__auto__ (clojure.core/seq
(iterys__4059__auto__ ys))] (if fs__4060__auto__ (clojure.core/concat
fs__4060__auto__ (iter__10212 (clojure.core/rest s__10213))) (recur
(clojure.core/rest s__10213))))))))))))] (iter__4063__auto__
xs))