(U-000224B8): Use `->subsumptive'.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R143-Blood.el

diff --git a/lisp/utf-2000/Ideograph-R143-Blood.el b/lisp/utf-2000/Ideograph-R143-Blood.el
index b2bb650..73cecc9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R143-Blood.el
+++ b/lisp/utf-2000/Ideograph-R143-Blood.el
@@ -499,20 +499,28 @@
       ))
     (ideographic-radical@r109 . 109)   ; ⽬
     (ideographic-radical@r143 . 143)   ; ⾎
-    (=>ucs@component   . #x8846)       ; &A-compU+8846;
-    (=ucs@big5         . #x773E)       ; &A-compU+8846;
-    (=big5             . #xB2B3)       ; &A-compU+8846;
-    (=>iwds-1          .  0329)        ; &A-compU+8846;
+    (=>ucs@iwds-1      . #x8846)       ; &A-IWDSU+8846;
+    (=ucs@big5         . #x773E)       ; &A-IWDSU+8846;
+    (=big5             . #xB2B3)       ; &A-IWDSU+8846;
+    (=>iwds-1          .  0329)        ; &A-IWDSU+8846;
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@component   . #x8846)     ; &A-compU+8846;
-      (=ucs@big5         . #x773E)     ; &A-compU+8846;
-      (=>iwds-1                  .  0329)      ; &A-compU+8846;
+     ((=>ucs@iwds-1      . #x8846)     ; &A-IWDSU+8846;
+      (=>iwds-1                  .  0329)      ; &A-IWDSU+8846;
       ))
     (ideographic-radical . 143)        ; ⾎
     (ideographic-strokes . 6)
     (total-strokes      . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x8840)     ; 血
+      )
+     ((=>ucs@iwds-1      . #x4E51)     ; &A-IWDSU+4E51;
+      (=>iwds-1                  .  0328)      ; &A-IWDSU+4E51;
+      ))
     (=ucs              . #x8846)       ; 衆
     ))
 (define-char
@@ -522,6 +530,16 @@
     (ideographic-radical . 143)        ; ⾎
     (ideographic-strokes . 6)
     (total-strokes      . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs@unicode      . #x8840)     ; &AJ1-01858;
+      (=adobe-japan1-0   . 01858)      ; &AJ1-01858;
+      )
+     ((=ucs@unicode      . #x4E51)     ; &AJ1-17241;
+      (=adobe-japan1-5   . 17241)      ; &AJ1-17241;
+      ))
     (=ucs@unicode      . #x8846)       ; &AJ1-02362;
     (=adobe-japan1-0   . 02362)        ; &AJ1-02362;
     (=jis-x0208                . #x3D30)       ; &I-J90-3D30; [29-16]
@@ -604,7 +622,8 @@
       )
      ((=ucs-itaiji-002   . #x8840)     ; &U-i002+8840;
       )
-     ((=ucs              . #x4E51)     ; 乑
+     ((=ucs@unicode      . #x4E51)     ; &AJ1-17241;
+      (=adobe-japan1-5   . 17241)      ; &AJ1-17241;
       ))
     (=ucs-itaiji-005   . #x8846)       ; &U-i005+8846;
     ))
@@ -615,6 +634,16 @@
     (ideographic-radical . 143)        ; ⾎
     (ideographic-strokes . 6)
     (total-strokes      . 12)
+    (=shinjigen@1ed    .  7317)        ; &U-i011+8846;
+    (=ucs-itaiji-011   . #x8846)       ; &U-i011+8846;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x8846)     ; 衆
+      ))
+    (ideographic-radical . 143)        ; ⾎
+    (ideographic-strokes . 6)
+    (total-strokes      . 12)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
@@ -646,15 +675,6 @@
       ))
     ))
 (define-char
-  '((<-denotational
-     ((=ucs              . #x8846)     ; 衆
-      ))
-    (ideographic-radical . 143)        ; ⾎
-    (ideographic-strokes . 6)
-    (total-strokes      . 12)
-    (=shinjigen@1ed    .  7317)        ; &SJG1-7317;
-    ))
-(define-char
   '((ideographic-radical . 143)        ; ⾎
     (ideographic-strokes . 6)
     (total-strokes      . 12)