Add mappings between CNS 11643-4 and CJK Compatibility Ideographs

Supplement of UCS.

diff --git a/lisp/utf-2000/Ideograph-R196-Bird.el b/lisp/utf-2000/Ideograph-R196-Bird.el
index 1bfde27..2ea1243 100644 (file)
--- a/lisp/utf-2000/Ideograph-R196-Bird.el
+++ b/lisp/utf-2000/Ideograph-R196-Bird.el
@@ -2145,13 +2145,21 @@
     (ucs               . #x4CCE)       ; 䳎
     ))
 (define-char
-  '((ideographic-radical . 196)        ; ⿃
+  '((=>ucs             . #x2FA0C)      ; 鳽
+    (ideographic-radical . 196)        ; ⿃
     (ideographic-strokes . 6)
     (total-strokes      . 17)
-    (chinese-cns11643-4 . #x5A59)      ; �����
     (ideograph-daikanwa . 46863)       ; �����
     ))
 (define-char
+  '((morohashi-daikanwa        46863 0 1)
+    (ideographic-radical . 196)        ; ⿃
+    (ideographic-strokes . 6)
+    (total-strokes      . 17)
+    (chinese-cns11643-4 . #x5A59)      ; �����
+    (ucs               . #x2FA0C)      ; 鳽
+    ))
+(define-char
   '((ideographic-radical . 196)        ; ⿃
     (ideographic-strokes . 6)
     (total-strokes      . 17)
@@ -3323,12 +3331,6 @@
     ))
 (define-char
   '((ideographic-radical . 196)        ; ⿃
-    (ideographic-strokes . 7)
-    (total-strokes      . 18)
-    (chinese-cns11643-4 . #x5F37)      ; �����
-    ))
-(define-char
-  '((ideographic-radical . 196)        ; ⿃
     (ideographic-strokes . 8)
     (total-strokes      . 19)
     (chinese-cns11643-7 . #x4C5D)      ; �����
@@ -3414,18 +3416,13 @@
     (ucs               . #x4CDD)       ; 䳝
     ))
 (define-char
-  '((=>ucs             . #x9D67)       ; 鵧
-    (ideographic-radical . 196)        ; ⿃
-    (ideographic-strokes . 8)
-    (total-strokes      . 19)
-    (ideograph-daikanwa . 46995)       ; �����
-    ))
-(define-char
-  '((morohashi-daikanwa        46995 0 1)
+  '((=>ucs*            . #x9D67)       ; 鵧
     (ideographic-radical . 196)        ; ⿃
     (ideographic-strokes . 8)
     (total-strokes      . 19)
     (chinese-cns11643-4 . #x626E)      ; �����
+    (ideograph-daikanwa . 46995)       ; �����
+    (ucs               . #x2FA0F)      ; 鵧
     ))
 (define-char
   '((morohashi-daikanwa        46995 0 2)
@@ -4572,11 +4569,40 @@
     (ucs               . #x9D9C)       ; 鶜
     ))
 (define-char
-  '((ideographic-radical . 196)        ; ⿃
+  '((=>ucs             . #x4CED)       ; 䳭
+    (ideographic-radical . 196)        ; ⿃
     (ideographic-strokes . 9)
     (total-strokes      . 20)
-    (chinese-cns11643-7 . #x5242)      ; �����
     (ideograph-daikanwa . 47115)       ; �����
+    ))
+(define-char
+  '((=>ucs             . #x4CED)       ; 䳭
+    (morohashi-daikanwa        47115 0 0)
+    (ideographic-radical . 196)        ; ⿃
+    (ideographic-strokes . 9)
+    (total-strokes      . 20)
+    (chinese-cns11643-7 . #x5242)      ; �����
+    (ucs-cns           . #x4CED)       ; �����
+    ))
+(define-char
+  '((=>ucs*            . #x4CED)       ; 䳭
+    (morohashi-daikanwa        47115 0 4)
+    (ideographic-radical . 196)        ; ⿃
+    (ideographic-strokes . 7)
+    (total-strokes      . 18)
+    (chinese-cns11643-4 . #x5F37)      ; �����
+    (ucs-gb            . #x4CED)       ; 䳭
+    (ucs               . #x2FA0E)      ; 䳭
+    ))
+(define-char
+  '((=>ucs-cns         . #x2FA0E)      ; 䳭
+    (morohashi-daikanwa        47115 0 5)
+    (ideographic-radical . 196)        ; ⿃
+    (ideographic-strokes . 9)
+    (total-strokes      . 20)
+    (->same-ideograph
+     ((ucs               . #x2FA0E)    ; 䳭
+      ))
     (ucs               . #x4CED)       ; 䳭
     ))
 (define-char

diff --git a/lisp/utf-2000/Ideograph-R209-Nose.el b/lisp/utf-2000/Ideograph-R209-Nose.el
index 0d815cb..638e2f8 100644 (file)
--- a/lisp/utf-2000/Ideograph-R209-Nose.el
+++ b/lisp/utf-2000/Ideograph-R209-Nose.el
@@ -9,7 +9,7 @@
     (ucs               . #x9F3B)       ; 鼻
     ))
 (define-char
-  '((=>ucs             . #x9F3B)       ; 鼻
+  '((=>ucs*            . #x9F3B)       ; 鼻
     (morohashi-daikanwa        48498 1)
     (ideographic-radical . 209)        ; ⿐
     (ideographic-strokes . 0)
@@ -17,7 +17,9 @@
     (=jis-x0208                . #x4921)       ; �����
     (korean-ksc5601    . #x5E2C)       ; �����
     (chinese-cns11643-4 . #x4877)      ; �����
-    (ucs-jis           . #x9F3B)       ; �����
+    (ucs-jis           . #x9F3B)       ; 鼻
+    (ucs-ks            . #x9F3B)       ; 鼻
+    (ucs               . #x2FA1C)      ; 鼻
     ))
 (define-char
   '((ideographic-radical . 209)        ; ⿐