   "true if seq contains elm"
   [seq elm]
   (some #(= elm %) seq))
+
+(defn split-words [s] (split s #"\s+"))
 
 ;; Let's just start with all the words. Leaving freqs in.
 (defn make-word-map [[id str]]

(defn link? [s] (if (re-find link-re s) true false))
(defn get-href [s] (str (nth (re-find link-re s) 1)))
(defn get-title [s] (str (nth (re-find link-re s) 2)))
(defn split-words [s] (clojure.string/split s #"\s+"))

(defn str-or-link [x]
  (if (link? x)

(ns unfolds.core
  (:require-macros [cljs.core.async.macros :refer [go]])
  (:require [clojure.set :refer [union]]
            [clojure.string :refer [split]]
            [om.core :as om :include-macros true]
            [om.dom :as dom :include-macros true]
            [cljs.core.async :refer [put! chan <!]]))
