From 0ca036126572e834d439a4e386873ffac739ef07 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Thu, 15 Apr 2004 12:31:06 +0000
Subject: [PATCH] (U+9115): Use `->subsumptive'; moved into intersection
 between U+9115 and U+9109. (U+9109): Likewise.

---
 lisp/utf-2000/Ideograph-R163-City.el |   62 ++++++++++++++++------------------
 1 file changed, 29 insertions(+), 33 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R163-City.el b/lisp/utf-2000/Ideograph-R163-City.el
index 89a9b46..9cffed1 100644
--- a/lisp/utf-2000/Ideograph-R163-City.el
+++ b/lisp/utf-2000/Ideograph-R163-City.el
@@ -2836,8 +2836,7 @@
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
     (<-simplified@JP/Jouyou
-     ((=ucs		  . #x9115)	; 鄕
-      (=jis-x0213-1-2000  . #x7C6C)	; &I-JX1-7C6C;
+     ((=jis-x0213-1-2000  . #x7C6C)	; &CDP-B66D;
       ))
     (=ucs		. #x90F7)	; 郷
     (=jis-x0208		. #x363F)	; &I-J90-363F;
@@ -3758,37 +3757,34 @@
     ))
 (define-char
   '((ideographic-radical . 163)	; â¾¢
-    (ideographic-strokes . 10)
-    (total-strokes	 . 13)
-    (=ucs		. #x9115)	; 鄕
-    (=ks-x1001		. #x7A41)	; &I-K0-7A41;
-    (=jis-x0213-1-2000	. #x7C6C)	; &I-JX1-7C6C;
-    (=daikanwa		. 39571)	; &I-M-39571;
-    ))
-(define-char
-  '((=>ucs		. #x9115)	; 鄕
-    (morohashi-daikanwa	39571 0 0)
-    (ideographic-radical . 163)	; â¾¢
-    (ideographic-strokes . 10)
-    (total-strokes	 . 13)
-    (=cns11643-3	. #x4525)	; &C3-4525;
-    ))
-(define-char
-  '((=>ucs		. #x9109)	; 鄉
-    (morohashi-daikanwa	39571 0 3)
-    (ideographic-radical . 163)	; â¾¢
-    (ideographic-strokes . 10)
-    (total-strokes	 . 13)
-    (=big5		. #xB66D)	; &B-B66D;
-    ))
-(define-char
-  '((morohashi-daikanwa	39571 0 5)
-    (ideographic-radical . 163)	; â¾¢
-    (ideographic-strokes . 9)
-    (total-strokes	 . 12)
-    (=ucs		. #x9109)	; 鄉
-    (=cns11643-1	. #x6254)	; &I-C1-6254;
-    (=gb12345		. #x4F67)	; 鄉
+    (->subsumptive
+     ((ideographic-strokes . 10)
+      (total-strokes	   . 13)
+      (=ucs		  . #x9115)	; 鄕
+      (->subsumptive
+       ((=ks-x1001	    . #x7A41)	; &M-39571;
+	(=daikanwa	    . 39571)	; &I-M-39571;
+	(=jef-china3	    . #x68AC)	; &I-JC3-68AC;
+	(=ucs@unicode	    . #x9115)	; &M-39571;
+	)
+       ((=cns11643-3	    . #x4525)	; &C3-4525;
+	))
+      )
+     ((=>ucs		  . #x9115)	; 鄕
+      (ideographic-strokes . 10)
+      (total-strokes	   . 13)
+      (=jis-x0213-1-2000  . #x7C6C)	; &CDP-B66D;
+      (=big5-cdp	  . #xB66D)	; &I-B-B66D;
+      (=ucs@jis		  . #x9115)	; &CDP-B66D;
+      )
+     ((ideographic-strokes . 9)
+      (total-strokes	   . 12)
+      (=ucs		  . #x9109)	; 鄉
+      (=cns11643-1	  . #x6254)	; &I-C1-6254;
+      (=gb12345		  . #x4F67)	; 鄉
+      (=big5		  . #xB66D)	; &I-B-B66D;
+      (=ucs@unicode	  . #x9109)	; 鄉
+      ))
     ))
 (define-char
   '((ideographic-radical . 163)	; â¾¢
-- 
1.7.10.4