;; 4clojure no. 77 - simpler
(fn [params]
    (let [regrouped (group-by sort params)
          without-group-keys (vals regrouped)
          without-mono-lists (filter (fn [subset] (> (count subset) 1)) without-group-keys)
          result (set (map set without-mono-lists))
          ]
      result
      ))