            "is Antonia"))))
 
 (deftest generate-irregular-present-1
+  (let [form {:english {:a {:cat :verb,
+                            :infl :present,
+                            :present {:1sing "am",
+                                      :3plur "are",
+                                      :1plur "are",
+                                      :2plur "are",
+                                      :3sing "is",
+                                      :2sing "are"},
+                            :past {:1sing "was",
+                                   :3plur "were",
+                                   :1plur "were",
+                                   :2plur "were",
+                                   :3sing "was",
+                                   :2sing "were"},
+                            :agr {:person :3rd,
+                                  :gender :masc,
+                                  :number :sing},
+                            :english "be"},
+                        :b {:agr {:person :3rd,
+                                  :gender :masc,
+                                  :number :sing},
+                            :english "Antonio",
+                            :cat :noun,
+                            :pronoun false}}}]
+    (is (= (fo form)
+           "is Antonio"))))
+
+(deftest generate-irregular-present-2
   (let [form {:english {:past {:1sing "was",
                                :3plur "were",
                                :1plur "were",

    (is (= (fo form)
           "is Juan"))))





    (is (= (fo form)
           "is"))))

(deftest generate-irregular-present-3
  (let [form {:english {:a {:infl :present,
                            :past {:2sing "were",
                                   :1sing "was",
