                           {:synsem {:subcat '()}}
                           {:synsem {:sem {:subj {:pred :noi
                                                  :gender :fem}
-                                          :pred :andare
+                                          :pred :go
                                           :aspect :perfect
                                           :tense :past}}})
          (:grammar @small)

         (is (= (fo result) "nous sommes allées")))))

(deftest passe-compose
  (let [result (engine/generate {:synsem {:sem {:pred :andare
                                                :subj {:pred :noi
                                                       :gender :fem}
                                                :aspect :perfect

                                          :sem {:pred :avere
                                                :subj {:pred :I}}}}
                                small)]
    (is (not (nil? result)))
    (is (= "av" (get-in result [:head :français :imperfect-stem])))
    (is (= "j'avais" (fo result)))))

(deftest être-as-aux
  (let [lexicon (:lexicon @small)
