 (ns test-utils.sandbox
-  (:require [test-utils.core :as tuc]
-            [test-utils.word-source :as ws]))
+  #?(:cljs (:require [test-utils.core :as tuc]
+                     [test-utils.word-source :as ws])
+     :clj (:require (test-utils [core :as tuc]
+                                [word-source :as ws]))))
 
 ;; Stuff I'm trying out
 

         duration-minute (int (* 60 (- duration-hours duration-hour)))
         duration-seconds (rand-nth (range 60))]
    [start
     [year-0 month-0 day-0 
      (rem (+ hour-0 duration-hour) 24)
      (rem (+ minute-0 duration-minute) 60)
      duration-seconds]]))

         (value-from-typical-range 0.2 10)))

(defn rand-uwi []
  (apply str
         (interpose "-"
                    (map str [(two-digit-zero-pad (tuc/rand-2))
                              (tuc/rand-3)
                              (tuc/rand-5)
                              (two-digit-zero-pad (tuc/rand-2))
                              (two-digit-zero-pad (tuc/rand-2))]))))

(defn rand-sensor-id []
