Use `->subsumptive' for some character definitions.

(C5-3D42): Map to U-000291EE.
(M-42603): Map to U-000291F6.

diff --git a/lisp/utf-2000/Ideograph-R175-Wrong.el b/lisp/utf-2000/Ideograph-R175-Wrong.el
index acda01d..253d0ce 100644 (file)
--- a/lisp/utf-2000/Ideograph-R175-Wrong.el
+++ b/lisp/utf-2000/Ideograph-R175-Wrong.el
@@ -1,34 +1,25 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
-  '((=>ucs             . #x975E)       ; 非
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 0)
-    (total-strokes      . 8)
-    (shinjigen-2       . 9037)
-    (=jis-x0208                . #x4873)       ; &GT-57172;
-    (=ks-x1001         . #x5E2A)       ; &I-K0-5E2A;
-    (=gt               . 57172)        ; &I-GT-57172;
-    (=gt-k             . 03805)        ; &I-GT-K03805;
-    (=gt-pj-1          . #x4873)       ; &I-GT-57172;
-    (=daikanwa         . 42585)        ; &I-M-42585;
-    (=ucs@jis          . #x975E)       ; &GT-57172;
-    ))
-(define-char
-  '((=>ucs             . #x975E)       ; 非
-    (morohashi-daikanwa        42585 0 0)
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 0)
-    (total-strokes      . 8)
-    (=cns11643-1       . #x4F66)       ; &C1-4F66;
-    (=ucs@cns          . #x975E)       ; &C1-4F66;
-    ))
-(define-char
-  '((morohashi-daikanwa        42585 0 1)
-    (ideographic-radical . 175)        ; ⾮
+  '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 0)
     (total-strokes      . 8)
     (=ucs              . #x975E)       ; 非
-    (=gb2312           . #x3747)       ; &I-G0-3747;
+    (->subsumptive
+     ((shinjigen-2       . 9037)
+      (=jis-x0208        . #x4873)     ; &GT-57172;
+      (=ks-x1001         . #x5E2A)     ; &I-K0-5E2A;
+      (=gt               . 57172)      ; &I-GT-57172;
+      (=gt-k             . 03805)      ; &I-GT-K03805;
+      (=gt-pj-1                  . #x4873)     ; &I-GT-57172;
+      (=daikanwa         . 42585)      ; &I-M-42585;
+      (=ucs@jis                  . #x975E)     ; &GT-57172;
+      )
+     ((=cns11643-1       . #x4F66)     ; &C1-4F66;
+      (=ucs@cns                  . #x975E)     ; &C1-4F66;
+      )
+     ((=gb2312           . #x3747)     ; &G0-3747;
+      (=ucs@unicode      . #x975E)     ; &G0-3747;
+      ))
     ))
 (define-char
   '((ideographic-radical . 175)        ; ⾮
@@ -79,30 +70,25 @@
     (ideographic-strokes . 3)
     (total-strokes      . 11)
     (=ucs              . #x4A3E)       ; 䨾
-    (=cns11643-4       . #x362A)       ; &I-C4-362A;
-    (=daikanwa         . 42592)        ; &I-M-42592;
-    ))
-(define-char
-  '((=>ucs             . #x291EB)      ; 𩇫
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 3)
-    (total-strokes      . 11)
-    (=daikanwa         . 42593)        ; &M-42593;
+    (->subsumptive
+     ((=daikanwa         . 42592)      ; &M-42592;
+      )
+     ((=cns11643-4       . #x362A)     ; &C4-362A;
+      )
+     ((=ucs@unicode      . #x4A3E)     ; &UU+4A3E;
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa        42593 0 0)
-    (ideographic-radical . 175)        ; ⾮
+  '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 3)
     (total-strokes      . 11)
     (=ucs              . #x291EB)      ; 𩇫
-    ))
-(define-char
-  '((=>ucs             . #x291EB)      ; 𩇫
-    (morohashi-daikanwa        42593 0 1)
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 3)
-    (total-strokes      . 11)
-    (=cns11643-4       . #x3629)       ; &C4-3629;
+    (->subsumptive
+     ((=daikanwa         . 42593)      ; &M-42593;
+      (=ucs@iso                  . #x291EB)    ; &M-42593;
+      )
+     ((=cns11643-4       . #x3629)     ; &C4-3629;
+      ))
     ))
 (define-char
   '((ideographic-radical . 175)        ; ⾮
@@ -115,46 +101,53 @@
   '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 4)
     (total-strokes      . 12)
-    (=cns11643-5       . #x3D42)       ; &M-42595;
-    (=daikanwa         . 42595)        ; &I-M-42595;
+    (=ucs              . #x291EE)      ; 𩇮
+    (->subsumptive
+     ((=daikanwa         . 42595)      ; &M-42595;
+      )
+     ((=ucs@iso                  . #x291EE)    ; &UU+291EE;
+      )
+     ((=cns11643-5       . #x3D42)     ; &C5-3D42;
+      ))
     ))
 (define-char
   '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 4)
     (total-strokes      . 12)
     (=ucs              . #x975F)       ; 靟
-    (=cns11643-3       . #x4021)       ; &I-C3-4021;
-    (=daikanwa         . 42596)        ; &I-M-42596;
+    (->subsumptive
+     ((=daikanwa         . 42596)      ; &M-42596;
+      )
+     ((=cns11643-3       . #x4021)     ; &C3-4021;
+      )
+     ((=ucs@unicode      . #x975F)     ; &UU+975F;
+      ))
     ))
 (define-char
   '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 4)
     (total-strokes      . 12)
     (=ucs              . #x291EF)      ; 𩇯
-    (=daikanwa         . 42597)        ; &I-M-42597;
+    (->subsumptive
+     ((=daikanwa         . 42597)      ; &M-42597;
+      )
+     ((=ucs@iso                  . #x291EF)    ; &UU+291EF;
+      )
+     ((=cns11643-4       . #x3B75)     ; &C4-3B75;
+      ))
     ))
 (define-char
-  '((=>ucs             . #x291EF)      ; 𩇯
-    (morohashi-daikanwa        42597 0 0)
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 4)
-    (total-strokes      . 12)
-    (=cns11643-4       . #x3B75)       ; &C4-3B75;
-    ))
-(define-char
-  '((=>ucs             . #x4A3F)       ; 䨿
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 4)
-    (total-strokes      . 12)
-    (=daikanwa         . 42598)        ; &M-42598;
-    ))
-(define-char
-  '((morohashi-daikanwa        42598 0 9)
-    (ideographic-radical . 175)        ; ⾮
+  '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 4)
     (total-strokes      . 12)
     (=ucs              . #x4A3F)       ; 䨿
-    (=cns11643-4       . #x3B74)       ; &I-C4-3B74;
+    (->subsumptive
+     ((=daikanwa         . 42598)      ; &M-42598;
+      )
+     ((=ucs@unicode      . #x4A3F)     ; &UU+4A3F;
+      )
+     ((=cns11643-4       . #x3B74)     ; &C4-3B74;
+      ))
     ))
 (define-char
   '((ideographic-radical . 175)        ; ⾮
@@ -194,75 +187,50 @@
   '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 5)
     (total-strokes      . 13)
-    (=daikanwa         . 42603)        ; &M-42603;
-    ))
-(define-char
-  '((=>ucs             . #x9760)       ; 靠
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 7)
-    (total-strokes      . 15)
-    (shinjigen-2       . 9038)
-    (=jis-x0208-1983   . #x7051)       ; &GT-57194;
-    (=gt               . 57194)        ; &I-GT-57194;
-    (=gt-pj-1          . #x7051)       ; &I-GT-57194;
-    (=daikanwa         . 42604)        ; &I-M-42604;
+    (=ucs              . #x291F6)      ; 𩇶
+    (->subsumptive
+     ((=daikanwa         . 42603)      ; &M-42603;
+      )
+     ((=ucs@iso                  . #x291F6)    ; &UU+291F6;
+      ))
     ))
 (define-char
-  '((=>ucs             . #x9760)       ; 靠
-    (morohashi-daikanwa        42604 0 0)
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 7)
-    (total-strokes      . 15)
-    (=jis-x0208-1990   . #x7051)       ; &J90-7051;
-    (=ucs@jis          . #x9760)       ; &J90-7051;
-    ))
-(define-char
-  '((=>ucs             . #x9760)       ; 靠
-    (morohashi-daikanwa        42604 0 2)
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 7)
-    (total-strokes      . 15)
-    (=jis-x0208-1978   . #x7051)       ; &GT-57196;
-    (=gt               . 57196)        ; &I-GT-57196;
-    (=gt-pj-11         . #x3232)       ; &I-GT-57196;
-    ))
-(define-char
-  '((=>ucs             . #x9760)       ; 靠
-    (morohashi-daikanwa        42604 0 3)
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 7)
-    (total-strokes      . 15)
-    (=cns11643-1       . #x6F6A)       ; &C1-6F6A;
-    ))
-(define-char
-  '((morohashi-daikanwa        42604 0 4)
-    (ideographic-radical . 175)        ; ⾮
+  '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 7)
     (total-strokes      . 15)
     (=ucs              . #x9760)       ; 靠
-    (=gb2312           . #x3F3F)       ; &I-G0-3F3F;
-    ))
-(define-char
-  '((=>ucs             . #x291F8)      ; 𩇸
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 7)
-    (total-strokes      . 15)
-    (=daikanwa         . 42605)        ; &M-42605;
+    (->subsumptive
+     ((shinjigen-2       . 9038)
+      (=jis-x0208-1983   . #x7051)     ; &GT-57194;
+      (=gt               . 57194)      ; &I-GT-57194;
+      (=gt-pj-1                  . #x7051)     ; &I-GT-57194;
+      (=daikanwa         . 42604)      ; &I-M-42604;
+      )
+     ((=jis-x0208-1990   . #x7051)     ; &J90-7051;
+      (=ucs@jis                  . #x9760)     ; &J90-7051;
+      )
+     ((=jis-x0208-1978   . #x7051)     ; &GT-57196;
+      (=gt               . 57196)      ; &I-GT-57196;
+      (=gt-pj-11         . #x3232)     ; &I-GT-57196;
+      )
+     ((=cns11643-1       . #x6F6A)     ; &C1-6F6A;
+      )
+     ((=gb2312           . #x3F3F)     ; &G0-3F3F;
+      (=ucs@unicode      . #x9760)     ; &G0-3F3F;
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa        42605 0 2)
-    (ideographic-radical . 175)        ; ⾮
+  '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 7)
     (total-strokes      . 15)
     (=ucs              . #x291F8)      ; 𩇸
-    ))
-(define-char
-  '((=>ucs             . #x291F8)      ; 𩇸
-    (morohashi-daikanwa        42605 0 3)
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 7)
-    (total-strokes      . 15)
-    (=cns11643-4       . #x4E4D)       ; &C4-4E4D;
+    (->subsumptive
+     ((=daikanwa         . 42605)      ; &M-42605;
+      )
+     ((=ucs@iso                  . #x291F8)    ; &UU+291F8;
+      )
+     ((=cns11643-4       . #x4E4D)     ; &C4-4E4D;
+      ))
     ))
 (define-char
   '((ideographic-radical . 175)        ; ⾮
@@ -306,42 +274,29 @@
     (=daikanwa         . 42610)        ; &I-M-42610;
     ))
 (define-char
-  '((=>ucs             . #x9761)       ; 靡
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 11)
-    (total-strokes      . 19)
-    (=jis-x0208                . #x7353)       ; &GT-57204;
-    (=ks-x1001         . #x5A3C)       ; &I-K0-5A3C;
-    (=big5             . #xC3FB)       ; &I-B-C3FB;
-    (=gt               . 57204)        ; &I-GT-57204;
-    (=gt-pj-1          . #x7353)       ; &I-GT-57204;
-    (=daikanwa         . 42612)        ; &I-M-42612;
-    (=ucs@jis          . #x9761)       ; &GT-57204;
-    ))
-(define-char
-  '((=>ucs             . #x9761)       ; 靡
-    (morohashi-daikanwa        42612 0 0)
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 11)
-    (total-strokes      . 19)
-    (=cns11643-1       . #x7948)       ; &C1-7948;
-    ))
-(define-char
-  '((=>ucs             . #x9761)       ; 靡
-    (morohashi-daikanwa        42612 0 1)
-    (ideographic-radical . 175)        ; ⾮
-    (ideographic-strokes . 11)
-    (total-strokes      . 19)
-    (=gt               . 57205)        ; &GT-57205;
-    (=gt-pj-11         . #x3235)       ; &GT-57205;
-    ))
-(define-char
-  '((morohashi-daikanwa        42612 0 2)
-    (ideographic-radical . 175)        ; ⾮
+  '((ideographic-radical . 175)        ; ⾮
     (ideographic-strokes . 11)
     (total-strokes      . 19)
     (=ucs              . #x9761)       ; 靡
-    (=gb2312           . #x4352)       ; &I-G0-4352;
+    (->subsumptive
+     ((=big5             . #xC3FB)     ; &B-C3FB;
+      (->subsumptive
+       ((=jis-x0208        . #x7353)   ; &GT-57204;
+       (=ks-x1001          . #x5A3C)   ; &I-K0-5A3C;
+       (=gt                . 57204)    ; &I-GT-57204;
+       (=gt-pj-1           . #x7353)   ; &I-GT-57204;
+       (=daikanwa          . 42612)    ; &I-M-42612;
+       (=ucs@jis           . #x9761)   ; &GT-57204;
+       )
+       ((=cns11643-1       . #x7948)   ; &C1-7948;
+       ))
+      )
+     ((=gt               . 57205)      ; &GT-57205;
+      (=gt-pj-11         . #x3235)     ; &GT-57205;
+      )
+     ((=gb2312           . #x4352)     ; &G0-4352;
+      (=ucs@unicode      . #x9761)     ; &G0-4352;
+      ))
     ))
 (define-char
   '((ideographic-radical . 175)        ; ⾮