         measurement (generate-measurement-f unit)]
     [measurement (measurement-as-f measurement (first (remove (partial = unit) units)))]))
 
-;(generate-pair #{:lb-per-gal :kg-per-m3}
-;               rand-proppant-concentration-unit
-;               typical-proppant-concentration
-;               proppant-concentration-as)
-(repeatedly 10 (fn [] (generate-pair #{:lb-per-gal :kg-per-m3}
-                                     rand-proppant-concentration-unit
-                                     typical-proppant-concentration
-                                     proppant-concentration-as)))
+(generate-pair #{:lb-per-gal :kg-per-m3}
+               rand-proppant-concentration-unit
+               typical-proppant-concentration
+               proppant-concentration-as)

                            :length                 [:ft :m]
                            :mass                   [:lb :kg]
                            :power                  [:hp :W]
                            :proppant-concentration [:lb-per-gal :kg-per-m3]
                            :slurry-rate            [:bpm :m3-per-min]
                            :volume                 [:bbl :m3]
                            :temperature            [:F :C]}]

                   [:m :ft]                   #(* % (factors [:m :ft]))
                   [:kg :lb]                  #(* % (factors [:kg :lb]))
                   [:lb :kg]                  #(/ % (factors [:kg :lb]))
                   [:m3-per-min :bpm]         #(* % (factors [:m3 :bbl]))
                   [:bpm :m3-per-min]         #(/ % (factors [:bbl :m3]))
                   [:F :C]                    #(/ (- % 32) 1.8)
