bel>
                        <pre class="source"><code class="clojure">(defn split
  [ova pchk]
  (let [pos (clone ova)
        neg (clone ova)]
    (filter! pos pchk)
    (remove! neg pchk)
    {true pos false neg}))</code></pre>
                    </div>
                </div>
                <pre><h6><i><a href="https://github.com/zcaudate/hara/blob/master/test/hara/state/ova_test.clj#L318-L324" target="_blank">link</a></i></h6><code class="clojure">(def o (ova (range 10)))
(def sp (dosync (split o #{'(