From f33d8a1b4be6bea369d1e5d8b9a8728b39fab571 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Tue, 2 Dec 2003 18:48:20 +0000
Subject: [PATCH] Add some mappings between CNS 11643-5 and CJK Ext-B code
 points.

---
 lisp/utf-2000/Ideograph-R155-Red.el |   81 +++++++++++++++++++++++++++--------
 1 file changed, 63 insertions(+), 18 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R155-Red.el b/lisp/utf-2000/Ideograph-R155-Red.el
index 97588c9..03b4f01 100644
--- a/lisp/utf-2000/Ideograph-R155-Red.el
+++ b/lisp/utf-2000/Ideograph-R155-Red.el
@@ -47,6 +47,7 @@
   '((ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 4)
     (total-strokes	 . 11)
+    (=ucs		. #x27E5B)	; 𧹛
     (=cns11643-5	. #x3566)	; ø»š‰‰
     (=daikanwa		. 36997)	; ø¸‰‚…
     ))
@@ -157,6 +158,7 @@
   '((ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 7)
     (total-strokes	 . 14)
+    (=ucs		. #x27E63)	; 𧹣
     (=cns11643-5	. #x4A2A)	; ø»š§ƒ
     (=daikanwa		. 37007)	; ø¸‰‚
     ))
@@ -218,16 +220,25 @@
     (=daikanwa		. 37013)	; ø¸‰‚•
     ))
 (define-char
-  '((ideographic-radical . 155)	; ⾚
+  '((=>ucs		. #x27E6C)	; 𧹬
+    (ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 9)
     (total-strokes	 . 16)
-    (=cns11643-5	. #x5854)	; ø»š¼‘
     (=daikanwa		. 37014)	; ø¸‰‚–
     ))
 (define-char
+  '((morohashi-daikanwa	37014 0 0)
+    (ideographic-radical . 155)	; ⾚
+    (ideographic-strokes . 9)
+    (total-strokes	 . 16)
+    (=ucs		. #x27E6C)	; 𧹬
+    (=cns11643-5	. #x5854)	; ø»š¼‘
+    ))
+(define-char
   '((ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 9)
     (total-strokes	 . 16)
+    (=ucs		. #x27E6D)	; 𧹭
     (=cns11643-5	. #x5853)	; ø»š¼
     (=daikanwa		. 37015)	; ø¸‰‚—
     ))
@@ -279,42 +290,81 @@
     (=daikanwa		. 37019)	; ø¸‰‚›
     ))
 (define-char
-  '((ideographic-radical . 155)	; ⾚
+  '((=>ucs		. #x8D6F)	; 赯
+    (ideographic-radical . 155)	; ⾚
+    (ideographic-strokes . 10)
+    (total-strokes	 . 17)
+    (=daikanwa		. 37020)	; ø¸‰‚œ
+    ))
+(define-char
+  '((morohashi-daikanwa	37020 0 0)
+    (ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 10)
     (total-strokes	 . 17)
     (=ucs		. #x8D6F)	; 赯
     (=cns11643-2	. #x5F65)	; ø»”¨¨
-    (=daikanwa		. 37020)	; ø¸‰‚œ
     ))
 (define-char
-  '((ideographic-radical . 155)	; ⾚
+  '((=>ucs		. #x27E72)	; 𧹲
+    (ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 10)
     (total-strokes	 . 17)
-    (=cns11643-5	. #x5E69)	; ø»›…š
     (=daikanwa		. 37021)	; ø¸‰‚
     ))
 (define-char
+  '((morohashi-daikanwa	37021 0 0)
+    (ideographic-radical . 155)	; ⾚
+    (ideographic-strokes . 10)
+    (total-strokes	 . 17)
+    (=ucs		. #x27E72)	; 𧹲
+    (=cns11643-5	. #x5E69)	; ø»›…š
+    ))
+(define-char
   '((ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 10)
     (total-strokes	 . 17)
-    (=cns11643-5	. #x5E6A)	; ø»›…›
+    (=ucs		. #x27E73)	; 𧹳
     (=daikanwa		. 37022)	; ø¸‰‚ž
     ))
 (define-char
-  '((ideographic-radical . 155)	; ⾚
+  '((=>ucs		. #x27E73)	; 𧹳
+    (morohashi-daikanwa	37022 0 0)
+    (ideographic-radical . 155)	; ⾚
+    (ideographic-strokes . 10)
+    (total-strokes	 . 17)
+    (=cns11643-5	. #x5E6A)	; ø»›…›
+    ))
+(define-char
+  '((=>ucs		. #x27E74)	; 𧹴
+    (ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 10)
     (total-strokes	 . 17)
-    (=cns11643-5	. #x5E68)	; ø»›…™
     (=daikanwa		. 37023)	; ø¸‰‚Ÿ
     ))
 (define-char
-  '((ideographic-radical . 155)	; ⾚
+  '((morohashi-daikanwa	37023 0 0)
+    (ideographic-radical . 155)	; ⾚
+    (ideographic-strokes . 10)
+    (total-strokes	 . 17)
+    (=ucs		. #x27E74)	; 𧹴
+    (=cns11643-5	. #x5E68)	; ø»›…™
+    ))
+(define-char
+  '((=>ucs		. #x27E76)	; 𧹶
+    (ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 11)
     (total-strokes	 . 18)
-    (=cns11643-5	. #x6475)	; ø»›Žš
     (=daikanwa		. 37024)	; ø¸‰‚ 
     ))
 (define-char
+  '((morohashi-daikanwa	37024 0 0)
+    (ideographic-radical . 155)	; ⾚
+    (ideographic-strokes . 11)
+    (total-strokes	 . 18)
+    (=ucs		. #x27E76)	; 𧹶
+    (=cns11643-5	. #x6475)	; ø»›Žš
+    ))
+(define-char
   '((ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 11)
     (total-strokes	 . 18)
@@ -360,14 +410,9 @@
   '((ideographic-radical . 155)	; ⾚
     (ideographic-strokes . 14)
     (total-strokes	 . 21)
-    (=daikanwa		. 37030)	; ø¸‰‚¦
-    ))
-(define-char
-  '((morohashi-daikanwa	37030 0 0)
-    (ideographic-radical . 155)	; ⾚
-    (ideographic-strokes . 14)
-    (total-strokes	 . 21)
+    (=ucs		. #x27E7D)	; 𧹽
     (=cns11643-5	. #x7146)	; ø»› ±
+    (=daikanwa		. 37030)	; ø¸‰‚¦
     ))
 (define-char
   '((ideographic-radical . 155)	; ⾚
-- 
1.7.10.4