From 58383f6dd410cadd4de7110ad5570ca2913a6d59 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 26 Mar 2004 12:11:01 +0000
Subject: [PATCH] (U-0002F819): Moved into U+4ECC. (U+4ECC): Copied from
 Ideograph-R009-Man.el. (U+51B0): Add `->same' for C3-214C;
 use `<-original-ideograph*sources' instead of char-ref in
 `<-original-ideograph'.

---
 lisp/utf-2000/Ideograph-R015-Ice.el |   73 +++++++++++++++++++++--------------
 1 file changed, 43 insertions(+), 30 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R015-Ice.el b/lisp/utf-2000/Ideograph-R015-Ice.el
index 9017452..202376b 100644
--- a/lisp/utf-2000/Ideograph-R015-Ice.el
+++ b/lisp/utf-2000/Ideograph-R015-Ice.el
@@ -35,6 +35,39 @@
     (=hanziku-1		. #xE2D6)	; ý¢€ž‹–
     ))
 (define-char
+  '((ideographic-radical . 9)	; ⼈
+    (ideographic-strokes . 2)
+    (total-strokes	 . 4)
+    (<-original-ideograph
+     ((ideographic-radical . 15)	; ⼎
+      (=daikanwa	  . 01612)	; ø¸€™Œ
+      ))
+    (<-original-ideograph*sources
+     shuowen shuowen-tongxun-dingsheng daikanwa)
+    (=ucs		. #x4ECC)	; 仌
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=ucs		    . #x4EBA)	; 人
+	)
+       ((=ucs		    . #x4EBA)	; 人
+	))
+      (=cns11643-3	  . #x214C)	; ø»•—
+      (=daikanwa	  . 00360)	; ø¸€…¨
+      (=cbeta		  . 08093)	; ø¸¡¾
+      )
+     ((=>ucs*		  . #x4ECC)	; 仌
+      (ideographic-radical@cns . 15)	; ⼎
+      (hanyu-dazidian	  1 105 2)
+      (=ucs		  . #x2F819)	; 仌
+      (=cns11643-4	  . #x213F)	; ø»—¡†
+      (=hanziku-1	  . #xB9A2)	; ý¢€›¦¢
+      (=ucs@unicode	  . #x4ECC)	; 仌
+      ))
+    ))
+(define-char
   '((=>ucs		. #x51AC)	; 冬
     (ideographic-radical . 15)	; ⼎
     (ideographic-strokes . 3)
@@ -138,12 +171,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 +205,6 @@
     (=daikanwa		. 01612)	; ø¸€™Œ
     ))
 (define-char
-  '((=>ucs*		. #x4ECC)	; 仌
-    (morohashi-daikanwa	1612 0 7)
-    (ideographic-radical . 15)	; ⼎
-    (ideographic-strokes . 2)
-    (total-strokes	 . 4)
-    (->same
-     ((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)
-- 
1.7.10.4