X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R015-Ice.el;h=0a4fb0086dae069071fd8d4eed0c97788a2fadd3;hb=e29a0bc5169d7647d2c1293d97417857bc474683;hp=8973433428ebd3a34e1b27b292f16fe1224e91c1;hpb=ad2084acd79104f123160543ebd4d686fb5a7829;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/utf-2000/Ideograph-R015-Ice.el b/lisp/utf-2000/Ideograph-R015-Ice.el
index 8973433..0a4fb00 100644
--- a/lisp/utf-2000/Ideograph-R015-Ice.el
+++ b/lisp/utf-2000/Ideograph-R015-Ice.el
@@ -138,12 +138,18 @@
   '((ideographic-radical . 15)	; ⼎
     (ideographic-strokes . 4)
     (total-strokes	 . 6)
+    (->same
+     ((=cns11643-3	  . #x214C)	; ø»•—
+      (=daikanwa	  . 00360)	; ø¸€…¨
+      ))
+    (->same*sources
+     shuowen kanjo ronkou jiyun daikanwa)
     (<-original-ideograph
-     (:sources	(shinjigen-1)
-      :char	((shinjigen-1	     . 4051)
-		 (=daikanwa	     . 17087)	; ø¸„Š¿
-		 )
+     ((shinjigen-1	  . 4051)
+      (=daikanwa	  . 17087)	; ø¸„Š¿
       ))
+    (<-original-ideograph*sources
+     shinjigen-1)
     (hanyu-dazidian	1 295 9)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -166,32 +172,6 @@
     (=daikanwa		. 01612)	; ø¸€™Œ
     ))
 (define-char
-  '((=>ucs*		. #x4ECC)	; 仌
-    (morohashi-daikanwa	1612 0 7)
-    (ideographic-radical . 15)	; ⼎
-    (ideographic-strokes . 2)
-    (total-strokes	 . 4)
-    (->same-ideograph
-     ((ideographic-radical . 9)	; ⼈
-      (=daikanwa	  . 00360)	; ø¸€…¨
-      ))
-    (<-original-ideograph
-     ((=daikanwa	  . 01612)	; ø¸€™Œ
-      ))
-    (<-original-ideograph*sources
-     daikanwa)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs		  . #x2FF1)	; ⿱
-      )
-     ((=ucs		  . #x4EBA)	; 人
-      )
-     ((=ucs		  . #x4EBA)	; 人
-      ))
-    (=ucs		. #x2F819)	; 仌
-    (=cns11643-4	. #x213F)	; ø»—¡†
-    ))
-(define-char
   '((ideographic-radical . 15)	; ⼎
     (ideographic-strokes . 4)
     (total-strokes	 . 6)