From ec245fca15cf01a12e628faa5f672b842b4c97c4 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 21 May 2010 04:48:07 +0000
Subject: [PATCH] (U+9AD4): Use `->denotational' and `->subsumptive'.

---
 lisp/utf-2000/Ideograph-R188-Bone.el |   39 +++++++++++++++++++---------------
 1 file changed, 22 insertions(+), 17 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R188-Bone.el b/lisp/utf-2000/Ideograph-R188-Bone.el
index e46c085..b6722f4 100644
--- a/lisp/utf-2000/Ideograph-R188-Bone.el
+++ b/lisp/utf-2000/Ideograph-R188-Bone.el
@@ -2959,34 +2959,39 @@
       ))
     ))
 (define-char
-  '((=>ucs		. #x9AD4)	; 體
-    (ideographic-radical . 188)	; â¾»
+  '((ideographic-radical . 188)	; â¾»
     (ideographic-strokes . 13)
-    (total-strokes	 . 23)
-    (=ucs@jis		. #x9AD4)	; &GT-60937;
-    (=jis-x0208		. #x7173)	; &GT-60937; [81-83]
-    (=ks-x1001		. #x7477)	; &I-K0-7477; [84-87]
-    (=jis-x0213-1	. #x7173)	; &I-JX1-7173; [81-83]
-    (=gt		. 60937)	; &I-GT-60937;
-    (=gt-pj-1		. #x7173)	; &I-GT-60937; [81-83]
-    (=daikanwa		. 45291)	; &I-M-45291;
-    (=shinjigen@rev	.  0189)	; &GT-60937;
+    (=ucs		. #x9AD4)	; 體
     ))
 (define-char
-  '((=>ucs		. #x9AD4)	; 體
-    (morohashi-daikanwa	45291 0 0)
+  '((<-denotational
+     ((=ucs		  . #x9AD4)	; 體
+      ))
     (ideographic-radical . 188)	; â¾»
     (ideographic-strokes . 13)
     (total-strokes	 . 23)
-    (=cns11643-1	. #x7C55)	; &C1-7C55; [92-53]
+    (->subsumptive
+     ((=ucs@jis		  . #x9AD4)	; &GT-60937;
+      (=jis-x0208	  . #x7173)	; &GT-60937; [81-83]
+      (=ks-x1001	  . #x7477)	; &I-K0-7477; [84-87]
+      (=jis-x0213-1	  . #x7173)	; &I-JX1-7173; [81-83]
+      (=gt		  . 60937)	; &I-GT-60937;
+      (=gt-pj-1		  . #x7173)	; &I-GT-60937; [81-83]
+      (=daikanwa	  . 45291)	; &I-M-45291;
+      (=shinjigen	  .  0189)	; &GT-60937;
+      )
+     ((=cns11643-1	  . #x7C55)	; &C1-7C55; [92-53]
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	45291 0 4)
+  '((<-denotational
+     ((=ucs		  . #x9AD4)	; 體
+      ))
     (ideographic-radical . 188)	; â¾»
     (ideographic-strokes . 13)
     (total-strokes	 . 22)
-    (=ucs		. #x9AD4)	; 體
-    (=gb12345		. #x4C65)	; 體 [44-69]
+    (=ucs@unicode	. #x9AD4)	; &UU+9AD4;
+    (=gb12345		. #x4C65)	; &UU+9AD4; [44-69]
     ))
 (define-char
   '((ideographic-radical . 188)	; â¾»
-- 
1.7.10.4