From 3ebbe00e0a8d1c85bcf54b5da6c97690a7c866a1 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Tue, 11 Jan 2005 06:12:29 +0000
Subject: [PATCH] (U+5DC2): Modify hierarchy; add
 `ideographic-{radical|strokes}@{ucs|cns}' and
 `ideographic-radical@ucs*sources'.

---
 lisp/utf-2000/Ideograph-R046-Mountain.el |   28 ++++++++++++++++++----------
 1 file changed, 18 insertions(+), 10 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R046-Mountain.el b/lisp/utf-2000/Ideograph-R046-Mountain.el
index da3757c..7a06a5b 100644
--- a/lisp/utf-2000/Ideograph-R046-Mountain.el
+++ b/lisp/utf-2000/Ideograph-R046-Mountain.el
@@ -9307,18 +9307,26 @@
     (=daikanwa		. 08593)	; &I-M-08593;
     ))
 (define-char
-  '((total-strokes	 . 18)
+  '((ideographic-radical@ucs . 46)	; â¼­
+    (ideographic-strokes@ucs . 15)
+    (ideographic-radical@ucs*sources
+     daikanwa ucs)
+    (ideographic-radical@cns . 172)	; ⾫
+    (ideographic-strokes@cns . 10)
+    (total-strokes	 . 18)
     (=ucs		. #x5DC2)	; 巂
-    (=big5		. #xF172)	; &I-B-F172;
     (->subsumptive
-     ((ideographic-radical . 46)	; â¼­
-      (ideographic-strokes . 15)
-      (=daikanwa	  . 08595)	; &M-08595;
-      )
-     ((ideographic-radical . 172)	; ⾫
-      (ideographic-strokes . 10)
-      (=cns11643-2	  . #x643E)	; &C2-643E; [68-30]
-      (=ucs@cns		  . #x5DC2)	; &C2-643E;
+     ((=big5		  . #xF172)	; &B-F172;
+      (->subsumptive
+       ((ideographic-radical . 46)	; â¼­
+	(ideographic-strokes . 15)
+	(=daikanwa	    . 08595)	; &M-08595;
+	)
+       ((ideographic-radical . 172)	; ⾫
+	(ideographic-strokes . 10)
+	(=cns11643-2	    . #x643E)	; &C2-643E; [68-30]
+	(=ucs@cns	    . #x5DC2)	; &C2-643E;
+	))
       )
      ((ideographic-radical . 46)	; â¼­
       (ideographic-strokes . 15)
-- 
1.7.10.4