From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 29 Nov 2018 13:36:05 +0000 (+0900)
Subject: (U+7535): Add `<-denotational' for A-IWDSU+7535.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=dd4828f8e6656c6d76181c14d0eeea600d7614c3;p=chise%2Fxemacs-chise.git

(U+7535): Add `<-denotational' for A-IWDSU+7535.
(UU+7535): Add `<-denotational@component' for IWDS1-0171.
(A-IWDSU+7535): New abstract node.
(IWDS1-0171): New abstract node; add `<-denotational' for
A-IWDSU+7535.
---

diff --git a/lisp/utf-2000/Ideograph-R073-Say.el b/lisp/utf-2000/Ideograph-R073-Say.el
index 7a26d5b..cc77792 100644
--- a/lisp/utf-2000/Ideograph-R073-Say.el
+++ b/lisp/utf-2000/Ideograph-R073-Say.el
@@ -69,7 +69,11 @@
     (=daikanwa		. 14279)	; &I-M-14279;
     ))
 (define-char
-  '((ideographic-radical . 73)	; ⽈
+  '((<-denotational
+     ((=>ucs@iwds-1	  . #x7535)	; &A-IWDSU+7535;
+      (=>iwds-1		  .  17197)	; &A-IWDSU+7535;
+      ))
+    (ideographic-radical . 73)	; ⽈
     (ideographic-strokes . 1)
     (total-strokes	 . 5)
     (=ucs		. #x7535)	; 电
@@ -79,6 +83,10 @@
   '((<-denotational
      ((=ucs		  . #x7535)	; 电
       ))
+    (<-denotational@component
+     ((=>ucs@component	  . #x7535)	; &A-compU+7535;
+      (=>iwds-1		  .  0171)	; &A-compU+7535;
+      ))
     (ideographic-radical . 73)	; ⽈
     (ideographic-strokes . 1)
     (total-strokes	 . 5)
@@ -123,6 +131,20 @@
     ))
 (define-char
   '((ideographic-radical . 73)	; ⽈
+    (=>ucs@iwds-1	. #x7535)	; &A-IWDSU+7535;
+    (=>iwds-1		.  17197)	; &A-IWDSU+7535;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@iwds-1	  . #x7535)	; &A-IWDSU+7535;
+      (=>iwds-1		  .  17197)	; &A-IWDSU+7535;
+      ))
+    (ideographic-radical . 73)	; ⽈
+    (=>ucs@component	. #x7535)	; &A-compU+7535;
+    (=>iwds-1		.  0171)	; &A-compU+7535;
+    ))
+(define-char
+  '((ideographic-radical . 73)	; ⽈
     (ideographic-strokes . 2)
     (total-strokes	 . 6)
     (=ucs		. #x66F2)	; 曲