                    :cat cat
                    :essere essere
                    :infl infl}}))
-
-
-      (default ;; aux defaults to false.
-       {:synsem {:cat :verb
-                 :aux false}})
-      
-      (default ;; essere defaults to false.
-       {:synsem {:cat :verb
-                 :essere false}})
-
-      (default ;; reflexive defaults to false.
-       {:synsem {:cat :verb
-                 :aux false
-                 :sem {:reflexive false}}})
-
-      (default ;; noun agreement
-       (unify {:synsem {:cat :noun
-                        :pronoun false
-                        :propernoun false
-                        :subcat {:1 {:cat :det}
-                                 :2 '()}}}
-              (let [agr (atom :top)
-                    cat (atom :top)]
-                {:italiano {:agr agr
-                            :cat cat}
-                 :synsem {:cat cat
-                          :agr agr
-                          :subcat {:1 {:agr agr}}}})))
+      ;; </category-independent>
 
       phonize2 ;; for each value v of each key k, set the [:italiano :italiano] of v to k, if not already set
       ;; e.g. by exception-generator2.

                   :case case}
          :italiano {:cat cat
                     :case case}}))
            
      (default ;; a verb's first argument's case is nominative.
       {:synsem {:cat :verb
                 :subcat {:1 {:cat :noun

       {:synsem {:cat :verb
                 :subcat {:2 {:cat :noun
                              :case :acc}}}})
      
      (default ;;  a verb's first argument defaults to the semantic subject of the verb.
       (let [subject-semantics (atom :top)]
         {:synsem {:cat :verb
