From 3d61001cf64ed8bdee4b7a54e533dbc071e0fa72 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Thu, 16 Jun 2005 03:06:47 +0000
Subject: [PATCH] (U-00020554): Use `->subsumptive' to integrate M-49525 and
 C6-287A; use `ideographic-radical@ucs' instead of
 `ideographic-radical'; add `ideographic-strokes@{ucs|cns}',
 `ideographic-radical@cns',
 `ideographic-radical@cns*sources' and `total-strokes'.

---
 lisp/utf-2000/Ideograph-R013-Down-Box.el |   25 +++++++++++++++++++------
 1 file changed, 19 insertions(+), 6 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index efb907c..caeb526 100644
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -769,6 +769,25 @@
     (=hanziku-1		. #xB8A7)	; &I-HZK01-B8A7;
     ))
 (define-char
+  '((ideographic-radical@ucs . 13)	; ⼌
+    (ideographic-strokes@ucs . 5)
+    (ideographic-radical@cns . 130)	; ⾁
+    (ideographic-strokes@cns . 3)
+    (ideographic-radical@cns*sources
+     daikanwa cns11643)
+    (total-strokes	 . 7)
+    (=ucs		. #x20554)	; 𠕔
+    (->subsumptive
+     ((=daikanwa	  . 49525)	; &M-49525;
+      )
+     ((hanyu-dazidian	  1 100 7)
+      (=hanziku-1	  . #xB8A4)	; &HZK01-B8A4;
+      (=ucs@iso		  . #x20554)	; &HZK01-B8A4;
+      )
+     ((=cns11643-6	  . #x287A)	; &C6-287A; [08-90]
+      ))
+    ))
+(define-char
   '((ideographic-radical . 13)	; ⼌
     (ideographic-strokes . 5)
     (total-strokes	 . 7)
@@ -1658,12 +1677,6 @@
     ))
 (define-char
   '((ideographic-radical . 13)	; ⼌
-    (hanyu-dazidian	1 100 7)
-    (=ucs		. #x20554)	; 𠕔
-    (=hanziku-1		. #xB8A4)	; &I-HZK01-B8A4;
-    ))
-(define-char
-  '((ideographic-radical . 13)	; ⼌
     (hanyu-dazidian	8 8 10)
     (=ucs		. #x2055C)	; 𠕜
     (=hanziku-12	. #xEB61)	; &I-HZK12-EB61;
-- 
1.7.10.4