(C2-2473): Add CU+8034.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R128-Ear.el

diff --git a/lisp/utf-2000/Ideograph-R128-Ear.el b/lisp/utf-2000/Ideograph-R128-Ear.el
index 599becb..e43d773 100644 (file)
--- a/lisp/utf-2000/Ideograph-R128-Ear.el
+++ b/lisp/utf-2000/Ideograph-R128-Ear.el
@@ -55,6 +55,7 @@
       (=gt-k             . 02775)      ; &I-GT-K02775;
       (=gt-pj-6                  . #x3662)     ; &I-GT-37567; [22-66]
       (=daikanwa         . 29001)      ; &I-M-29001;
+      (=ucs@cns                  . #x8034)     ; &GT-37567;
       (=ucs@jis                  . #x8034)     ; &GT-37567;
       )
      ((=gt               . 00250)      ; &GT-00250;
@@ -1538,7 +1539,16 @@
     (total-strokes      . 14)
     (=ucs              . #x805F)       ; 聟
     (->subsumptive
-     ((=gt               . 37686)      ; &GT-37686;
+     ((<-vulgar
+       ((shinjigen-1       . 1704)
+       (=jis-x0208         . #x5466)   ; &GT-07170; [52-70]
+       (=ks-x1001          . #x5F6B)   ; &I-K0-5F6B; [63-75]
+       (=daikanwa          . 05664)    ; &I-M-05664;
+       ))
+      (<-vulgar*sources
+       goonruiju daikanwa shinjigen-1)
+      (shinjigen-1       . 1705)
+      (=gt               . 37686)      ; &GT-37686;
       (=gt-pj-1                  . #x665D)     ; &GT-37686; [70-61]
       (=daikanwa         . 29106)      ; &I-M-29106;
       )
@@ -1550,7 +1560,8 @@
       (=jis-x0208@1983   . #x665D)     ; &I-J83-665D; [70-61]
       (=ucs@unicode      . #x805F)     ; &J83-665D;
       )
-     ((=cns11643-3       . #x4926)     ; &C3-4926; [41-06]
+     ((=cns11643-3       . #x4926)     ; &CB00414; [41-06]
+      (=cbeta            . 00414)      ; &I-CB00414;
       ))
     ))
 (define-char