          (is (= (fo result) "nous sommes allées")))))
 
 (deftest passe-compose
-  (let [result (engine/generate {:synsem {:sem {:pred :andare
+  (let [result (engine/generate {:synsem {:sem {:pred :go
                                                 :subj {:pred :noi
                                                        :gender :fem}
                                                 :aspect :perfect

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

                                          :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)
