;; Run as e.g. "bb benchmark.clj 1000"
(ns benchmark
  (:require [clojure.set :as set]))

(def size (Integer/parseInt (first *command-line-args*)))

(def set1 (set (map (fn [i] (keyword (str "x" i))) (range size))))
(def set2 (set (map (fn [i] (keyword (str "y" i))) (range size))))

(doseq [x (range 10000)]
  (set/difference set1 set2))