Add some mappings between CNS 11643-6 and CJK Ext-B code points.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R001-One.el

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index a0d3836..05c0079 100644 (file)
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -2511,6 +2511,25 @@
 (define-char
   '((ideographic-radical@ucs . 1)      ; ⼀
     (ideographic-strokes@ucs . 11)
+    (ideographic-radical@daikanwa . 16)        ; ⼏
+    (ideographic-strokes@daikanwa . 10)
+    (total-strokes      . 12)
+    (hanyu-dazidian    1 26 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x4E00)     ; 一
+      )
+     ((=ucs              . #x51F0)     ; 凰
+      ))
+    (=ucs              . #x20049)      ; 𠁉
+    (=daikanwa         . 01795)        ; &I-M-01795;
+    (=hanziku-1                . #xA97C)       ; &I-HZK01-A97C;
+    ))
+(define-char
+  '((ideographic-radical@ucs . 1)      ; ⼀
+    (ideographic-strokes@ucs . 11)
     (ideographic-radical@cns . 30)     ; ⼝
     (ideographic-strokes@cns . 9)
     (ideographic-radical@cns*sources
@@ -2561,22 +2580,6 @@
   '((ideographic-radical . 1)  ; ⼀
     (ideographic-strokes . 11)
     (total-strokes      . 12)
-    (hanyu-dazidian    1 26 14)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs              . #x2FF1)     ; ⿱
-      )
-     ((=ucs              . #x4E00)     ; 一
-      )
-     ((=ucs              . #x51F0)     ; 凰
-      ))
-    (=ucs              . #x20049)      ; 𠁉
-    (=hanziku-1                . #xA97C)       ; &I-HZK01-A97C;
-    ))
-(define-char
-  '((ideographic-radical . 1)  ; ⼀
-    (ideographic-strokes . 11)
-    (total-strokes      . 12)
     (hanyu-dazidian    8 7 7)
     (=ucs              . #x2004A)      ; 𠁊
     (=big5-cdp         . #x8566)       ; &I-CDP-8566;