              :sem {:pred :antonio
                    :human true}
              :propernoun true}}
-
    "a"
    [(let [location (ref {:place true})]
       {:synsem {:cat :prep


   "aggiungere" {:synsem {:cat :verb
                          :sem {:pred :add}}}

   "aiutare"
    {:synsem {:essere false
              :sem {:pred :aiutare
                    :activity true
                    :obj {:human true}}}}

   "alto"
   [;; non-comparative:
    (let [subject-sem (ref {:human true}) ;; only humans can be tall.


   "approfittare"  {:synsem {:cat :verb
                             :sem {:pred :take-advantage-of}}}
   
   "approvare" {:synsem {:cat :verb
                         :sem {:pred :approve}}}

