From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 20 Jun 2013 12:40:45 +0000 (+0900)
Subject: (U+3631): Use `->denotational' to separate representative nodes.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1089f9d83984b9941b2a58dba08b1623abe13183;p=chise%2Fxemacs-chise.git

(U+3631): Use `->denotational' to separate representative nodes.
(C3-2827): Add `<-ancient' for U+574D.
(U-00021299): New character.
---

diff --git a/lisp/utf-2000/Ideograph-R032-Earth.el b/lisp/utf-2000/Ideograph-R032-Earth.el
index df2394d..4dc258e 100644
--- a/lisp/utf-2000/Ideograph-R032-Earth.el
+++ b/lisp/utf-2000/Ideograph-R032-Earth.el
@@ -2063,8 +2063,31 @@
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
     (=ucs		. #x3631)	; 㘱
-    (=cns11643-3	. #x2827)	; &I-C3-2827; [08-07]
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x3631)	; 㘱
+      ))
+    (ideographic-radical . 32)	; ⼟
+    (ideographic-strokes . 5)
+    (total-strokes	 . 8)
+    (=cns11643-3	. #x2827)	; &C3-2827; [08-07]
     (=daikanwa		. 04978)	; &I-M-04978;
+    (<-ancient
+     ((=ucs		  . #x574D)	; 坍
+      (=daikanwa	  . 04927)	; &I-M-04927;
+      ))
+    (<-ancient*sources
+     zihui daikanwa)
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x3631)	; 㘱
+      ))
+    (ideographic-radical . 32)	; ⼟
+    (ideographic-strokes . 5)
+    (total-strokes	 . 8)
+    (=ucs@unicode	. #x3631)	; &UU+3631;
     ))
 (define-char
   '((ideographic-radical . 32)	; ⼟
@@ -3078,6 +3101,20 @@
     ))
 (define-char
   '((ideographic-radical . 32)	; ⼟
+    (ideographic-strokes . 5)
+    (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x53F9)	; 叹
+      )
+     ((=ucs		  . #x571F)	; 土
+      ))
+    (=ucs		. #x21299)	; 𡊙
+    ))
+(define-char
+  '((ideographic-radical . 32)	; ⼟
     (=ucs		. #x578B)	; 型
     ))
 (define-char