(U+4014): Use `->subsumptive'.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R167-Gold.el

diff --git a/lisp/utf-2000/Ideograph-R167-Gold.el b/lisp/utf-2000/Ideograph-R167-Gold.el
index 80c1db6..b5b840a 100644 (file)
--- a/lisp/utf-2000/Ideograph-R167-Gold.el
+++ b/lisp/utf-2000/Ideograph-R167-Gold.el
@@ -15,9 +15,29 @@
     (=daikanwa         . 40152)        ; &I-M-40152;
     ))
 (define-char
+  '((name              . "CJK RADICAL C-SIMPLIFIED GOLD")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (<-denotational
+     ((=ucs              . #x9485)     ; 钅
+      ))
+    (<-ideographic-component-forms
+     ((=ucs              . #x91D1)     ; 金
+      ))
+    (<-radical
+     ((=ucs              . #x9485)     ; 钅
+      ))
+    (=ucs              . #x2ED0)       ; ⻐
+    (=big5-cdp         . #x895A)       ; &I-CDP-895A;
+    ))
+(define-char
   '((ideographic-radical . 167)        ; ⾦
     (ideographic-strokes . 0)
     (total-strokes      . 8)
+    (<-ideographic-component-forms
+     ((=ucs              . #x91D1)     ; 金
+      ))
     (=ucs              . #x91D2)       ; 釒
     (=gb12345          . #x6E44)       ; 釒 [78-36]
     ))
@@ -25,9 +45,27 @@
   '((ideographic-radical . 167)        ; ⾦
     (ideographic-strokes . 0)
     (total-strokes      . 5)
+    (<-ideographic-component-forms
+     ((=ucs              . #x91D1)     ; 金
+      ))
+    (<-simplified@CN
+     ((=ucs              . #x91D2)     ; 釒
+      (=gb12345                  . #x6E44)     ; 釒 [78-36]
+      ))
     (=ucs              . #x9485)       ; 钅
     (=gb2312           . #x6E44)       ; &I-G0-6E44; [78-36]
-    (=big5-cdp         . #x895A)       ; &I-CDP-895A;
+    ))
+(define-char
+  '((ideographic-radical . 167)        ; ⾦
+    (ideographic-strokes . 0)
+    (total-strokes      . 6)
+    (<-ideographic-component-forms
+     ((=ucs              . #x91D1)     ; 金
+      ))
+    (<-simplified@component
+     ((=ucs              . #x91D1)     ; 金
+      ))
+    (=big5-cdp         . #x8DE3)       ; &CDP-8DE3;
     ))
 (define-char
   '((ideographic-radical . 167)        ; ⾦
@@ -6575,6 +6613,13 @@
   '((ideographic-radical . 167)        ; ⾦
     (ideographic-strokes . 8)
     (total-strokes      . 16)
+    (=ucs              . #x9FAC)       ; 龬
+    (=cbeta            . 02156)        ; &I-CB02156;
+    ))
+(define-char
+  '((ideographic-radical . 167)        ; ⾦
+    (ideographic-strokes . 8)
+    (total-strokes      . 16)
     (=ucs              . #x289FE)      ; 𨧾
     (->subsumptive
      ((=ucs@iso                  . #x289FE)    ; &UU+289FE;