From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 12 Jul 2017 14:52:00 +0000 (+0900)
Subject: (GT-K00859): Add `<-denotational@component' for A-compU+706B.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=42acaf36389aa3b1df4123860ee0cbf14d311f35;p=chise%2Fxemacs-chise.git-

(GT-K00859): Add `<-denotational@component' for A-compU+706B.
(g2-UU+5173): Apply new conventions for glyph granularity for
components of ideographic-structure.
(U+34B8): Add `ideographic-structure'.
(g2-UU+34B8): Apply new conventions for glyph granularity for
components of ideographic-structure.
(g2-CU+34B8): Likewise.
---

diff --git a/lisp/utf-2000/Ideograph-R012-Eight.el b/lisp/utf-2000/Ideograph-R012-Eight.el
index 719cbb2..f99be93 100644
--- a/lisp/utf-2000/Ideograph-R012-Eight.el
+++ b/lisp/utf-2000/Ideograph-R012-Eight.el
@@ -451,6 +451,9 @@
   '((<-denotational
      ((=ucs		  . #x20501)	; 𠔁
       ))
+    (<-denotational@component
+     ((=>ucs@component	  . #x706B)	; &A-compU+706B;
+      ))
     (ideographic-radical . 12)	; ⼋
     (ideographic-strokes . 2)
     (total-strokes	 . 4)
@@ -998,7 +1001,8 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
 	(=ucs		    . #x2FF1)	; ⿱
 	)
-       ((=ucs		    . #x4E37)	; 丷
+       ((==ucs@unicode	    . #x4E37)	; &g2-AJ1-13981;
+	(==adobe-japan1-4   . 13981)	; &g2-AJ1-13981;
 	)
        ((==ucs@unicode	    . #x5929)	; &GT-K00468;
 	(=gt-k		    . 00468)	; &GT-K00468;
@@ -1989,6 +1993,15 @@
   '((ideographic-radical . 12)	; ⼋
     (ideographic-strokes . 7)
     (total-strokes	 . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=>ucs@component	  . #x4E37)	; &A-compU+4E37;
+      (=>iwds-1		  .  0022)	; &A-compU+4E37;
+      )
+     ((=ucs		  . #x8C55)	; 豕
+      ))
     (=ucs		. #x34B8)	; 㒸
     ))
 (define-char
@@ -2050,7 +2063,8 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
 	(=ucs		    . #x2FF1)	; ⿱
 	)
-       ((=ucs		    . #x4E37)	; 丷
+       ((==ucs@unicode	    . #x4E37)	; &g2-AJ1-13981;
+	(==adobe-japan1-4   . 13981)	; &g2-AJ1-13981;
 	)
        ((==ucs@unicode	    . #x8C55)	; &g2-UU+8C55;
 	))
@@ -2061,7 +2075,8 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
 	(=ucs		    . #x2FF1)	; ⿱
 	)
-       ((=ucs		    . #x4E37)	; 丷
+       ((==ucs@unicode	    . #x4E37)	; &g2-AJ1-13981;
+	(==adobe-japan1-4   . 13981)	; &g2-AJ1-13981;
 	)
        ((==ucs@cns	    . #x8C55)	; &g2-MJ024907;
 	(==mj		    . 024907)	; &g2-MJ024907;