X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R102-Field.el;h=a60677404f6213dc6b7e3e292ca2d5f8ecc18795;hb=1b72e31335068ef237b013a0738cebaf409867a1;hp=34e7c5739dada1adbd210cb358f2af80f9e9b913;hpb=ed79ca47b430a917433a5f779c37c2f7c8ee11ba;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/Ideograph-R102-Field.el b/lisp/utf-2000/Ideograph-R102-Field.el
index 34e7c57..a606774 100644
--- a/lisp/utf-2000/Ideograph-R102-Field.el
+++ b/lisp/utf-2000/Ideograph-R102-Field.el
@@ -178,11 +178,11 @@
     (ideographic-radical . 102)	; â½¥
     (ideographic-strokes . 2)
     (total-strokes	 . 7)
-    (->same
+    (<-same
      ((=ucs		  . #x753A)	; 町
       (=daikanwa	  . 21735)	; &I-M-21735;
       ))
-    (->same*sources
+    (<-same*sources
      daikanwa)
     (=ucs		. #x753C)	; 甼
     (=jis-x0208		. #x6136)	; &I-J90-6136; [65-22]
@@ -1420,8 +1420,12 @@
     (ideographic-strokes . 6)
     (total-strokes	 . 11)
     (=ucs		. #x7568)	; 畨
-    (=cns11643-3	. #x3747)	; &I-C3-3747; [23-39]
-    (=daikanwa		. 21855)	; &I-M-21855;
+    (->subsumptive
+     ((=daikanwa	  . 21855)	; &M-21855;
+      (=ucs@unicode	  . #x7568)	; &M-21855;
+      )
+     ((=cns11643-3	  . #x3747)	; &C3-3747; [23-39]
+      ))
     ))
 (define-char
   '((ideographic-radical . 102)	; â½¥
@@ -1704,13 +1708,14 @@
     (=iso-ir165		. #x7D51)	; &I-EGB-7D51; [93-49]
     ))
 (define-char
-  '((=>ucs		. #x7570)	; 異
+  '((=>ucs*		. #x7570)	; 異
     (ideographic-radical . 102)	; â½¥
     (ideographic-strokes . 7)
     (total-strokes	 . 12)
     (shinjigen-1	. 5055)
     (shinjigen-2	. 5055)
-    (=cns11643-6	. #x4B56)	; &M-21866; [43-54]
+    (=ucs		. #x2F938)	; 異
+    (=cns11643-6	. #x4B56)	; &I-C6-4B56; [43-54]
     (=daikanwa		. 21866)	; &I-M-21866;
     ))
 (define-char