From 4b63825dc9caa82094e03326db5a60d9d02a6e1c Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Sat, 12 Jun 2004 08:27:53 +0000
Subject: [PATCH] (U-000200E4): Use `->subsumptive'; delete
 `ideographic-structure'. (U-000200E5): Use `->subsumptive'.
 (U+4E6A): Likewise.

---
 lisp/utf-2000/Ideograph-R005-Second.el |  126 ++++++++++++++------------------
 1 file changed, 54 insertions(+), 72 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R005-Second.el b/lisp/utf-2000/Ideograph-R005-Second.el
index ebffb79..efc8816 100644
--- a/lisp/utf-2000/Ideograph-R005-Second.el
+++ b/lisp/utf-2000/Ideograph-R005-Second.el
@@ -709,95 +709,77 @@
   '((ideographic-radical . 5)	; ⼄
     (ideographic-strokes . 5)
     (total-strokes	 . 6)
-    (hanyu-dazidian	1 38 11)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs		  . #x2FF1)	; ⿱
-      )
-     ((=big5-cdp	  . #x8CAC)	; &CDP-8CAC;
-      )
-     ((=big5-cdp	  . #x8BED)	; &CDP-8BED;
-      ))
     (=ucs		. #x200E4)	; 𠃤
-    (=cns11643-6	. #x2346)	; &I-C6-2346; [03-38]
-    (=gt		. 00244)	; &I-GT-00244;
-    (=gt-pj-2		. #x3153)	; &I-GT-00244; [17-51]
-    (=daikanwa		. 00183)	; &I-M-00183;
-    (=hanziku-1		. #xABE1)	; &I-HZK01-ABE1;
-    ))
-(define-char
-  '((=>ucs		. #x200E5)	; 𠃥
-    (ideographic-radical . 5)	; ⼄
-    (ideographic-strokes . 5)
-    (total-strokes	 . 6)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
-      (=ucs		  . #x2FF9)	; ⿹
-      )
-     ((name		  . "CJK RADICAL SECOND THREE")
-      (=ucs		  . #x2E84)	; ⺄
+    (->subsumptive
+     ((hanyu-dazidian	  1 38 11)
+      (=gt		  . 00244)	; &GT-00244;
+      (=gt-pj-2		  . #x3153)	; &GT-00244; [17-51]
+      (=daikanwa	  . 00183)	; &I-M-00183;
+      (=hanziku-1	  . #xABE1)	; &I-HZK01-ABE1;
+      (=ucs@iso		  . #x200E4)	; &GT-00244;
       )
-     ((=ucs		  . #x672A)	; 未
+     ((=cns11643-6	  . #x2346)	; &C6-2346; [03-38]
       ))
-    (=gt		. 00242)	; &GT-00242;
-    (=gt-pj-2		. #x3154)	; &GT-00242; [17-52]
-    (=daikanwa		. 00184)	; &I-M-00184;
     ))
 (define-char
-  '((morohashi-daikanwa	184 0 0)
-    (ideographic-radical . 5)	; ⼄
+  '((ideographic-radical . 5)	; ⼄
     (ideographic-strokes . 5)
     (total-strokes	 . 6)
-    (hanyu-dazidian	1 53 3)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
-      (=ucs		  . #x2FF9)	; ⿹
+    (=ucs		. #x200E5)	; 𠃥
+    (->subsumptive
+     ((=gt		  . 00242)	; &GT-00242;
+      (=gt-pj-2		  . #x3154)	; &GT-00242; [17-52]
+      (=daikanwa	  . 00184)	; &I-M-00184;
       )
-     ((name		  . "CJK RADICAL SECOND THREE")
-      (=ucs		  . #x2E84)	; ⺄
+     ((hanyu-dazidian	  1 53 3)
+      (=hanziku-1	  . #xAEE2)	; &HZK01-AEE2;
+      (=ucs@iso		  . #x200E5)	; &HZK01-AEE2;
       )
-     ((=ucs		  . #x672A)	; 未
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+	(=ucs		    . #x2FF9)	; ⿹
+	)
+       ((name		    . "CJK RADICAL SECOND THREE")
+	(=ucs		    . #x2E84)	; ⺄
+	)
+       ((=ucs		    . #x672A)	; 未
+	))
+      (=cns11643-6	  . #x2344)	; &C6-2344; [03-36]
       ))
-    (=ucs		. #x200E5)	; 𠃥
-    (=cns11643-6	. #x2344)	; &I-C6-2344; [03-36]
-    (=hanziku-1		. #xAEE2)	; &I-HZK01-AEE2;
     ))
 (define-char
   '((ideographic-radical . 5)	; ⼄
     (ideographic-strokes . 5)
     (total-strokes	 . 6)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
-      (=ucs		  . #x2FFA)	; ⿺
-      )
-     ((=ucs		  . #x4E59)	; 乙
-      )
-     ((=ucs		  . #x7530)	; 田
-      ))
     (=ucs		. #x4E6A)	; 乪
-    (=cns11643-4	. #x2228)	; &I-C4-2228; [02-08]
-    (=gb12345		. #x7C5A)	; 乪 [92-58]
-    (=gt		. 00246)	; &I-GT-00246;
-    (=gt-pj-2		. #x3155)	; &I-GT-00246; [17-53]
-    (=daikanwa		. 00185)	; &I-M-00185;
-    ))
-(define-char
-  '((=>ucs		. #x4E6A)	; 乪
-    (morohashi-daikanwa	185 0 2)
-    (ideographic-radical . 5)	; ⼄
-    (ideographic-strokes . 5)
-    (total-strokes	 . 6)
-    (hanyu-dazidian	1 53 7)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
-      (=ucs		  . #x2FFA)	; ⿺
-      )
-     ((name		  . "CJK RADICAL SECOND THREE")
-      (=ucs		  . #x2E84)	; ⺄
-      )
-     ((=ucs		  . #x7530)	; 田
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
+	(=ucs		    . #x2FFA)	; ⿺
+	)
+       ((=ucs		    . #x4E59)	; 乙
+	)
+       ((=ucs		    . #x7530)	; 田
+	))
+      (=cns11643-4	  . #x2228)	; &GT-00246; [02-08]
+      (=gb12345		  . #x7C5A)	; &GT-00246; [92-58]
+      (=gt		  . 00246)	; &I-GT-00246;
+      (=gt-pj-2		  . #x3155)	; &I-GT-00246; [17-53]
+      (=daikanwa	  . 00185)	; &I-M-00185;
+      (=ucs@unicode	  . #x4E6A)	; &GT-00246;
+      )
+     ((hanyu-dazidian	  1 53 7)
+      (ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
+	(=ucs		    . #x2FFA)	; ⿺
+	)
+       ((name		    . "CJK RADICAL SECOND THREE")
+	(=ucs		    . #x2E84)	; ⺄
+	)
+       ((=ucs		    . #x7530)	; 田
+	))
+      (=hanziku-1	  . #xAEE6)	; &HZK01-AEE6;
       ))
-    (=hanziku-1		. #xAEE6)	; &HZK01-AEE6;
     ))
 (define-char
   '((ideographic-radical . 5)	; ⼄
-- 
1.7.10.4