segments-equal? seems to be insufficient

[smee]

segments-equal converts inputs and outputs to a set. That means that for example challenge 1-3 might show a valid test without duplicated outputs for the paths E-G, E-H,E-I.
Maybe this function should be

(defn segments-equal?
  "Onyx is a parallel, distributed system - so ordering isn't guaranteed.
   Does an unordered comparison of segments to check for equality."
  [expected actual]
  (is (= (frequencies expected) (frequencies actual))))