From bd2eccf0fefc1f695c16535e8978da3a09633167 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Wed, 3 Mar 2004 04:01:01 +0000
Subject: [PATCH] (U-00025626): Use `->subsumptive'; use
 `ideographic-radical@{ucs|cns}'.

---
 lisp/utf-2000/Ideograph-R113-Spirit.el |   28 +++++++++++++++++-----------
 1 file changed, 17 insertions(+), 11 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R113-Spirit.el b/lisp/utf-2000/Ideograph-R113-Spirit.el
index b60109d..87a9f5b 100644
--- a/lisp/utf-2000/Ideograph-R113-Spirit.el
+++ b/lisp/utf-2000/Ideograph-R113-Spirit.el
@@ -415,6 +415,23 @@
     (=hanziku-12	. #xEEDE)	; ý¢ƒŽ»ž
     ))
 (define-char
+  '((=>daikanwa		. 13171)	; ø¸ƒ³
+    (ideographic-radical@ucs . 113)	; â½°
+    (ideographic-strokes@ucs . 4)
+    (ideographic-radical@cns . 66)	; ⽁
+    (ideographic-strokes@cns . 5)
+    (total-strokes	 . 9)
+    (=ucs		. #x25626)	; 𥘦
+    (->subsumptive
+     ((hanyu-dazidian	  4 2388 4)
+      (=daikanwa	  . 13171)	; ø¸ƒ³
+      (=hanziku-6	  . #xEDC7)	; ý¢®·‡
+      )
+     ((=cns11643-6	  . #x315A)	; ø»œ‰
+      (=ucs@iso		  . #x25626)	; ø»œ‰
+      ))
+    ))
+(define-char
   '((=>ucs		. #x40FD)	; 䃽
     (ideographic-radical . 113)	; â½°
     (ideographic-strokes . 4)
@@ -810,17 +827,6 @@
   '((ideographic-radical . 113)	; â½°
     (ideographic-strokes . 4)
     (total-strokes	 . 9)
-    (->identical
-     ((=daikanwa	  . 13171)	; ø¸ƒ³
-      ))
-    (hanyu-dazidian	4 2388 4)
-    (=ucs		. #x25626)	; 𥘦
-    (=hanziku-6		. #xEDC7)	; ý¢®·‡
-    ))
-(define-char
-  '((ideographic-radical . 113)	; â½°
-    (ideographic-strokes . 4)
-    (total-strokes	 . 9)
     (=ucs		. #x25627)	; 𥘧
     ))
 (define-char
-- 
1.7.10.4