 
 (defn get-executive-producers [md]
   (if-let [producers (values md :/film/film/executive_produced_by)]
-    (seq (map :text producers))
+    (clean (map :text producers))
     (when-let [producers (get-tv-producers md)]
-      (seq (map first (filter #(= (second %) "Executive Producer") producers))))))
+      (clean (map first (filter #(= (second %) "Executive Producer") producers))))))
 
 (defn get-producers [md]
   (if-let [producers (values md :/film/film/produced_by)]
-    (seq (map :text producers))
+    (clean (map :text producers))
     (when-let [producers (get-tv-producers md)]
-      (seq (map first (filter #(or (nil? (second %)) (= (second %) "Producer")) producers))))))
+      (clean (map first (filter #(or (nil? (second %)) (= (second %) "Producer")) producers))))))
 
 (defn get-directors [md]
   (when-let [directors (values md :/film/film/directed_by)]
-    (seq (map :text directors))))
+    (clean (map :text directors))))
 
 (defn get-actors [md]
   (when-let [actors (values md :/film/film/starring)]
-    (seq (map (comp :text first :values :/film/performance/actor :property) actors))))
+    (clean (map (comp :text first :values :/film/performance/actor :property) actors))))
 
 (defn get-cast [md]
   (when-let [stars (values md :/tv/tv_program/regular_cast)]
-    (seq (map (comp :text first :values :/tv/regular_tv_appearance/actor :property) stars))))
+    (clean (map (comp :text first :values :/tv/regular_tv_appearance/actor :property) stars))))
 
 (defn get-networks [md]
   (when-let [networks (values md :/tv/tv_program/original_network)]
-    (seq (map (comp :text first :values :/tv/tv_network_duration/network :property) networks))))
+    (clean (map (comp :text first :values :/tv/tv_network_duration/network :property) networks))))
 
 (defn get-country [md]
   (:text (or (value md :/film/film/country :en)
              (value md :/tv/tv_program/country_of_origin :en))))
 
 (defn get-film-locations [md]
-  (seq (map :text (values md :/film/film/featured_film_locations :en))))
+  (clean (map :text (values md :/film/film/featured_film_locations :en))))
 
 (defn get-trailers [md]
-  (seq (map :value (values md :/film/film/trailers))))
+  (clean (map :value (values md :/film/film/trailers))))
 
 (defn get-wikipedia [md]
   (let [urls (map :value (values md :/common/topic/topic_equivalent_webpage))

  (when-let [desc (value md :/type/object/name :en)]
    (:value desc)))

(defn get-notable-for [md]
  (seq (map :text (values md :/common/topic/notable_for :en))))

(defn get-notable-types [md]
  (seq (map :text (values md :/common/topic/notable_types :en))))

(defn get-imdb [md]
  (let [urls (map :value (values md :/common/topic/topic_equivalent_webpage))]

(defn get-genres [md]
  (when-let [genres (or (values md :/film/film/genre :en)
                        (values md :/tv/tv_program/genre :en))]
    (clean (map :text genres))))

(defn get-rating [md]
  (when-let [ratings (values md :/film/film/rating)]
