(IU+204F7): Use UU+723D instead of U+723D as a component.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R015-Ice.el

diff --git a/lisp/utf-2000/Ideograph-R015-Ice.el b/lisp/utf-2000/Ideograph-R015-Ice.el
index e2970f2..90a3f5c 100644 (file)
--- a/lisp/utf-2000/Ideograph-R015-Ice.el
+++ b/lisp/utf-2000/Ideograph-R015-Ice.el
@@ -1,6 +1,9 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
-  '((ideographic-radical . 15) ; ⼎
+  '((<-denotational@component
+     ((=>ucs@component   . #x21FE8)    ; &A-compU+21FE8;
+      ))
+    (ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 0)
     (total-strokes      . 2)
     (=>iwds-1*note     "47+219")
@@ -2293,6 +2296,36 @@
     ))
 (define-char
   '((ideographic-radical . 15) ; ⼎
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=big5-cdp         . #x8679)     ; &CDP-8679;
+      )
+     ((=>ucs@iwds-1      . #x4ED2)     ; &A-IWDSU+4ED2;
+      ))
+    (=ucs              . #x205C0)      ; 𠗀
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x205C0)    ; 𠗀
+      ))
+    (ideographic-radical . 15) ; ⼎
+    (ideographic-strokes . 6)
+    (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=big5-cdp         . #x8679)     ; &CDP-8679;
+      )
+     ((=ucs@unicode      . #x4ED2)     ; &CDP-8BAC;
+      (=gb12345                  . #x7D73)     ; &CDP-8BAC; [93-83]
+      ))
+    (=ucs@iso          . #x205C0)      ; &U-000205C0;
+    ))
+(define-char
+  '((ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 7)
     (total-strokes      . 9)
     (hanyu-dazidian    1 297 16)