               {:synsem {:sem {:human true
                               :pred :donna
                               :child false}}})
-      "dopo"
-      (unify sentential-adverb
-              {:synsem {:cat :sent-modifier
-                        :sem {:pred :after}
-                        :subcat {:1 {:cat :verb
-                                     :subcat '()}}}})
+   "dopo"
+   (let [time (atom {:time true})]
+     {:synsem {:cat :prep
+               :sem {:pred :after
+                     :obj time}
+               :subcat {:1 {:cat :noun
+                            :subcat '()
+                            :sem time}
+                        :2 '()}}})
       "dopodomani"
       (unify sentential-adverb
               {:synsem {:cat :sent-modifier

                        :future-stem "verr"}}

   "ventotto" {:synsem {:cat :det
                        :agr {:number :plur}}}
   
   "vestirsi" (let [subject-semantics (atom {:human true})

                   :human true}
             :propernoun true}}
   "a"
   ;; "a" as in "a casa"
   [(let [location (atom {:place true})]
      {:synsem {:cat :prep
                :sem {:pred :a
