                          ;; if a verb has an object,
                          ;; and the object is not {:reflexive true}
                          ;; then the object is {:reflexive false}
+
                          (if-then {:synsem {:cat :verb
                                             :subcat {:2 {:reflexive false}}}}
                                   {:synsem {:subcat {:2 {:reflexive false}}}}))))
+
+
+                         
+
+    
+

   ;; TODO: search _within_ or _on_: depends on the object.
   ;;   "search"  {:synsem {:sem {:pred :cercare}}})

   "see"  {:synsem {:cat :verb
                    :sem {:pred :vedere}}
           :english {:past "saw"

   "warm" {:synsem {:cat :verb
                :sem {:pred :warm}}}

   "warn" {:synsem {:cat :verb
                     :sem {:pred :warn}}}
   
   "wash" (let [subject-semantics (ref :top)]
            {:synsem {:cat :verb
                      :sem {:pred :wash
