(U+4E03): Unify abstract glyph of J0-3C37.

(U+4E0E): Unify abstract J0-4D3F.
(abstract glyph of GT-00023): Add `=>>ucs@unicode'.
(J0-4D3F): Add `=>>ucs@jis'.
(J0-312F): Ditto.
(U+4E17): Unify abstract J0-5242; use `->denotational' instead of
`->subsumptive'.
(J0-5242): Add `=>>ucs@unicode'.
(U+4E19): Add abstract ideographic-structure; unify abstract glyph of
J0-4A3A.
(J0-4A3A): Modify `ideographic-structure'.
(S-0028): Add `ideographic-structure'.

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index a90b4e3..c08a9d2 100644 (file)
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -131,13 +131,14 @@
     (sound@ja/kun      "nana" "nana-tu")
     (sound@ja/on/go    "siti")
     (=ucs              . #x4E03)       ; 七
+    (=>>jis-x0208      . #x3C37)       ; 七 [28-23]
+    (=big5             . #xA443)       ; &I-B-A443;
     (->subsumptive
      ((=ucs@unicode      . #x4E03)     ; &GT-00004;
       (=jis-x0208        . #x3C37)     ; &GT-00004; [28-23]
       (=gb2312           . #x465F)     ; &I-G0-465F; [38-63]
       (=ks-x1001         . #x7652)     ; &I-K0-7652; [86-50]
       (=jis-x0213-1      . #x3C37)     ; &I-JX1-3C37; [28-23]
-      (=big5             . #xA443)     ; &I-B-A443;
       (=big5-cdp         . #x88ED)     ; &I-CDP-88ED;
       (=gt               . 00004)      ; &I-GT-00004;
       (=gt-k             . 00046)      ; &I-GT-K00046;
@@ -503,6 +504,8 @@
     (sound@ja/kun      "ata-H+eru" "kumi+suru" "azuka+r5")
     (sound@ja/on       "yo")
     (=ucs              . #x4E0E)       ; 与
+    (=>jis-x0208       . #x4D3F)       ; 与 [45-31]
+    (=>jis-x0213-1     . #x4D3F)       ; 与 [45-31]
     (<-simplified@ucs
      ((=ucs              . #x8207)     ; 與
       ))
@@ -521,7 +524,7 @@
     (ideographic-strokes@gt . 2)
     (total-strokes@gt      . 3)
     (hanyu-dazidian    1 5 3)
-    (=ucs@big5         . #x4E0E)       ; &G-GT-00023;
+    (=>>ucs@unicode    . #x4E0E)       ; &G-GT-00023;
     (=big5             . #xC94F)       ; &G-GT-00023;
     (=>>gt             . 00023)        ; &G-GT-00023;
     (->subsumptive
@@ -562,6 +565,7 @@
     (ideographic-radical . 1)  ; ⼀
     (ideographic-strokes . 2)
     (total-strokes      . 3)
+    (=>>ucs@jis                . #x4E0E)       ; &GT-00024;
     (=ucs@jis          . #x4E0E)       ; &GT-00024;
     (=jis-x0208                . #x4D3F)       ; &GT-00024; [45-31]
     (=jis-x0213-1      . #x4D3F)       ; &I-JX1-4D3F; [45-31]
@@ -629,6 +633,7 @@
     (ideographic-radical . 1)  ; ⼀
     (ideographic-strokes . 3)
     (total-strokes      . 4)
+    (=>>ucs@jis                . #x4E11)       ; &GT-00033;
     (=ucs@jis          . #x4E11)       ; &GT-00033;
     (=jis-x0208                . #x312F)       ; &GT-00033; [17-15]
     (=ks-x1001         . #x7564)       ; &I-K0-7564; [85-68]
@@ -652,7 +657,7 @@
     (=big5-cdp         . #x89D2)       ; &I-CDP-89D2;
     (=gt               . 00035)        ; &I-GT-00035;
     (=gt-pj-9          . #x4B23)       ; &I-GT-00035; [43-03]
-    (=shinjigen@1ed    .  0017)        ; &GT-00035;
+    (=shinjigen                .  0017)        ; &GT-00035;
     (<-simplified@CN
      ((=ucs@unicode      . #x919C)     ; &UU+919C;
       (=gb12345                  . #x3373)     ; &UU+919C; [19-83]
@@ -667,7 +672,7 @@
       (=shinjigen        .  0016)      ; &GT-00033;
       ))
     (<-vulgar*sources
-     shinjigen@1ed)
+     shinjigen)
     ))
 (define-char
   '((ideographic-radical . 1)  ; ⼀
@@ -1074,33 +1079,56 @@
     (sound@ja/on/go    "se")
     (sound@ja/on/kan   "sei")
     (=ucs              . #x4E17)       ; 丗
-    (->subsumptive
-     ((=gt               . 00047)      ; &GT-00047;
-      (=gt-k             . 00962)      ; &I-GT-K00962;
-      (=gt-pj-2                  . #x3034)     ; &GT-00047; [16-20]
-      (=daikanwa         . 00032)      ; &I-M-00032;
-      )
-     ((hanyu-dazidian    1 14 5)
-      (=ucs@unicode      . #x4E17)     ; &GT-00048;
-      (=jis-x0208        . #x5242)     ; &GT-00048; [50-34]
-      (=jis-x0213-1      . #x5242)     ; &I-JX1-5242; [50-34]
-      (=big5-cdp         . #x89D8)     ; &I-CDP-89D8;
-      (=gt               . 00048)      ; &I-GT-00048;
-      (=gt-k             . 01035)      ; &I-GT-K01035;
-      (=gt-pj-1                  . #x5242)     ; &I-GT-00048; [50-34]
-      (=shinjigen        .  0024)      ; &GT-00048;
+    (=>jis-x0208       . #x5242)       ; 丗 [50-34]
+    (=>jis-x0213-1     . #x5242)       ; 丗 [50-34]
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x4E17)     ; 丗
+      ))
+    (ideographic-radical . 1)  ; ⼀
+    (ideographic-strokes . 4)
+    (total-strokes      . 5)
+    (=gt               . 00047)        ; &GT-00047;
+    (=gt-k             . 00962)        ; &I-GT-K00962;
+    (=gt-pj-2          . #x3034)       ; &GT-00047; [16-20]
+    (=daikanwa         . 00032)        ; &I-M-00032;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x4E17)     ; 丗
+      ))
+    (ideographic-radical . 1)  ; ⼀
+    (ideographic-strokes . 4)
+    (total-strokes      . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-       (=ucs               . #x2FF1)   ; ⿱
-       )
-       ((=big5-cdp         . #x89D7)   ; &CDP-89D7;
-       )
-       ((=ucs              . #x4E00)   ; 一
-       ))
-      (=ucs@cns                  . #x4E17)     ; &C4-2155;
-      (=cns11643-4       . #x2155)     ; &C4-2155; [01-53]
+     ((=big5-cdp         . #x89D7)     ; &CDP-89D7;
+      )
+     ((=ucs              . #x4E00)     ; 一
+      ))
+    (=ucs@cns          . #x4E17)       ; &C4-2155;
+    (=cns11643-4       . #x2155)       ; &C4-2155; [01-53]
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x4E17)     ; 丗
       ))
+    (ideographic-radical . 1)  ; ⼀
+    (ideographic-strokes . 4)
+    (total-strokes      . 5)
+    (hanyu-dazidian    1 14 5)
+    (=>>ucs@unicode    . #x4E17)       ; &GT-00048;
+    (=ucs@unicode      . #x4E17)       ; &GT-00048;
+    (=jis-x0208                . #x5242)       ; &GT-00048; [50-34]
+    (=jis-x0213-1      . #x5242)       ; &I-JX1-5242; [50-34]
+    (=big5-cdp         . #x89D8)       ; &I-CDP-89D8;
+    (=gt               . 00048)        ; &I-GT-00048;
+    (=gt-k             . 01035)        ; &I-GT-K01035;
+    (=gt-pj-1          . #x5242)       ; &I-GT-00048; [50-34]
+    (=shinjigen                .  0024)        ; &GT-00048;
     ))
 (define-char
   '((ideographic-radical . 1)  ; ⼀
@@ -1148,9 +1176,18 @@
     (ideographic-strokes . 4)
     (total-strokes      . 5)
     (hanyu-dazidian    1 16 3)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x4E00)     ; 一
+      )
+     ((=ucs              . #x5185)     ; 内
+      ))
     (sound@ja/kun      "hinoe")
     (sound@ja/on/kan   "hei")
     (=ucs              . #x4E19)       ; 丙
+    (=>>jis-x0208      . #x4A3A)       ; 丙 [42-26]
     (->subsumptive
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
@@ -1158,7 +1195,10 @@
        )
        ((=ucs              . #x4E00)   ; 一
        )
-       ((=ucs              . #x5185)   ; 内
+       ((=ucs@unicode      . #x5185)   ; &GT-01983;
+       (=jis-x0208         . #x4662)   ; &GT-01983; [38-66]
+       (=gb2312            . #x445A)   ; &I-G0-445A; [36-58]
+       (=jis-x0213-1       . #x4662)   ; &I-JX1-4662; [38-66]
        ))
       (=ucs@unicode      . #x4E19)     ; &GT-00051;
       (=jis-x0208        . #x4A3A)     ; &GT-00051; [42-26]
@@ -1173,7 +1213,15 @@
       (=daikanwa         . 00035)      ; &I-M-00035;
       (=shinjigen        .  0027)      ; &GT-00051;
       )
-     ((=shinjigen        .  0028)      ; &JC3-41A2;
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+       (=ucs               . #x2FF1)   ; ⿱
+       )
+       ((=ucs              . #x4E00)   ; 一
+       )
+       ((=ucs              . #x2F814)  ; 內
+       ))
+      (=shinjigen        .  0028)      ; &JC3-41A2;
       (=jef-china3       . #x41A2)     ; &JC3-41A2;
       ))
     ))