(U-00020022): Use `->subsumptive'.

(U+4E23): Use `<-ancient*sources' instead of char-ref in `<-ancient';
use `->mistakable' for M-11708.
(C6-2936): Use `<-denotational' for U+4E3D.

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index caf5965..fcb80dd 100644 (file)
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -1631,50 +1631,53 @@
     (=gt-pj-11         . #x4B6C)       ; &GT-00060; [43-76]
     ))
 (define-char
-  '((=>ucs             . #x20022)      ; 𠀢
-    (ideographic-radical . 1)  ; ⼀
-    (ideographic-strokes . 6)
-    (total-strokes      . 7)
-    (hanyu-dazidian    1 19 12)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs              . #x2FF1)     ; ⿱
-      )
-     ((=ucs              . #x4E00)     ; 一
-      )
-     ((=ucs              . #x6B64)     ; 此
-      ))
-    (=gt               . 00070)        ; &GT-00070;
-    (=gt-pj-2          . #x3040)       ; &GT-00070; [16-32]
-    (=daikanwa         . 00047)        ; &I-M-00047;
-    (=hanziku-1                . #xA7F6)       ; &I-HZK01-A7F6;
-    ))
-(define-char
-  '((morohashi-daikanwa        47 0 1)
-    (ideographic-radical . 1)  ; ⼀
+  '((ideographic-radical . 1)  ; ⼀
     (ideographic-strokes . 6)
     (total-strokes      . 7)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs              . #x2FF1)     ; ⿱
-      )
-     ((=ucs              . #x4E00)     ; 一
+    (=ucs              . #x20022)      ; 𠀢
+    (->subsumptive
+     ((hanyu-dazidian    1 19 12)
+      (ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+       (=ucs               . #x2FF1)   ; ⿱
+       )
+       ((=ucs              . #x4E00)   ; 一
+       )
+       ((=jis-x0208        . #x3A21)   ; &GT-20888; [26-01]
+       (=gb2312            . #x344B)   ; &I-G0-344B; [20-43]
+       (=ks-x1001          . #x732E)   ; &I-K0-732E; [83-14]
+       (=daikanwa          . 16259)    ; &I-M-16259;
+       ))
+      (=gt               . 00070)      ; &GT-00070;
+      (=gt-pj-2                  . #x3040)     ; &GT-00070; [16-32]
+      (=daikanwa         . 00047)      ; &I-M-00047;
+      (=hanziku-1        . #xA7F6)     ; &I-HZK01-A7F6;
       )
-     ((=cns11643-1       . #x483A)     ; &C1-483A; [40-26]
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+       (=ucs               . #x2FF1)   ; ⿱
+       )
+       ((=ucs              . #x4E00)   ; 一
+       )
+       ((=cns11643-1       . #x483A)   ; &C1-483A; [40-26]
+       ))
+      (=cns11643-5       . #x232F)     ; &C5-232F; [03-15]
+      (=ucs@iso                  . #x20022)    ; &C5-232F;
       ))
-    (=ucs              . #x20022)      ; 𠀢
-    (=cns11643-5       . #x232F)       ; &I-C5-232F; [03-15]
     ))
 (define-char
   '((ideographic-radical . 1)  ; ⼀
     (ideographic-strokes . 6)
     (total-strokes      . 7)
+    (->mistakable
+     ((=daikanwa         . 11708)      ; &I-M-11708;
+      ))
     (<-ancient
-     (:sources (morohashi-daikanwa)
-      :char    ((=daikanwa          . 39763)   ; &I-M-39763;
-                )
+     ((=ucs              . #x9149)     ; 酉
+      (=daikanwa         . 39763)      ; &I-M-39763;
       ))
-    (comment           . "M-11708 is different character.")
+    (<-ancient*sources
+     daikanwa)
     (hanyu-dazidian    1 21 6)
     (=ucs              . #x4E23)       ; 丣
     (=jis-x0212                . #x3027)       ; &I-JSP-3027; [16-07]
@@ -1973,8 +1976,23 @@
     (=hanziku-1                . #xA950)       ; &I-HZK01-A950;
     ))
 (define-char
-  '((=>ucs             . #x4E3D)       ; 丽
-    (ideographic-radical . 1)  ; ⼀
+  '((ideographic-radical@daikanwa . 3) ; ⼂
+    (ideographic-strokes@daikanwa . 7)
+    (total-strokes@daikanwa      . 8)
+    (ideographic-radical@daikanwa*sources
+     daikanwa gt)
+    (ideographic-radical@cns . 1)      ; ⼀
+    (ideographic-strokes@cns . 7)
+    (total-strokes@cns      . 8)
+    (ideographic-radical@cns*sources
+     cns11643)
+    (ideographic-radical@unicode . 3)
+    (ideographic-strokes@unicode . 6)
+    (total-strokes@unicode . 7)
+    (=ucs              . #x4E3D)       ; 丽
+    ))
+(define-char
+  '((ideographic-radical . 1)  ; ⼀
     (ideographic-strokes . 7)
     (total-strokes      . 8)
     (->same
@@ -1982,10 +2000,16 @@
       (=daikanwa         . 00104)      ; &I-M-00104;
       ))
     (<-ancient
-     ((=daikanwa         . 47663)      ; &I-M-47663;
+     ((=jis-x0208-1978   . #x4E6F)     ; &GT-64844; [46-79]
+      (=jis-x0208-1983   . #x4E6F)     ; &I-J83-4E6F; [46-79]
+      (=ks-x1001         . #x5572)     ; &I-K0-5572; [53-82]
+      (=daikanwa         . 47663)      ; &I-M-47663;
       ))
     (<-ancient*sources
      daikanwa)
+    (<-denotational
+     ((=ucs              . #x4E3D)     ; 丽
+      ))
     (=cns11643-6       . #x2936)       ; &GT-00087; [09-22]
     (=gt               . 00087)        ; &I-GT-00087;
     (=gt-pj-2          . #x304B)       ; &I-GT-00087; [16-43]
@@ -2012,22 +2036,6 @@
 (define-char
   '((ideographic-radical@daikanwa . 3) ; ⼂
     (ideographic-strokes@daikanwa . 7)
-    (total-strokes@daikanwa      . 8)
-    (ideographic-radical@daikanwa*sources
-     daikanwa gt)
-    (ideographic-radical@cns . 1)      ; ⼀
-    (ideographic-strokes@cns . 7)
-    (total-strokes@cns      . 8)
-    (ideographic-radical@cns*sources
-     cns11643)
-    (ideographic-radical@unicode . 3)
-    (ideographic-strokes@unicode . 6)
-    (total-strokes@unicode . 7)
-    (=ucs              . #x4E3D)       ; 丽
-    ))
-(define-char
-  '((ideographic-radical@daikanwa . 3) ; ⼂
-    (ideographic-strokes@daikanwa . 7)
     (ideographic-radical@daikanwa*sources
      daikanwa gt)
     (ideographic-radical@cns . 1)      ; ⼀
@@ -2040,7 +2048,10 @@
       (=daikanwa         . 00059)      ; &I-M-00059;
       ))
     (<-ancient
-     ((=daikanwa         . 47663)      ; &I-M-47663;
+     ((=jis-x0208-1978   . #x4E6F)     ; &GT-64844; [46-79]
+      (=jis-x0208-1983   . #x4E6F)     ; &I-J83-4E6F; [46-79]
+      (=ks-x1001         . #x5572)     ; &I-K0-5572; [53-82]
+      (=daikanwa         . 47663)      ; &I-M-47663;
       ))
     (<-ancient*sources
      daikanwa)