X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R032-Earth.el;h=d8e1fd4622a3fb1afe20df1b5b68aba545aab695;hb=29fa530ac6d40287c7550e1170c624a3cac6e34e;hp=0a2f0c7c3a88af613cdc8efe6c410312ab915f98;hpb=ed79ca47b430a917433a5f779c37c2f7c8ee11ba;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/Ideograph-R032-Earth.el b/lisp/utf-2000/Ideograph-R032-Earth.el
index 0a2f0c7..d8e1fd4 100644
--- a/lisp/utf-2000/Ideograph-R032-Earth.el
+++ b/lisp/utf-2000/Ideograph-R032-Earth.el
@@ -2341,7 +2341,7 @@
   '((ideographic-radical . 32)	; ⼟
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
-    (->same
+    (<-same
      ((=cns11643-6	  . #x2641)	; &M-48957; [06-33]
       (=daikanwa	  . 48957)	; &I-M-48957;
       ))
@@ -5502,12 +5502,19 @@
     (=daikanwa		. 05233)	; &I-M-05233;
     ))
 (define-char
-  '((ideographic-radical . 32)	; ⼟
+  '((=>ucs*		. #x578B)	; 型
+    (ideographic-radical . 32)	; ⼟
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
-    (<-original-ideograph
-     ((=daikanwa	  . 05030)	; &I-M-05030;
+    (<-denotational
+     ((=ucs		  . #x578B)	; 型
+      ))
+    (<-original
+     ((=ucs		  . #x578B)	; 型
+      (=daikanwa	  . 05030)	; &I-M-05030;
       ))
+    (<-original*sources
+     zhengzi-tong daikanwa)
     (=ucs		. #x2F855)	; 型
     (=cns11643-3	. #x3470)	; &I-C3-3470; [20-80]
     (=daikanwa		. 05234)	; &I-M-05234;