From 137f15d274228694e9844c4c124581e1cbb4c320 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Mon, 23 Feb 2009 09:53:13 +0000
Subject: [PATCH] (U+5789): Use `->denotational' instead of `->subsumptive'.

---
 lisp/utf-2000/Ideograph-R032-Earth.el |   50 ++++++++++++++++++---------------
 1 file changed, 28 insertions(+), 22 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R032-Earth.el b/lisp/utf-2000/Ideograph-R032-Earth.el
index 13af749..de7a6b4 100644
--- a/lisp/utf-2000/Ideograph-R032-Earth.el
+++ b/lisp/utf-2000/Ideograph-R032-Earth.el
@@ -2362,32 +2362,38 @@
       ))
     ))
 (define-char
-  '((morohashi-daikanwa	ho 80)
-    (ideographic-radical . 32)	; ⼟
+  '((ideographic-radical . 32)	; ⼟
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
     (=ucs		. #x5789)	; 垉
-    (->subsumptive
-     ((hanyu-dazidian	  1 434 5)
-      (ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-	(=ucs		    . #x2FF0)	; â¿°
-	)
-       ((=gt-k		    . 00199)	; &GT-K00199;
-	)
-       ((=gb2312	    . #x307C)	; &M-02506; [16-92]
-	(=ks-x1001	    . #x7850)	; &I-K0-7850; [88-48]
-	(=cns11643-1	    . #x457D)	; &I-C1-457D; [37-93]
-	(=daikanwa	    . 02506)	; &I-M-02506;
-	))
-      (=jis-x0208	  . #x5435)	; &GT-06309; [52-21]
-      (=jis-x0213-1	  . #x5435)	; &I-JX1-5435; [52-21]
-      (=gt		  . 06309)	; &I-GT-06309;
-      (=gt-pj-1		  . #x5435)	; &I-GT-06309; [52-21]
-      (=hanziku-2	  . #xA976)	; &I-HZK02-A976;
-      (=cbeta		  . 02831)	; &I-CB02831;
-      (=ucs@unicode	  . #x5789)	; &GT-06309;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x5789)	; 垉
       ))
+    (morohashi-daikanwa	ho 80)
+    (ideographic-radical . 32)	; ⼟
+    (ideographic-strokes . 5)
+    (total-strokes	 . 8)
+    (hanyu-dazidian	1 434 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=gt-k		  . 00199)	; &GT-K00199;
+      )
+     ((=gb2312		  . #x307C)	; &M-02506; [16-92]
+      (=ks-x1001	  . #x7850)	; &I-K0-7850; [88-48]
+      (=cns11643-1	  . #x457D)	; &I-C1-457D; [37-93]
+      (=daikanwa	  . 02506)	; &I-M-02506;
+      ))
+    (=jis-x0208		. #x5435)	; &GT-06309; [52-21]
+    (=jis-x0213-1	. #x5435)	; &I-JX1-5435; [52-21]
+    (=gt		. 06309)	; &I-GT-06309;
+    (=gt-pj-1		. #x5435)	; &I-GT-06309; [52-21]
+    (=hanziku-2		. #xA976)	; &I-HZK02-A976;
+    (=cbeta		. 02831)	; &I-CB02831;
+    (=ucs@unicode	. #x5789)	; &GT-06309;
     ))
 (define-char
   '((script		Japanese Ideograph)
-- 
1.7.10.4