Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
61 lines (59 sloc) 3.16 KB
;; Bootstrap for Swearjure -- Clojure 1.0
(#(((`[~@(% ((`[~@^,#'+](+))(*)))] (`[~@%&](+)))(*))
`(~((`[~@(% ((`[~@^,#'+](+))(*)))] (`[~@%&](*)))(+))
$ [-#] ((`[~@(~% ((`[~@^,#'+](+))(*)))] -#)(*))))
ns-map ;; Only line with alphanums
(#(*%%)(-(#(*%%%(+%(*)))(+(*)(*)))(*)))
(#(*(+(*)%)(+(*)%%)(-(*%%%(+(*)%))(*)))(+(*)(*))))
(($ (#(+ (*) (*%%% (+ (*) (*%%)) (+ (*) (*%% (+ (*) %))))) (+ (*) (*))))
(($ (#(* (+ (*) (*%%%%)) (- (* % (+ (*) %) (+ (*) (*%%))) (*))) (+ (*) (*))))
($ (#(* % (+ (*) %) (+ (*) (*%%)) (+ (*) (*%% (+ (*) %)))) (+ (*) (*))))
(($ (#(- (*%%%%%%%%) %%%%%) (+ (*) (*))))
($ (#(* (+ (*) %) (+ (*) (*%% (+ (*) %) (+ (*) (*%% (+ (*) %))))))
(+ (*) (*))))
[(#(*%%% (+ (*) %) (+ (*) %)) (+ (*) (*)))
(- (* (#(*% (+ (*) %)) (+ (*) (*))) (+ (*) (#(*%%%%)(+ (*) (*))))) (*))
(#(*%%% (-% (*)) (-% (*))) (+ (*) (+ (*) (*))))
(#(*%%% (-% (*)) (-% (*))) (+ (*) (+ (*) (*))))
(#(+% (*%%% (-% (*)) (-% (*)))) (+(*)(*)(*)))
(#(*%% (- (*%% (+ (*) %)) (*))) (+ (*) (*)))
(#(*%%%%%) (+ (*) (*)))
(#(* (+ (*) %) (- (* % (+ (*) %) (+ (*) %%)) (*))) (+ (*) (*)))
(#(+% (*%%% (-% (*)) (-% (*)))) (+(*)(*)(*)))
(#(* % (- % (*)) (+ (*) (* (- % (*)) %%))) (+ (*) (*) (*)))
(#(*%%% (-% (*)) (-% (*))) (+ (*) (*) (*)))
(#(*%% (+ (*) (*%%)) (+ (*) (*%%))) (+ (*) (*)))
(#(* (+ (*) %) (- (* %% (+ (*) %)) (*))) (+ (*) (*)))])))
(($ (#(*%%)(-(#(*%%%(+%(*)))(+(*)(*)))(*))))
`(~(($ (#(+ (*) (*%%%%%%%)) (+ (*) (*))))
(($ (#(* (+ (*) (*%%%%)) (- (* % (+ (*) %) (+ (*) (*%%))) (*)))
(+ (*) (*))))
($ (#(* % (+ (*) %) (+ (*) (*%%)) (+ (*) (*%% (+ (*) %)))) (+ (*) (*))))
(($ (#(- (*%%%%%%%%) %%%%%) (+ (*) (*))))
($ (#(* (+ (*) %) (+ (*) (*%% (+ (*) %) (+ (*) (*%% (+ (*) %))))))
(+ (*) (*))))
[(- (* (+ (*) (*)) (+ (*) (*)) (+ (*) (+ (*) (*)))
(+ (*) (* (+ (*) (*)) (+ (*) (+ (*) (*)))))) (*))
(* (- (* (+ (*) (*)) (+ (*) (*)) (+ (*) (+ (*) (*)))) (*))
(- (* (+ (*) (*)) (+ (*) (*)) (+ (*) (+ (*) (*)))) (*)))
(* (+ (*) (* (+ (*) (*)) (+ (*) (*))))
(- (* (+ (*) (*)) (+ (*) (*)) (+ (*) (*)) (+ (*) (+ (*) (*)))) (*)))
(* (+ (*) (*)) (+ (*) (*))
(- (* (+ (*) (*)) (+ (*) (+ (*) (*)))
(+ (*) (* (+ (*) (*)) (+ (*) (*))))) (*)))
(- (* (+ (*) (*)) (+ (*) (+ (*) (*)))
(+ (*) (* (+ (*) (*)) (+ (*) (*)) (+ (*) (*)) (+ (*) (*))))) (*))
(+ (*) (* (+ (*) (*)) (+ (*) (*)) (+ (*) (+ (*) (*)))
(+ (*) (+ (*) (*))) (+ (*) (+ (*) (*)))))
(- (* (+ (*) (*)) (+ (*) (*)) (+ (*) (*)) (+ (*) (*))
(+ (*) (+ (*) (*)))) (*))
(- (* (+ (*) (*)) (+ (*) (+ (*) (*)))
(+ (*) (* (+ (*) (*)) (+ (*) (*)) (+ (*) (*)) (+ (*) (*))))) (*))
(* (+ (*) (*)) (+ (*) (*)) (+ (*) (*)) (+ (*) (+ (*) (*)))
(+ (*) (* (+ (*) (*)) (+ (*) (*)))))
(* (+ (*) (+ (*) (*))) (+ (*) (* (+ (*) (*)) (+ (*) (*))))
(+ (*) (* (+ (*) (*)) (+ (*) (+ (*) (*))))))
(* (+ (*) (*)) (+ (*) (*))
(- (* (+ (*) (*)) (+ (*) (+ (*) (*)))
(+ (*) (* (+ (*) (*)) (+ (*) (*))))) (*)))])))
(+)))