From f00aecce8c0da539d59aa8e25c578e40e413d9bc Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Sun, 1 Aug 2010 14:20:10 +0000
Subject: [PATCH] (U+5E1A): Add abstract ideographic-structure; use
 `->denotational' instead of `->subsumptive'.

---
 lisp/utf-2000/Ideograph-R050-Turban.el |   98 +++++++++++++++++++-------------
 1 file changed, 60 insertions(+), 38 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R050-Turban.el b/lisp/utf-2000/Ideograph-R050-Turban.el
index f3e69e6..1a6ca7f 100644
--- a/lisp/utf-2000/Ideograph-R050-Turban.el
+++ b/lisp/utf-2000/Ideograph-R050-Turban.el
@@ -1110,47 +1110,69 @@
   '((ideographic-radical . 50)	; â¼±
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs		  . #x2FF3)	; ⿳
+      )
+     ((=ucs		  . #x5F50)	; 彐
+      )
+     ((=ucs		  . #x5196)	; 冖
+      )
+     ((=ucs		  . #x5DFE)	; å·¾
+      ))
     (=ucs		. #x5E1A)	; 帚
-    (->subsumptive
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
-	(=ucs		    . #x2FF3)	; ⿳
-	)
-       ((=big5-cdp	    . #x8BAB)	; &GT-67403;
-	)
-       ((=ucs		    . #x5196)	; 冖
-	)
-       ((=ucs		    . #x5DFE)	; å·¾
-	))
-      (=ucs@jis		  . #x5E1A)	; &GT-11133;
-      (=ucs@big5	  . #x5E1A)	; &GT-11133;
-      (=jis-x0208	  . #x5664)	; &GT-11133; [54-68]
-      (=cns11643-1	  . #x4D2C)	; &I-C1-4D2C; [45-12]
-      (=jis-x0213-1	  . #x5664)	; &I-JX1-5664; [54-68]
-      (=big5		  . #xA9AA)	; &I-B-A9AA;
-      (=gt		  . 11133)	; &I-GT-11133;
-      (=gt-k		  . 03870)	; &I-GT-K03870;
-      (=gt-pj-1		  . #x5664)	; &I-GT-11133; [54-68]
-      (=daikanwa	  . 08854)	; &I-M-08854;
-      (=shinjigen	  .  2091)	; &GT-11133;
+    (=big5		. #xA9AA)	; &I-B-A9AA;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x5E1A)	; 帚
+      ))
+    (ideographic-radical . 50)	; â¼±
+    (ideographic-strokes . 5)
+    (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs		  . #x2FF3)	; ⿳
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
-	(=ucs		    . #x2FF3)	; ⿳
-	)
-       ((name		    . "CJK RADICAL SNOUT TWO")
-	(=ucs		    . #x2E95)	; ⺕
-	)
-       ((=ucs		    . #x5196)	; 冖
-	)
-       ((=ucs		    . #x5DFE)	; å·¾
-	))
-      (=ucs@unicode	  . #x5E1A)	; &GT-11134;
-      (=gb2312		  . #x5663)	; &GT-11134; [54-67]
-      (=gt		  . 11134)	; &I-GT-11134;
-      (=gt-k		  . 03871)	; &I-GT-K03871;
-      (=gt-pj-9		  . #x5941)	; &I-GT-11134; [57-33]
+     ((=big5-cdp	  . #x8BAB)	; &GT-67403;
+      )
+     ((=ucs		  . #x5196)	; 冖
+      )
+     ((=ucs		  . #x5DFE)	; å·¾
+      ))
+    (=ucs@jis		. #x5E1A)	; &GT-11133;
+    (=jis-x0208		. #x5664)	; &GT-11133; [54-68]
+    (=cns11643-1	. #x4D2C)	; &I-C1-4D2C; [45-12]
+    (=jis-x0213-1	. #x5664)	; &I-JX1-5664; [54-68]
+    (=gt		. 11133)	; &I-GT-11133;
+    (=gt-k		. 03870)	; &I-GT-K03870;
+    (=gt-pj-1		. #x5664)	; &I-GT-11133; [54-68]
+    (=daikanwa		. 08854)	; &I-M-08854;
+    (=shinjigen		.  2091)	; &GT-11133;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x5E1A)	; 帚
+      ))
+    (ideographic-radical . 50)	; â¼±
+    (ideographic-strokes . 5)
+    (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs		  . #x2FF3)	; ⿳
+      )
+     ((name		  . "CJK RADICAL SNOUT TWO")
+      (=ucs		  . #x2E95)	; ⺕
+      )
+     ((=ucs		  . #x5196)	; 冖
+      )
+     ((=ucs		  . #x5DFE)	; å·¾
       ))
+    (=ucs@unicode	. #x5E1A)	; &GT-11134;
+    (=gb2312		. #x5663)	; &GT-11134; [54-67]
+    (=gt		. 11134)	; &I-GT-11134;
+    (=gt-k		. 03871)	; &I-GT-K03871;
+    (=gt-pj-9		. #x5941)	; &I-GT-11134; [57-33]
     ))
 (define-char
   '((ideographic-radical . 50)	; â¼±
-- 
1.7.10.4