From c104fa18bae1048547270f84dd55a31d08e6dfa1 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Thu, 7 Apr 2005 08:05:48 +0000
Subject: [PATCH] (U+4E51): Use `->subsumptive'.

---
 lisp/utf-2000/Ideograph-R004-Slash.el |   24 +++++++++++++++---------
 1 file changed, 15 insertions(+), 9 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index 577fb17..8551304 100644
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -984,15 +984,21 @@
     (total-strokes	 . 6)
     (hanyu-dazidian	1 38 5)
     (=ucs		. #x4E51)	; 乑
-    (=jis-x0212		. #x3033)	; &I-JSP-3033; [16-19]
-    (=cns11643-4	. #x2227)	; &I-C4-2227; [02-07]
-    (=jis-x0213-2-2000	. #x212C)	; &I-JX2-212C; [01-12]
-    (=big5-cdp		. #x89F2)	; &I-CDP-89F2;
-    (=gt		. 00188)	; &I-GT-00188;
-    (=gt-k		. 01781)	; &I-GT-K01781;
-    (=gt-pj-2		. #x312D)	; &I-GT-00188; [17-13]
-    (=daikanwa		. 00139)	; &I-M-00139;
-    (=jef-china3	. #x41B9)	; &I-JC3-41B9;
+    (->subsumptive
+     ((=gt		  . 00188)	; &GT-00188;
+      (=gt-k		  . 01781)	; &I-GT-K01781;
+      (=gt-pj-2		  . #x312D)	; &GT-00188; [17-13]
+      (=daikanwa	  . 00139)	; &I-M-00139;
+      )
+     ((=jis-x0212	  . #x3033)	; &CDP-89F2; [16-19]
+      (=cns11643-4	  . #x2227)	; &I-C4-2227; [02-07]
+      (=jis-x0213-2-2000  . #x212C)	; &I-JX2-212C; [01-12]
+      (=big5-cdp	  . #x89F2)	; &I-CDP-89F2;
+      (=jef-china3	  . #x41B9)	; &I-JC3-41B9;
+      (=ucs@jis		  . #x4E51)	; &CDP-89F2;
+      )
+     ((=ucs@unicode	  . #x4E51)	; &UU+4E51;
+      ))
     ))
 (define-char
   '((ideographic-radical . 4)	; ⼃
-- 
1.7.10.4