(U+7591-itaiji-006): Add HNG-KHM0095-0.

diff --git a/lisp/utf-2000/Ideograph-R103-Bolt-Of-Cloth.el b/lisp/utf-2000/Ideograph-R103-Bolt-Of-Cloth.el
index 87d3994..5508fb9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R103-Bolt-Of-Cloth.el
+++ b/lisp/utf-2000/Ideograph-R103-Bolt-Of-Cloth.el
@@ -382,14 +382,7 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-       (=ucs               . #x2FF1)   ; ⿱
-       )
-       ((=ucs              . #x4E0A)   ; 上
-       )
-       ((=ucs              . #x592B)   ; 夫
-       ))
+     ((=ucs              . #x2BBDD)    ; 𫯝
       )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
@@ -402,7 +395,10 @@
        ((=big5-cdp         . #x8961)   ; &CDP-8961;
        ))
       ))
-    (=ucs-itaiji-006   . #x7591)       ; &U-i006+7591;
+    (===hng-khi                . 04940)        ; &HNG010-04940;
+    (<-formed
+     ((=ucs              . #x7591)     ; 疑
+      ))
     ))
 (define-char
   '((<-denotational
@@ -415,7 +411,14 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs              . #x2FF0)     ; ⿰
       )
-     ((=ucs              . #x2BBDD)    ; 𫯝
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+       (=ucs               . #x2FF1)   ; ⿱
+       )
+       ((=ucs              . #x4E0A)   ; 上
+       )
+       ((=ucs              . #x592B)   ; 夫
+       ))
       )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
@@ -428,9 +431,12 @@
        ((=big5-cdp         . #x8961)   ; &CDP-8961;
        ))
       ))
-    (===hng-khi                . 04940)        ; &HNG010-04940;
-    (<-formed
-     ((=ucs              . #x7591)     ; 疑
+    (=ucs-itaiji-006   . #x7591)       ; &U-i006+7591;
+    (->subsumptive
+     ((===hng-khm        . 00950)      ; &HNG011-00950;
+      (<-formed
+       ((=ucs              . #x7591)   ; 疑
+       ))
       ))
     ))
 (define-char