(U+397F): Add ideographic-structure.

(mother of C3-4B7D): Unify o-UU+397F; add ideographic-structure.

diff --git a/lisp/utf-2000/Ideograph-R061-Heart.el b/lisp/utf-2000/Ideograph-R061-Heart.el
index 29fdc69..cb20603 100644 (file)
--- a/lisp/utf-2000/Ideograph-R061-Heart.el
+++ b/lisp/utf-2000/Ideograph-R061-Heart.el
@@ -12396,6 +12396,14 @@
     ))
 (define-char
   '((ideographic-radical . 61) ; ⼼
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x6556)     ; 敖
+      )
+     ((=ucs              . #x5FC3)     ; 心
+      ))
     (=ucs              . #x397F)       ; 㥿
     ))
 (define-char
@@ -12410,6 +12418,7 @@
       (=ucs              . #x2FF1)     ; ⿱
       )
      ((=ucs@jis                  . #x6556)     ; &GT-16699;
+      (=ucs@ks           . #x6556)     ; &GT-16699;
       (=jis-x0208        . #x5A44)     ; &GT-16699; [58-36]
       (=ks-x1001         . #x6779)     ; &I-K0-6779; [71-89]
       (=jis-x0213-1      . #x5A44)     ; &I-JX1-5A44; [58-36]
@@ -12425,6 +12434,15 @@
      ((=ucs              . #x397F)     ; 㥿
       ))
     (ideographic-radical . 61) ; ⼼
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=+>ucs@unicode    . #x6556)     ; &o-UU+6556;
+      )
+     ((=ucs              . #x5FC3)     ; 心
+      ))
+    (=+>ucs@unicode    . #x397F)       ; &o-UU+397F;
     (->subsumptive
      ((ideographic-strokes . 10)
       (total-strokes      . 14)