 (defn arrabbiarsi
   "generate arrabiarsi sentences with a grammar subset."
   []
-  (let [verb-set #{"arrabbiarsi" "essere" "fermarsi" "parlare" "sedersi"}
+  (let [verb-set #{"arrabbiarsi" "fermarsi" "parlare" "sedersi"}
         grammar
         (filter
          #(contains? verbcoach-grammar (u/get-in % [:rule]))

(defn arrabbiarsi-or-sedersi
  "generate arrabiarsi sentences with a grammar subset."
  []
  (let [verb-set #{"arrabbiarsi" "essere" "fermarsi" "parlare" "sedersi"}
        grammar
        (filter
         #(contains? verbcoach-grammar (u/get-in % [:rule]))

   [:synsem :infl]
   [:synsem :sem :pred]])

(defn create-index-fn [verb-set grammar]
  (let [lexicon
        (into {}
