From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 25 May 2017 08:46:53 +0000 (+0900)
Subject: (M-09215): Add `ideographic-structure'; add representative nodes.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=dce9d281dbfe0e87f5ba28ddcafebbd7c8785298;p=chise%2Fxemacs-chise.git

(M-09215): Add `ideographic-structure'; add representative nodes.
---

diff --git a/lisp/utf-2000/Ideograph-R052-Short-Thread.el b/lisp/utf-2000/Ideograph-R052-Short-Thread.el
index 15dfd4a..92d3af1 100644
--- a/lisp/utf-2000/Ideograph-R052-Short-Thread.el
+++ b/lisp/utf-2000/Ideograph-R052-Short-Thread.el
@@ -623,7 +623,15 @@
     (total-strokes	 . 14)
     (=ucs		. #x386D)	; ã¡­
     (->subsumptive
-     ((=daikanwa	  . 09215)	; &M-09215;
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=ucs		    . #x221B8)	; 𢆸
+	)
+       ((=ucs		    . #x221B8)	; 𢆸
+	))
+      (=daikanwa	  . 09215)	; &M-09215;
       (=shinjigen	  .  6056)	; &M-09215;
       (<-formed
        ((=daikanwa	    . 27997)	; &M-27997;
@@ -649,9 +657,20 @@
 	))
       (<-same*sources
        shuowen daikanwa)
+      (->subsumptive
+       ((==daikanwa	    . 09215)	; &g2-M-09215;
+	(==shinjigen	    .  6056)	; &g2-M-09215;
+	))
       )
      ((=ucs@unicode	  . #x386D)	; &C3-465E;
       (=cns11643-3	  . #x465E)	; &C3-465E; [38-62]
+      (->subsumptive
+       ((==ucs@cns	    . #x386D)	; &g2-CU+386D;
+	(==cns11643-3	    . #x465E)	; &g2-CU+386D; [38-62]
+	)
+       ((==ucs@unicode	    . #x386D)	; &g2-UU+386D;
+	(==ucs@JP/hanazono  . nil)
+	))
       ))
     ))
 (define-char