From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 24 May 2017 09:46:26 +0000 (+0900)
Subject: (U+5DE5): Separate A-UU+5DE5.
X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=commitdiff_plain;h=e5decd9bd5127c810dbf1b8ca284af1a10c9adec

(U+5DE5): Separate A-UU+5DE5.
(A-UU+5DE5): Unify A-IWDSU+5DE5 and IWDS1-0408.
(GT-K00173): Use `<-subsumptive' instead of `<-denotational' for
UU+5DE5.
(BC-8BC8): New character; use `<-denotational' for U+5DE5.
(UU+5DE6): Add `ideographic-structure'.
(U+5DE6-itaiji-002): New character; use `<-denotational' for U+5DE6.
(HD-IB0665): Add `ideographic-structure'.
(U-00022029): Use `->denotational' and `->subsumptive'.
(U+22029-itaiji-002): New character; use `<-denotational' for
U-00022029.
---

diff --git a/lisp/utf-2000/Ideograph-R048-Work.el b/lisp/utf-2000/Ideograph-R048-Work.el
index ababf4b..fdb7162 100644
--- a/lisp/utf-2000/Ideograph-R048-Work.el
+++ b/lisp/utf-2000/Ideograph-R048-Work.el
@@ -1,8 +1,6 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
   '((ideographic-radical . 48)	; ⼯
-    (ideographic-strokes . 0)
-    (total-strokes	 . 3)
     (=ucs		. #x5DE5)	; å·¥
     ))
 (define-char
@@ -12,6 +10,19 @@
     (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 0)
     (total-strokes	 . 3)
+    (=>ucs@iwds-1	. #x5DE5)	; &A-IWDSU+5DE5;
+    (=>ucs@unicode	. #x5DE5)	; &A-IWDSU+5DE5;
+    (=>iwds-1		.  0408)	; &A-IWDSU+5DE5;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@iwds-1	  . #x5DE5)	; &A-IWDSU+5DE5;
+      (=>ucs@unicode	  . #x5DE5)	; &A-IWDSU+5DE5;
+      (=>iwds-1		  .  0408)	; &A-IWDSU+5DE5;
+      ))
+    (ideographic-radical . 48)	; ⼯
+    (ideographic-strokes . 0)
+    (total-strokes	 . 3)
     (=ucs@unicode	. #x5DE5)	; &AJ1-01979;
     (=adobe-japan1-0	. 01979)	; &AJ1-01979;
     (=jis-x0208		. #x3929)	; &I-J90-3929; [25-09]
@@ -62,21 +73,36 @@
 	)
        ((===hng-kar	    . 07980)	; &HNG018-07980;
 	))
+      )
+     ((=gt-k		  . 00173)	; &GT-K00173;
+      (=gt-pj-k1	  . #x3474)	; &GT-K00173; [20-84]
+      (<-formed@component/connect-right
+       ((=ucs@unicode	    . #x5DE5)	; &AJ1-01979;
+	(=adobe-japan1-0    . 01979)	; &AJ1-01979;
+	))
+      (->subsumptive
+       ((==gt-k		    . 00173)	; &g2-GT-K00173;
+	(==gt-pj-k1	    . #x3474)	; &g2-GT-K00173; [20-84]
+	))
       ))
     ))
 (define-char
   '((<-denotational
-     ((=ucs@unicode	  . #x5DE5)	; &AJ1-01979;
-      (=adobe-japan1-0	  . 01979)	; &AJ1-01979;
+     ((=>ucs@iwds-1	  . #x5DE5)	; &A-IWDSU+5DE5;
+      (=>ucs@unicode	  . #x5DE5)	; &A-IWDSU+5DE5;
+      (=>iwds-1		  .  0408)	; &A-IWDSU+5DE5;
       ))
     (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 0)
     (total-strokes	 . 3)
-    (=gt-k		. 00173)	; &GT-K00173;
-    (=gt-pj-k1		. #x3474)	; &GT-K00173; [20-84]
-    (<-formed@component/connect-right
-     ((=ucs@unicode	  . #x5DE5)	; &AJ1-01979;
-      (=adobe-japan1-0	  . 01979)	; &AJ1-01979;
+    (=adobe-japan1-4	. 13763)	; &AJ1-13763;
+    (->subsumptive
+     ((=decomposition@cid
+       ((=ucs		    . #x5DE5)	; å·¥
+	)
+       ((=ucs		    . #xE0101)	; 󠄁
+	))
+      (==adobe-japan1-4	  . 13763)	; &g2-AJ1-13763;
       ))
     ))
 (define-char
@@ -86,12 +112,10 @@
     (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 0)
     (total-strokes	 . 3)
-    (=decomposition@cid
-     ((=ucs		  . #x5DE5)	; å·¥
-      )
-     ((=ucs		  . #xE0101)	; 󠄁
+    (=big5-cdp		. #x8BC8)	; &CDP-8BC8;
+    (->subsumptive
+     ((==big5-cdp	  . #x8BC8)	; &g2-CDP-8BC8;
       ))
-    (=adobe-japan1-4	. 13763)	; &AJ1-13763;
     ))
 (define-char
   '((ideographic-radical . 48)	; ⼯
@@ -146,6 +170,15 @@
     (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 2)
     (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs		  . #x2FF8)	; ⿸
+      )
+     ((=ucs		  . #x20087)	; 𠂇
+      )
+     ((=ucs@unicode	  . #x5DE5)	; &AJ1-01979;
+      (=adobe-japan1-0	  . 01979)	; &AJ1-01979;
+      ))
     (=ucs@unicode	. #x5DE6)	; &AJ1-02088;
     (=adobe-japan1-0	. 02088)	; &AJ1-02088;
     (=jis-x0208		. #x3A38)	; &I-J90-3A38; [26-24]
@@ -211,7 +244,37 @@
       ))
     (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 2)
+    (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs		  . #x2FF8)	; ⿸
+      )
+     ((=ucs		  . #x4E06)	; 丆
+      )
+     ((=ucs@unicode	  . #x5DE5)	; &AJ1-01979;
+      (=adobe-japan1-0	  . 01979)	; &AJ1-01979;
+      ))
+    (=ucs-itaiji-002	. #x5DE6)	; &U-i002+5DE6;
+    (<-formed@component/connect-above
+     ((=ucs@unicode	  . #x5DE6)	; &AJ1-02088;
+      (=adobe-japan1-0	  . 02088)	; &AJ1-02088;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x5DE6)	; å·¦
+      ))
+    (ideographic-radical . 48)	; ⼯
+    (ideographic-strokes . 2)
     (total-strokes	 . 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs		  . #x2FF8)	; ⿸
+      )
+     ((=ucs		  . #x20087)	; 𠂇
+      )
+     ((=big5-cdp	  . #x8BC8)	; &CDP-8BC8;
+      ))
     (=hanyo-denshi/ib	. #x2661)	; &HD-IB-2661; [06-65]
     (->subsumptive
      ((=decomposition@hanyo-denshi
@@ -404,8 +467,8 @@
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@component	  . #x5723)	; &IWDS1-087;
-      (=>iwds-1		  .  0087)	; &IWDS1-087;
+     ((=>ucs@component	  . #x5723)	; &A-compU+5723;
+      (=>iwds-1		  .  0087)	; &A-compU+5723;
       ))
     (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 2)
@@ -1053,19 +1116,134 @@
       ))
     ))
 (define-char
-  '((=>ucs		. #x22029)	; 𢀩
+  '((ideographic-radical . 48)	; ⼯
+    (ideographic-strokes . 12)
+    (total-strokes	 . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x200B9)	; 𠂹
+      )
+     ((=ucs		  . #x5DE6)	; å·¦
+      ))
+    (=ucs		. #x22029)	; 𢀩
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x22029)	; 𢀩
+      ))
     (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 12)
     (total-strokes	 . 15)
-    (=daikanwa		. 08736)	; &M-08736;
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x200B9)	; 𠂹
+      )
+     ((=ucs-itaiji-002	  . #x5DE6)	; &U-i002+5DE6;
+      ))
+    (=>ucs@iso		. #x22029)	; &A-IU+22029;
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=ucs-var-001	    . #x200B9)	; &U-v001+200B9;
+	)
+       ((=ucs-itaiji-002    . #x5DE6)	; &U-i002+5DE6;
+	))
+      (=mj		  . 034953)	; &MJ034953;
+      (=hanyo-denshi/ks	  . 098950)	; &MJ034953;
+      (=daikanwa	  . 08736)	; &I-M-08736;
+      (<-ancient
+       ((=ucs@cns	    . #x5DEE)	; &AJ1-02089;
+	(=ucs@jis	    . #x5DEE)	; &AJ1-02089;
+	(=ucs@ks	    . #x5DEE)	; &AJ1-02089;
+	(=adobe-japan1-0    . 02089)	; &AJ1-02089;
+	(=daikanwa	    . 08732)	; &I-M-08732;
+	))
+      (<-ancient*sources
+       jiyun daikanwa)
+      (<-formed
+       ((=ucs@cns	    . #x5DEE)	; &AJ1-02089;
+	(=ucs@jis	    . #x5DEE)	; &AJ1-02089;
+	(=ucs@ks	    . #x5DEE)	; &AJ1-02089;
+	(=adobe-japan1-0    . 02089)	; &AJ1-02089;
+	))
+      (<-formed*sources
+       koseki)
+      (->subsumptive
+       ((==mj		    . 034953)	; &g2-MJ034953;
+	(==hanyo-denshi/ks  . 098950)	; &g2-MJ034953;
+	(==daikanwa	    . 08736)	; &g2-MJ034953;
+	(->subsumptive
+	 ((===daikanwa	      . 08736)	; &R-M-08736;
+	  )
+	 ((===hanyo-denshi/ks . 098950)	; &R-HD-KS-098950;
+	  (=hanyo-denshi/ks/mf . #x26A7)	; &R-HD-KS-098950;
+	  )
+	 ((===mj	      . 034953)	; &R-MJ034953;
+	  ))
+	))
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=ucs@iso	    . #x200B9)	; &GT-00211;
+	(=cns11643-5	    . #x2B67)	; &GT-00211; [11-71]
+	(=daikanwa	    . 00155)	; &I-M-00155;
+	)
+       ((=ucs-itaiji-002    . #x5DE6)	; &U-i002+5DE6;
+	))
+      (=ucs@iso		  . #x22029)	; &MJ034954;
+      (=mj		  . 034954)	; &MJ034954;
+      (=cns11643-7	  . #x2253)	; &I-C7-2253; [02-51]
+      (=hanyo-denshi/ks	  . 098980)	; &MJ034954;
+      (<-formed
+       ((=mj		    . 034953)	; &MJ034953;
+	))
+      (<-formed*sources
+       koseki)
+      (->subsumptive
+       ((==ucs@iso	    . #x22029)	; &g2-MJ034954;
+	(==mj		    . 034954)	; &g2-MJ034954;
+	(==cns11643-7	    . #x2253)	; &g2-MJ034954; [02-51]
+	(==hanyo-denshi/ks  . 098980)	; &g2-MJ034954;
+	(->subsumptive
+	 ((===hanyo-denshi/ks . 098980)	; &R-HD-KS-098980;
+	  (=hanyo-denshi/ks/mf . #x26AA)	; &R-HD-KS-098980;
+	  )
+	 ((===mj	      . 034954)	; &R-MJ034954;
+	  )
+	 ((===cns11643-7      . #x2253)	; &R-C7-2253; [02-51]
+	  )
+	 ((===ucs@iso	      . #x22029)	; &R-U-00022029;
+	  ))
+	))
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	8736 0 2)
+  '((<-denotational
+     ((=ucs		  . #x22029)	; 𢀩
+      ))
     (ideographic-radical . 48)	; ⼯
     (ideographic-strokes . 12)
     (total-strokes	 . 15)
-    (=ucs		. #x22029)	; 𢀩
-    (=cns11643-7	. #x2253)	; &I-C7-2253; [02-51]
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@iso		  . #x200B9)	; &GT-00211;
+      (=cns11643-5	  . #x2B67)	; &GT-00211; [11-71]
+      (=daikanwa	  . 00155)	; &I-M-00155;
+      )
+     ((=ucs@unicode	  . #x5DE6)	; &AJ1-02088;
+      (=adobe-japan1-0	  . 02088)	; &AJ1-02088;
+      ))
+    (=ucs-itaiji-002	. #x22029)	; &U-i002+22029;
     ))
 (define-char
   '((ideographic-radical . 48)	; ⼯