Add mappings between CNS 11643-4 and CJK Compatibility Ideographs

Supplement of UCS.

diff --git a/lisp/utf-2000/Ideograph-R009-Man.el b/lisp/utf-2000/Ideograph-R009-Man.el
index 5fa09d8..696198f 100644 (file)
--- a/lisp/utf-2000/Ideograph-R009-Man.el
+++ b/lisp/utf-2000/Ideograph-R009-Man.el
@@ -8031,16 +8031,26 @@
     (ucs               . #x4FA2)       ; 侢
     ))
 (define-char
-  '((=>ucs             . #x4FAE)       ; 侮
-    (morohashi-daikanwa        629 1)
+  '((morohashi-daikanwa        629 1)
     (ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 6)
     (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (ucs               . #x2FF0)     ; ⿰
+      )
+     ((ucs               . #x4EBB)     ; 亻
+      )
+     ((=jis-x0208        . #x5D59)     ; �����
+      (korean-ksc5601    . #x596C)     ; �����
+      (ideograph-daikanwa . 16721)     ; �����
+      ))
     (shinjigen-1       . 233)
     (shinjigen-2       . 233)
     (=jis-x0208                . #x496E)       ; �����
     (chinese-cns11643-4 . #x253D)      ; �����
-    (ucs-jis           . #x4FAE)       ; �����
+    (ucs-jis           . #x4FAE)       ; 侮
+    (ucs               . #x2F805)      ; 侮
     ))
 (define-char
   '((ideographic-radical . 9)  ; ⼈
@@ -21621,7 +21631,7 @@
     (ideograph-daikanwa . 01076)       ; �����
     ))
 (define-char
-  '((=>ucs             . #x50E7)       ; 僧
+  '((=>ucs*            . #x50E7)       ; 僧
     (morohashi-daikanwa        1076 0 2)
     (ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 11)
@@ -21630,7 +21640,8 @@
     (shinjigen-2       . 381)
     (=jis-x0208                . #x414E)       ; �����
     (chinese-cns11643-4 . #x3C30)      ; �����
-    (ucs-jis           . #x50E7)       ; �����
+    (ucs-jis           . #x50E7)       ; 僧
+    (ucs               . #x2F80A)      ; 僧
     ))
 (define-char
   '((ideographic-radical . 9)  ; ⼈
@@ -22766,6 +22777,7 @@
     (shinjigen-2       . 382)
     (korean-ksc5601            . #x632C)       ; �����
     (japanese-jisx0213-1       . #x2E49)       ; �����
+    (chinese-big5              . #xB9AC)       ; ������
     (ideograph-daikanwa                . 01117)        ; �����
     (china3-jef                        . #x43B7)       ; �����
     ))
@@ -22786,7 +22798,6 @@
     (chinese-gb2312    . #x492E)       ; �����
     (chinese-isoir165  . #x492E)       ; �����
     (chinese-cns11643-1 . #x6772)      ; �����
-    (chinese-big5      . #xB9AC)       ; ������
     (ucs               . #x50E7)       ; 僧
     ))
 (define-char

diff --git a/lisp/utf-2000/Ideograph-R032-Earth.el b/lisp/utf-2000/Ideograph-R032-Earth.el
index eee9180..2b0d8a1 100644 (file)
--- a/lisp/utf-2000/Ideograph-R032-Earth.el
+++ b/lisp/utf-2000/Ideograph-R032-Earth.el
@@ -6183,21 +6183,22 @@
     (ucs               . #x5831)       ; 報
     ))
 (define-char
-  '((=>ucs             . #x5832)       ; 堲
+  '((=>ucs             . #x2F856)      ; 堲
     (ideographic-radical . 32) ; ⼟
     (ideographic-strokes . 9)
     (total-strokes      . 12)
-    (japanese-jisx0212 . #x382A)       ; �����
-    (ideograph-daikanwa . 05276)       ; �����
+    (japanese-jisx0212         . #x382A)       ; �����
+    (japanese-jisx0213-2       . #x2523)       ; �����
+    (ideograph-daikanwa                . 05276)        ; �����
+    (ucs-jis                   . #x5832)       ; �����
     ))
 (define-char
-  '((=>ucs             . #x5832)       ; 堲
-    (morohashi-daikanwa        5276 0 1)
+  '((morohashi-daikanwa        5276 0 1)
     (ideographic-radical . 32) ; ⼟
     (ideographic-strokes . 9)
     (total-strokes      . 12)
-    (chinese-cns11643-4                . #x3676)       ; �����
-    (japanese-jisx0213-2       . #x2523)       ; �����
+    (chinese-cns11643-4 . #x3676)      ; �����
+    (ucs               . #x2F856)      ; 堲
     ))
 (define-char
   '((morohashi-daikanwa        5276 0 3)

diff --git a/lisp/utf-2000/Ideograph-R045-Sprout.el b/lisp/utf-2000/Ideograph-R045-Sprout.el
index 6b28299..b999e7c 100644 (file)
--- a/lisp/utf-2000/Ideograph-R045-Sprout.el
+++ b/lisp/utf-2000/Ideograph-R045-Sprout.el
@@ -11,20 +11,19 @@
     (ucs                       . #x5C6E)       ; 屮
     ))
 (define-char
-  '((=>ucs             . #x5C6E)       ; 屮
-    (ideographic-radical . 45) ; ⼬
+  '((ideographic-radical . 45) ; ⼬
     (ideographic-strokes . 0)
     (total-strokes      . 3)
     (->synonyms
-     (:sources (shuowen morohashi-daikanwa)
-      :char    ((ideograph-daikanwa . 08720)   ; �����
+     (:char    ((ideograph-daikanwa . 08720)   ; �����
                 )
-      ))
+      :sources (shuowen morohashi-daikanwa)))
     (comment           . "M-07825 is a different char.")
     (=jis-x0208                . #x5625)       ; �����
     (chinese-cns11643-4 . #x2135)      ; �����
     (ideograph-daikanwa . 07826)       ; �����
-    (ucs-jis           . #x5C6E)       ; �����
+    (ucs-jis           . #x5C6E)       ; 屮
+    (ucs               . #x2F878)      ; 屮
     ))
 (define-char
   '((ideographic-radical . 45) ; ⼬