From dc1de95066f4513a05a011a5e82810466ef84e29 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 1 Dec 2004 10:03:48 +0000
Subject: [PATCH] - Add some `=ucs@cns' features. - Use `->subsumptive' or
 `{<-|->}denotational' for some character   definitions.

---
 lisp/utf-2000/Ideograph-R042-Small.el |   22 ++++++++++++++++++----
 1 file changed, 18 insertions(+), 4 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R042-Small.el b/lisp/utf-2000/Ideograph-R042-Small.el
index 94c1971..f8c5f9f 100644
--- a/lisp/utf-2000/Ideograph-R042-Small.el
+++ b/lisp/utf-2000/Ideograph-R042-Small.el
@@ -21,15 +21,29 @@
     (total-strokes	 . 4)
     (=ucs		. #x5C10)	; 尐
     (=big5		. #xC95C)	; &I-B-C95C;
-    (=daikanwa		. 07474)	; &I-M-07474;
     ))
 (define-char
-  '((=>ucs		. #x5C10)	; 尐
-    (morohashi-daikanwa	7474 0 1)
-    (ideographic-radical . 42)	; ⼩
+  '((ideographic-radical . 42)	; ⼩
+    (ideographic-strokes . 1)
+    (total-strokes	 . 4)
+    (<-denotational
+     ((=ucs		  . #x5C10)	; 尐
+      ))
+    (->subsumptive
+     ((=daikanwa	  . 07474)	; &M-07474;
+      )
+     ((=ucs@unicode	  . #x5C10)	; &UU+5C10;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 42)	; ⼩
     (ideographic-strokes . 1)
     (total-strokes	 . 4)
+    (<-denotational
+     ((=ucs		  . #x5C10)	; 尐
+      ))
     (=cns11643-2	. #x213C)	; &C2-213C; [01-28]
+    (=ucs@cns		. #x5C10)	; &C2-213C;
     ))
 (define-char
   '((=>ucs		. #x5C11)	; 少
-- 
1.7.10.4