 ;; to add new language like Espanol.
 (defn embed-phon [lexical-entry]
   (cond (string? (get-in lexical-entry '(:english)))
-        (merge {:english {:english (get-in lexical-entry '(:english))}}
-               (embed-phon (dissoc lexical-entry ':english)))
+        (unifyc {:english {:english (get-in lexical-entry '(:english))}}
+                (embed-phon (dissoc lexical-entry ':english)))
 
         (and (string? (get-in lexical-entry '(:italiano)))
              (= :verb (get-in lexical-entry '(:synsem :cat))))
-        (merge {:italiano {:italiano (get-in lexical-entry '(:italiano))}}
-               (embed-phon (dissoc lexical-entry ':italiano)))
+        (unifyc {:italiano {:italiano (get-in lexical-entry '(:italiano))}}
+                (embed-phon (dissoc lexical-entry ':italiano)))
 
         (string? (get-in lexical-entry '(:italiano)))
-        (merge {:italiano {:italiano (get-in lexical-entry '(:italiano))}}
-               (embed-phon (dissoc lexical-entry ':italiano)))
+        (unifyc {:italiano {:italiano (get-in lexical-entry '(:italiano))}}
+                (embed-phon (dissoc lexical-entry ':italiano)))
         true
         lexical-entry))
 

   #?(:cljs [babel.logjs :as log]) 
   [clojure.string :as string]
   [dag_unify.core :as unify :refer [dissoc-paths exists? fail-path fail? get-in isomorphic?
                                     merge serialize strip-refs unifyc]]))

(declare listify)
(declare map-function-on-map-vals)

    ;; MUSTDO: regenerate :serialized.

    (cache-serialization
     (dag_unify.core/merge (dissoc-paths lexical-entry (list [:synsem :subcat :2]
                                                             [:serialized]))
            {:synsem {:subcat {:2 '()}}
             :canary :tweet43})) ;; if the canary tweets, then the runtime is getting updated correctly.

