     (time
      (let [tree (tree 100)]
        (dotimes [i 500000]
-         (.assoc! tree i (* 2 i))))))
+         (.assoc! tree #js [i i i] (* 2 i))))))
 
   (f)
 

    (time
     (let [tree (tree 100)]
       (dotimes [i 500000]
         (.assoc! tree (if (even? i) i (str i)) (* 2 i))))))

  (g)


    (time
     (let [tree (tree 100)]
       (dotimes [i 500000]
         (.assoc! tree #js [(js/Math.sin i) (js/Math.cos i) (js/Math.tan i)] (* 2 i))))))

  (time (dotimes [_ 10] (h)))

  (do
    (def samples (gen/sample (gen/tuple gen/s-pos-int (gen/vector gen-action) (gen/vector gen-movement)) 100))
