             base-spec)
        {:root (first (shuffle roots))})))
 
-
-
-
-
 (def model {:lexicon lexicon
             :fo fo
             :generate-fn generate})

      (default
       {:phrasal false})))

(def lexicon (edn2lexicon "src/babel/latin/lexicon.edn"))

(defn parse [surface]
  [{:parses (morph/analyze surface lexicon)}])

  (:refer-clojure :exclude [get-in])
  (:require [babel.latin.morphology :as morph]
            [babel.lexiconfn :refer [default listify map-function-on-map-vals]]
            [clojure.java.io :refer [resource]]
            [clojure.repl :refer [doc]]
            [dag_unify.core :refer [fail? get-in unifyc]]))

