(U-00020116): Add abstract ideographic-structure.

diff --git a/lisp/utf-2000/Ideograph-R006-Hook.el b/lisp/utf-2000/Ideograph-R006-Hook.el
index b9902a2..a1bfdc8 100644 (file)
--- a/lisp/utf-2000/Ideograph-R006-Hook.el
+++ b/lisp/utf-2000/Ideograph-R006-Hook.el
@@ -313,11 +313,19 @@
       ))
     ))
 (define-char
-  '((=>daikanwa                . 00237)        ; &M-00237;
-    (ideographic-radical . 6)  ; ⼅
+  '((ideographic-radical . 6)  ; ⼅
     (ideographic-strokes . 6)
     (total-strokes      . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x4EE4)     ; 令
+      )
+     ((=ucs              . #x4E01)     ; 丁
+      ))
     (=ucs              . #x20116)      ; 𠄖
+    (=>daikanwa                . 00237)        ; 𠄖
     (->subsumptive
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -349,7 +357,8 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
        (=ucs               . #x2FF0)   ; ⿰
        )
-       ((=ucs              . #x4EE4)   ; 令
+       ((=ucs@unicode      . #x4EE4)   ; &GT-K01022;
+       (=gb2312            . #x416E)   ; &GT-K01022; [33-78]
        )
        ((=ucs              . #x4E01)   ; 丁
        ))