From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 20 Mar 2017 18:11:21 +0000 (+0900)
Subject: (IWDS1-0222): New abstract component; unify A-compU+513F.
X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=commitdiff_plain;h=4c2f9247caa60d87e56abc88f783aa6ff6580289

(IWDS1-0222): New abstract component; unify A-compU+513F.
(U+513F): Add `<-denotational@component' for IWDS1-0119 and
IWDS1-0222.
(U+5140): Add `<-denotational@component' for IWDS1-0099, IWDS1-0214
and IWDS1-0221.
(IWDS1-0214): New abstract component; unify A-compU+5140.
---

diff --git a/lisp/utf-2000/Ideograph-R010-Legs.el b/lisp/utf-2000/Ideograph-R010-Legs.el
index e852c05..0cb7696 100644
--- a/lisp/utf-2000/Ideograph-R010-Legs.el
+++ b/lisp/utf-2000/Ideograph-R010-Legs.el
@@ -4,9 +4,23 @@
     (==>ucs@bucs	. #x5152)	; &BUCS+5152;
     ))
 (define-char
+  '((ideographic-radical . 10)	; ⼉
+    (ideographic-strokes . 0)
+    (total-strokes	 . 2)
+    (=>ucs@component	. #x513F)	; &IWDS1-222;
+    (=>iwds-1		.  0222)	; &IWDS1-222;
+    ))
+(define-char
   '((<-denotational
      ((==>ucs@bucs	  . #x5152)	; &BUCS+5152;
       ))
+    (<-denotational@component
+     ((=>ucs@component	  . #x51E0)	; &IWDS1-119;
+      (=>iwds-1		  .  0119)	; &IWDS1-119;
+      )
+     ((=>ucs@component	  . #x513F)	; &IWDS1-222;
+      (=>iwds-1		  .  0222)	; &IWDS1-222;
+      ))
     (ideographic-radical . 10)	; ⼉
     (ideographic-strokes . 0)
     (total-strokes	 . 2)
@@ -59,7 +73,17 @@
       ))
     ))
 (define-char
-  '((ideographic-radical@ucs . 10)	; ⼉
+  '((<-denotational@component
+     ((=>ucs@component	  . #x5C22)	; &IWDS1-099;
+      (=>iwds-1		  .  0099)	; &IWDS1-099;
+      )
+     ((=>ucs@component	  . #x5140)	; &IWDS1-214;
+      (=>iwds-1		  .  0214)	; &IWDS1-214;
+      )
+     ((=>ucs@component	  . #x4E0C)	; &IWDS1-221;
+      (=>iwds-1		  .  0221)	; &IWDS1-221;
+      ))
+    (ideographic-radical@ucs . 10)	; ⼉
     (ideographic-strokes@ucs . 1)
     (ideographic-radical@unknown . 43)	; ⼪
     (ideographic-strokes@unknown . 0)
@@ -4295,3 +4319,8 @@
       (==ucs@iso	  . #x204DA)	; &g2-IU-000204DA;
       ))
     ))
+(define-char
+  '((ideographic-radical@ucs . 10)	; ⼉
+    (=>ucs@component	. #x5140)	; &IWDS1-214;
+    (=>iwds-1		.  0214)	; &IWDS1-214;
+    ))