Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
rb.clj
(if (and (vector? n) (= (count n) 4))
(let [n_0__3029 (nth n 0)]
(if (= n_0__3029 :black)
(let [n_1__3030 (nth n 1)]
(if (and (vector? n_1__3030) (= (count n_1__3030) 4))
(let [n_1__3030_0__3033 (nth n_1__3030 0)]
(if (= n_1__3030_0__3033 :red)
(let [n_1__3030_1__3034 (nth n_1__3030 1)]
(if (and (vector? n_1__3030_1__3034) (= (count n_1__3030_1__3034) 4))
(let [n_1__3030_1__3034_0__3037 (nth n_1__3030_1__3034 0)]
(if (= n_1__3030_1__3034_0__3037 :red)
(let [] :valid)
(if :else
(let [n_1__3030_3__3036 (nth n_1__3030 3)]
(if (and (vector? n_1__3030_3__3036) (= (count n_1__3030_3__3036) 4))
(let [n_1__3030_3__3036_0__3041 (nth n_1__3030_3__3036 0)]
(if (= n_1__3030_3__3036_0__3041 :red)
(let [] :valid)
(if :else
(let [n_3__3032 (nth n 3)]
(if (and (vector? n_3__3032) (= (count n_3__3032) 4))
(let [n_3__3032_0__3045 (nth n_3__3032 0)]
(if (= n_3__3032_0__3045 :red)
(let [n_3__3032_1__3046 (nth n_3__3032 1)]
(if (and (vector? n_3__3032_1__3046) (= (count n_3__3032_1__3046) 4))
(let [n_3__3032_1__3046_0__3049 (nth n_3__3032_1__3046 0)]
(if (= n_3__3032_1__3046_0__3049 :red)
(let [] :valid)
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond))))
(if :else
(let [n_3__3032 (nth n 3)]
(if (and (vector? n_3__3032) (= (count n_3__3032) 4))
(let [n_3__3032_0__3053 (nth n_3__3032 0)]
(if (= n_3__3032_0__3053 :red)
(let [n_3__3032_1__3054 (nth n_3__3032 1)]
(if (and (vector? n_3__3032_1__3054) (= (count n_3__3032_1__3054) 4))
(let [n_3__3032_1__3054_0__3057 (nth n_3__3032_1__3054 0)]
(if (= n_3__3032_1__3054_0__3057 :red)
(let [] :valid)
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond))))
(cond))))
(if :else
(let [n_1__3030_3__3036 (nth n_1__3030 3)]
(if (and (vector? n_1__3030_3__3036) (= (count n_1__3030_3__3036) 4))
(let [n_1__3030_3__3036_0__3061 (nth n_1__3030_3__3036 0)]
(if (= n_1__3030_3__3036_0__3061 :red)
(let [] :valid)
(if :else
(let [n_3__3032 (nth n 3)]
(if (and (vector? n_3__3032) (= (count n_3__3032) 4))
(let [n_3__3032_0__3065 (nth n_3__3032 0)]
(if (= n_3__3032_0__3065 :red)
(let [n_3__3032_1__3066 (nth n_3__3032 1)]
(if (and (vector? n_3__3032_1__3066) (= (count n_3__3032_1__3066) 4))
(let [n_3__3032_1__3066_0__3069 (nth n_3__3032_1__3066 0)]
(if (= n_3__3032_1__3066_0__3069 :red)
(let [] :valid)
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond))))
(if :else
(let [n_3__3032 (nth n 3)]
(if (and (vector? n_3__3032) (= (count n_3__3032) 4))
(let [n_3__3032_0__3073 (nth n_3__3032 0)]
(if (= n_3__3032_0__3073 :red)
(let [n_3__3032_1__3074 (nth n_3__3032 1)]
(if (and (vector? n_3__3032_1__3074) (= (count n_3__3032_1__3074) 4))
(let [n_3__3032_1__3074_0__3077 (nth n_3__3032_1__3074 0)]
(if (= n_3__3032_1__3074_0__3077 :red)
(let [] :valid)
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond))))
(cond))))
(if :else
(let [n_3__3032 (nth n 3)]
(if (and (vector? n_3__3032) (= (count n_3__3032) 4))
(let [n_3__3032_0__3081 (nth n_3__3032 0)]
(if (= n_3__3032_0__3081 :red)
(let [n_3__3032_1__3082 (nth n_3__3032 1)]
(if (and (vector? n_3__3032_1__3082) (= (count n_3__3032_1__3082) 4))
(let [n_3__3032_1__3082_0__3085 (nth n_3__3032_1__3082 0)]
(if (= n_3__3032_1__3082_0__3085 :red)
(let [] :valid)
(if :else (let [] :invalid) (cond))))
(if :else (let [] :invalid) (cond))))
(if :else (let [] :invalid) (cond))))
(cond :else (let [] :invalid))))
(cond))))
(if :else
(let [n_3__3032 (nth n 3)]
(if (and (vector? n_3__3032) (= (count n_3__3032) 4))
(let [n_3__3032_0__3089 (nth n_3__3032 0)]
(if (= n_3__3032_0__3089 :red)
(let [n_3__3032_1__3090 (nth n_3__3032 1)]
(if (and (vector? n_3__3032_1__3090) (= (count n_3__3032_1__3090) 4))
(let [n_3__3032_1__3090_0__3093 (nth n_3__3032_1__3090 0)]
(if (= n_3__3032_1__3090_0__3093 :red)
(let [] :valid)
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond :else (let [] :invalid))))
(cond))))
(cond :else (let [] :invalid))))
(cond :else :invalid))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.