From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 16 Apr 2019 14:20:30 +0000 (+0900)
Subject: (U+5195): Add `<-denotational@component' for A-IWDSU+5195; add
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=992c7e3b8616d31cfbbc62a1cc869bd4750dab2d;p=chise%2Fxemacs-chise.git

(U+5195): Add `<-denotational@component' for A-IWDSU+5195; add
`ideographic-structure'.
(U-00020564): Add `<-denotational@component' for A-IWDSU+5195; use
IWDS1-0118 instead of U+5183 as a component.
(IU+20564): Use <CJK RADICAL SUN> instead of U+5183 as a component.
(H4-E3AB): Likewise.
(A-IWDSU+5195): New abstract node.
---

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index 6af2fef..e6b5e01 100644
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -3385,7 +3385,10 @@
       ))
     ))
 (define-char
-  '((<-denotational@usage
+  '((<-denotational@component
+     ((=>ucs@iwds-1	  . #x5195)	; &A-IWDSU+5195;
+      ))
+    (<-denotational@usage
      ((==>daijiten	  . 00639)	; &A2-DJT-00639;
       ))
     (ideographic-radical@ucs . 13)	; ⼌
@@ -3399,6 +3402,15 @@
     (ideographic-radical@ucs/compat*sources
      cns11643-6)
     (total-strokes	 . 11)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=>ucs@component	  . #x65E5)	; &A-compU+65E5;
+      (=>iwds-1		  .  0118)	; &A-compU+65E5;
+      )
+     ((=ucs		  . #x514D)	; 免
+      ))
     (=ucs		. #x5195)	; 冕
     (=big5		. #xB0C3)	; &I-B-B0C3;
     ))
@@ -3947,7 +3959,10 @@
     (=cns11643-4	. #x363D)	; &I-C4-363D; [22-29]
     ))
 (define-char
-  '((<-denotational@usage
+  '((<-denotational@component
+     ((=>ucs@iwds-1	  . #x5195)	; &A-IWDSU+5195;
+      ))
+    (<-denotational@usage
      ((==>daijiten	  . 00641)	; &A2-DJT-00641;
       ))
     (ideographic-radical . 13)	; ⼌
@@ -3957,7 +3972,8 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱
       )
-     ((=ucs		  . #x5183)	; 冃
+     ((=>ucs@component	  . #x65E5)	; &A-compU+65E5;
+      (=>iwds-1		  .  0118)	; &A-compU+65E5;
       )
      ((=ucs		  . #x5154)	; 兔
       ))
@@ -3975,7 +3991,8 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱
       )
-     ((=ucs		  . #x5183)	; 冃
+     ((name		  . "CJK RADICAL SUN")
+      (=ucs		  . #x2E9C)	; ⺜
       )
      ((=ucs@unicode	  . #x5154)	; &MJ007242;
       (=mj		  . 007242)	; &MJ007242;
@@ -4039,7 +4056,8 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱
       )
-     ((=ucs		  . #x5183)	; 冃
+     ((name		  . "CJK RADICAL SUN")
+      (=ucs		  . #x2E9C)	; ⺜
       )
      ((=ucs		  . #x2F80F)	; 兔
       ))
@@ -4640,6 +4658,20 @@
     ))
 (define-char
   '((ideographic-radical . 13)	; ⼌
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=>ucs@component	  . #x65E5)	; &A-compU+65E5;
+      (=>iwds-1		  .  0118)	; &A-compU+65E5;
+      )
+     ((=>ucs@component	  . #x514D)	; &A-compU+514D;
+      (=>iwds-1		  .  10243)	; &A-compU+514D;
+      ))
+    (=>ucs@iwds-1	. #x5195)	; &A-IWDSU+5195;
+    ))
+(define-char
+  '((ideographic-radical . 13)	; ⼌
     (=>ucs@component	. #x34BC)	; &A-compU+34BC;
     (=>iwds-1		.  0302)	; &A-compU+34BC;
     ))