From 355d529b6891725caaaf0b02d12cf7198c577605 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Thu, 28 Nov 2002 10:08:29 +0000
Subject: [PATCH] Add mappings between CNS 11643-4 and CJK Compatibility
 Ideographs Supplement of UCS.

---
 lisp/utf-2000/Ideograph-R142-Insect.el         |   54 +++++++++++++++++++++---
 lisp/utf-2000/Ideograph-R144-Walk-Enclosure.el |   19 +++++++--
 2 files changed, 62 insertions(+), 11 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R142-Insect.el b/lisp/utf-2000/Ideograph-R142-Insect.el
index de776df..f51c5f1 100644
--- a/lisp/utf-2000/Ideograph-R142-Insect.el
+++ b/lisp/utf-2000/Ideograph-R142-Insect.el
@@ -2223,20 +2223,23 @@
     (ucs		. #x86ED)	; 蛭
     ))
 (define-char
-  '((=>ucs		. #x8688)	; 蚈
+  '((=>ucs		. #x2F9B8)	; 蚈
     (ideographic-radical . 142)	; ⾍
     (ideographic-strokes . 6)
     (total-strokes	 . 12)
     (japanese-jisx0212	. #x5A6D)	; ø»‹¹Š
     (ideograph-daikanwa . 33049)	; ø¸ˆ„™
+    (ucs-jis		. #x8688)	; ø»‹¹Š
     ))
 (define-char
-  '((=>ucs		. #x8688)	; 蚈
+  '((=>ucs*		. #x8688)	; 蚈
+    (=>ucs-jis		. #x8688)	; ø»‹¹Š
     (morohashi-daikanwa	33049 0 1)
     (ideographic-radical . 142)	; ⾍
     (ideographic-strokes . 6)
     (total-strokes	 . 12)
     (chinese-cns11643-4 . #x3A75)	; ø»˜†ª
+    (ucs		. #x2F9B8)	; 蚈
     ))
 (define-char
   '((ideographic-radical . 142)	; ⾍
@@ -3659,13 +3662,21 @@
     (ideograph-daikanwa . 33197)	; ø¸ˆ†­
     ))
 (define-char
-  '((ideographic-radical . 142)	; ⾍
+  '((=>ucs		. #x2F9BA)	; 蛢
+    (ideographic-radical . 142)	; ⾍
     (ideographic-strokes . 8)
     (total-strokes	 . 14)
-    (chinese-cns11643-4 . #x467C)	; ø»˜˜™
     (ideograph-daikanwa . 33198)	; ø¸ˆ†®
     ))
 (define-char
+  '((morohashi-daikanwa	33198 0 0)
+    (ideographic-radical . 142)	; ⾍
+    (ideographic-strokes . 8)
+    (total-strokes	 . 14)
+    (chinese-cns11643-4 . #x467C)	; ø»˜˜™
+    (ucs		. #x2F9BA)	; 蛢
+    ))
+(define-char
   '((ideographic-radical . 142)	; ⾍
     (ideographic-strokes . 8)
     (total-strokes	 . 14)
@@ -5531,15 +5542,36 @@
     (ucs		. #x8792)	; 螒
     ))
 (define-char
-  '((ideographic-radical . 142)	; ⾍
+  '((=>ucs		. #x8779)	; 蝹
+    (ideographic-radical . 142)	; ⾍
     (ideographic-strokes . 10)
     (total-strokes	 . 16)
     (chinese-cns11643-2 . #x5A32)	; ø»” Ÿ
-    (chinese-cns11643-4 . #x4D33)	; ø»˜¡¢
     (ideograph-daikanwa . 33396)	; ø¸ˆ‰´
+    (ucs-cns		. #x8779)	; ø»” Ÿ
+    ))
+(define-char
+  '((=>ucs-cns		. #x2F9BB)	; 蝹
+    (morohashi-daikanwa	33396 0 4)
+    (ideographic-radical . 142)	; ⾍
+    (ideographic-strokes . 10)
+    (total-strokes	 . 16)
+    (->same-ideograph
+     ((ucs		  . #x2F9BB)	; 蝹
+      ))
     (ucs		. #x8779)	; 蝹
     ))
 (define-char
+  '((=>ucs*		. #x8779)	; 蝹
+    (morohashi-daikanwa	33396 0 5)
+    (ideographic-radical . 142)	; ⾍
+    (ideographic-strokes . 10)
+    (total-strokes	 . 16)
+    (chinese-cns11643-4 . #x4D33)	; ø»˜¡¢
+    (ucs-gb		. #x8779)	; 蝹
+    (ucs		. #x2F9BB)	; 蝹
+    ))
+(define-char
   '((ideographic-radical . 142)	; ⾍
     (ideographic-strokes . 10)
     (total-strokes	 . 16)
@@ -8765,6 +8797,12 @@
     ))
 (define-char
   '((ideographic-radical . 142)	; ⾍
+    (ideographic-strokes . 13)
+    (total-strokes	 . 19)
+    (ucs		. #x45F9)	; 䗹
+    ))
+(define-char
+  '((ideographic-radical . 142)	; ⾍
     (ideographic-strokes . 14)
     (total-strokes	 . 20)
     (chinese-cns11643-5 . #x6D4B)	; ø»›š¾
@@ -9152,10 +9190,12 @@
     (ideograph-daikanwa . 49698)	; ø¸Œˆ¢
     ))
 (define-char
-  '((ideographic-radical . 142)	; ⾍
+  '((=>ucs*		. #x45F9)	; 䗹
+    (ideographic-radical . 142)	; ⾍
     (ideographic-strokes . 14)
     (total-strokes	 . 20)
     (chinese-cns11643-4 . #x643F)	; ø»™ƒ 
+    (ucs		. #x2F9C2)	; 䗹
     ))
 (define-char
   '((ideographic-radical . 142)	; ⾍
diff --git a/lisp/utf-2000/Ideograph-R144-Walk-Enclosure.el b/lisp/utf-2000/Ideograph-R144-Walk-Enclosure.el
index 26a645e..60ba918 100644
--- a/lisp/utf-2000/Ideograph-R144-Walk-Enclosure.el
+++ b/lisp/utf-2000/Ideograph-R144-Walk-Enclosure.el
@@ -522,30 +522,41 @@
     (ucs			. #x885F)	; 衟
     ))
 (define-char
-  '((=>ucs		. #x8860)	; è¡ 
+  '((=>ucs		. #x2F9C3)	; 衠
     (ideographic-radical . 144)	; ⾏
     (ideographic-strokes . 10)
     (total-strokes	 . 16)
     (japanese-jisx0212	. #x5C32)	; ø»‹»‹
     (ideograph-daikanwa . 34076)	; ø¸ˆ”œ
+    (ucs-jis		. #x8860)	; ø»‹»‹
     ))
 (define-char
-  '((=>ucs		. #x8860)	; è¡ 
+  '((=>ucs*		. #x8860)	; è¡ 
+    (=>ucs-jis		. #x8860)	; ø»‹»‹
     (morohashi-daikanwa	34076 0 0)
     (ideographic-radical . 144)	; ⾏
     (ideographic-strokes . 10)
     (total-strokes	 . 16)
     (chinese-cns11643-4 . #x534C)	; ø»˜ª¯
+    (ucs		. #x2F9C3)	; 衠
     ))
 (define-char
-  '((morohashi-daikanwa	34076 0 6)
+  '((morohashi-daikanwa	34076 0 4)
     (ideographic-radical . 144)	; ⾏
     (ideographic-strokes . 10)
     (total-strokes	 . 16)
-    (chinese-cns11643-4 . #x534B)	; ø»˜ª®
     (ucs		. #x8860)	; è¡ 
     ))
 (define-char
+  '((=>ucs		. #x8860)	; è¡ 
+    (morohashi-daikanwa	34076 0 5)
+    (ideographic-radical . 144)	; ⾏
+    (ideographic-strokes . 10)
+    (total-strokes	 . 16)
+    (chinese-cns11643-4 . #x534B)	; ø»˜ª®
+    (ucs-cns		. #x8860)	; ø»˜ª®
+    ))
+(define-char
   '((ideographic-radical . 144)	; ⾏
     (ideographic-strokes . 10)
     (total-strokes	 . 16)
-- 
1.7.10.4