From 37946e12c1a40667fdca102ef2443a3fa1a54dc1 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Thu, 15 Oct 2020 12:46:24 +0900 Subject: [PATCH] (A-cgnU+7528): New abstract node. (AJ1-03899): Unify U+7528 instead of UU+7528 and A-IWDSU+7528; use A-cgnU+7528 instead of U+7528 as its mother. (U+7528-itaiji-002): Use A-cgnU+7528 instead of U+7528 as its mother. (HNG-KAR1081-0): Ditto. (U+752C-itaiji-004): Use `<-denotational@usage' instead of `<-denotational' for BUCS+752C. (A-cgnU+752C): New abstract node. (U+752C): Use `<-denotational@usage' instead of `<-denotational' for BUCS+752C; add `<-denotational' for A-cgnU+752C; unify A-J0-6135, A-GT-27879, A-GT-K02719 and IWDS1-0069. (A-J0-6135): Unify U+752C instead of A-IWDSU+752C and A-UU+752C; use A-cgnU+752C instead of U+752C as its mother; add `<-denotational@usage' for BUCS+752C. (U+752C-itaiji-005): Use A-cgnU+752C instead of U+752C as its mother; add `<-denotational@usage' for BUCS+752C. (U+752C-itaiji-003): Use `<-denotational@usage' instead of `<-denotational' for BUCS+752C. (U-00024C06): Use `->denotational' and `->subsumptive'. (U-000200B5): Add `ideographic-structure'. (IU+200B5): Apply new conventions for glyph granularity. (U-0002DEBA): New character. --- lisp/utf-2000/Ideograph-R101-Use.el | 221 ++++++++++++++++++++++++----------- 1 file changed, 154 insertions(+), 67 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R101-Use.el b/lisp/utf-2000/Ideograph-R101-Use.el index af6ecf1..6ba17d3 100644 --- a/lisp/utf-2000/Ideograph-R101-Use.el +++ b/lisp/utf-2000/Ideograph-R101-Use.el @@ -3,18 +3,17 @@ '((ideographic-radical . 101) ; ⽤ (ideographic-strokes . 0) (total-strokes . 5) - (=ucs . #x7528) ; 用 + (=>ucs@cognate . #x7528) ; &A-cgnU+7528; )) (define-char '((<-denotational - ((=ucs . #x7528) ; 用 + ((=>ucs@cognate . #x7528) ; &A-cgnU+7528; )) (ideographic-radical . 101) ; ⽤ (ideographic-strokes . 0) (total-strokes . 5) - (=>ucs@iwds-1 . #x7528) ; &AJ1-03899; - (=ucs@unicode . #x7528) ; &AJ1-03899; - (=adobe-japan1-0 . 03899) ; &AJ1-03899; + (=ucs . #x7528) ; 用 + (=adobe-japan1-0 . 03899) ; &I-AJ1-03899; (=jis-x0208 . #x4D51) ; &I-J90-4D51; [45-49] (=gb2312 . #x5343) ; &I-G0-5343; [51-35] (=ks-x1001 . #x6944) ; &I-K0-6944; [73-36] @@ -25,7 +24,7 @@ (=gt-k . 01016) ; &I-GT-K01016; (=gt-pj-1 . #x4D51) ; &I-GT-27874; [45-49] (=daikanwa . 21703) ; &I-M-21703; - (=shinjigen . 5014) ; &AJ1-03899; + (=shinjigen . 5014) ; 用 (->subsumptive ((==ucs@unicode . #x7528) ; &g2-AJ1-03899; (==adobe-japan1-0 . 03899) ; &g2-AJ1-03899; @@ -62,7 +61,7 @@ )) (define-char '((<-denotational - ((=ucs . #x7528) ; 用 + ((=>ucs@cognate . #x7528) ; &A-cgnU+7528; )) (ideographic-radical . 101) ; ⽤ (ideographic-strokes . 0) @@ -76,7 +75,7 @@ )) (define-char '((<-denotational - ((=ucs . #x7528) ; 用 + ((=>ucs@cognate . #x7528) ; &A-cgnU+7528; )) (ideographic-radical . 101) ; ⽤ (ideographic-strokes . 0) @@ -158,6 +157,18 @@ (=daikanwa . 49329) ; &I-M-49329; )) (define-char + '((<-denotational@usage + ((==>ucs@bucs . #x752C) ; &BUCS+752C; + )) + (ideographic-radical . 101) ; ⽤ + (ideographic-strokes . 1) + (total-strokes . 5) + (=ucs-itaiji-004 . #x752C) ; &U-i004+752C; + (<-formed + ((=ucs . #x752C) ; 甬 + )) + )) +(define-char '((ideographic-radical . 101) ; ⽤ (ideographic-strokes . 1) (total-strokes . 6) @@ -257,13 +268,6 @@ )) (define-char '((ideographic-radical . 101) ; ⽤ - (==>ucs@bucs . #x752C) ; &BUCS+752C; - )) -(define-char - '((<-denotational - ((==>ucs@bucs . #x752C) ; &BUCS+752C; - )) - (ideographic-radical . 101) ; ⽤ (ideographic-strokes . 2) (total-strokes . 7) (ideographic-structure @@ -274,28 +278,28 @@ ) ((=ucs . #x7528) ; 用 )) - (=ucs . #x752C) ; 甬 + (=>ucs@cognate . #x752C) ; &A-cgnU+752C; )) (define-char '((<-denotational - ((=ucs . #x752C) ; 甬 + ((=>ucs@cognate . #x752C) ; &A-cgnU+752C; + )) + (<-denotational@usage + ((==>ucs@bucs . #x752C) ; &BUCS+752C; )) (ideographic-radical . 101) ; ⽤ (ideographic-strokes . 2) (total-strokes . 7) - (=>ucs@iwds-1 . #x752C) ; &J97-6135; - (=>ucs@unicode . #x752C) ; &J97-6135; - (=>jis-x0208 . #x6135) ; &J97-6135; [65-21] - (=>jis-x0213-1 . #x6135) ; &J97-6135; [65-21] - (=>gt . 27879) ; &J97-6135; - (=>gt-k . 02719) ; &J97-6135; - (=>iwds-1 . 0069) ; &J97-6135; + (=ucs . #x752C) ; 甬 + (=>jis-x0208 . #x6135) ; 甬 [65-21] + (=>jis-x0213-1 . #x6135) ; 甬 [65-21] + (=>gt . 27879) ; 甬 + (=>gt-k . 02719) ; 甬 + (=>iwds-1 . 0069) ; 甬 )) (define-char '((<-denotational - ((=>ucs@iwds-1 . #x752C) ; &J97-6135; - (=>ucs@unicode . #x752C) ; &J97-6135; - (=>jis-x0208 . #x6135) ; &J97-6135; [65-21] + ((=ucs . #x752C) ; 甬 )) (ideographic-radical . 101) ; ⽤ (ideographic-strokes . 2) @@ -306,8 +310,7 @@ ) ((=ucs . #x9FB4) ; 龴 ) - ((=ucs@unicode . #x7528) ; &AJ1-03899; - (=adobe-japan1-0 . 03899) ; &AJ1-03899; + ((=ucs . #x7528) ; 用 )) (=ucs@unicode . #x752C) ; &AJ1-05708; (=adobe-japan1-0 . 05708) ; &AJ1-05708; @@ -356,9 +359,7 @@ )) (define-char '((<-denotational - ((=>ucs@iwds-1 . #x752C) ; &J97-6135; - (=>ucs@unicode . #x752C) ; &J97-6135; - (=>jis-x0208 . #x6135) ; &J97-6135; [65-21] + ((=ucs . #x752C) ; 甬 )) (ideographic-radical . 101) ; ⽤ (ideographic-strokes . 2) @@ -380,7 +381,10 @@ )) (define-char '((<-denotational - ((=ucs . #x752C) ; 甬 + ((=>ucs@cognate . #x752C) ; &A-cgnU+752C; + )) + (<-denotational@usage + ((==>ucs@bucs . #x752C) ; &BUCS+752C; )) (ideographic-radical . 101) ; ⽤ (ideographic-strokes . 2) @@ -388,7 +392,7 @@ (=ucs-itaiji-005 . #x752C) ; &U-i005+752C; )) (define-char - '((<-denotational + '((<-denotational@usage ((==>ucs@bucs . #x752C) ; &BUCS+752C; )) (ideographic-radical . 101) ; ⽤ @@ -400,18 +404,6 @@ )) )) (define-char - '((<-denotational - ((==>ucs@bucs . #x752C) ; &BUCS+752C; - )) - (ideographic-radical . 101) ; ⽤ - (ideographic-strokes . 1) - (total-strokes . 5) - (=ucs-itaiji-004 . #x752C) ; &U-i004+752C; - (<-formed - ((=ucs . #x752C) ; 甬 - )) - )) -(define-char '((ideographic-radical . 101) ; ⽤ (ideographic-strokes . 3) (total-strokes . 8) @@ -425,7 +417,6 @@ '((ideographic-radical . 101) ; ⽤ (ideographic-strokes . 3) (total-strokes . 8) - (hanyu-dazidian 1 39 3) (ideographic-structure ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND") (=ucs . #x2FF4) ; ⿴ @@ -438,25 +429,80 @@ ) ((=ucs . #x4E0A) ; 上 ) - ((=big5-cdp . #x8BF1) ; &CDP-8BF1; + ((=>ucs@iwds-1 . #x58EB) ; &A-IWDSU+58EB; + (=>iwds-1 . 31272) ; &A-IWDSU+58EB; )) )) (=ucs . #x24C06) ; 𤰆 - (=daikanwa . 21709) ; &I-M-21709; - (=hanziku-1 . #xABF9) ; &I-HZK01-ABF9; )) (define-char - '((=>ucs . #x24C06) ; 𤰆 - (morohashi-daikanwa 21709 0 2) + '((<-denotational + ((=ucs . #x24C06) ; 𤰆 + )) (ideographic-radical . 101) ; ⽤ (ideographic-strokes . 3) (total-strokes . 8) + (hanyu-dazidian 1 39 3) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND") + (=ucs . #x2FF4) ; ⿴ + ) + ((=big5-cdp . #x8BF5) ; &CDP-8BF5; + ) + ((ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=ucs . #x4E0A) ; 上 + ) + ((=ucs . #x30001) ; 𰀁 + )) + )) + (=ucs@iso . #x24C06) ; &C6-2D2E; (=cns11643-6 . #x2D2E) ; &C6-2D2E; [13-14] + (=daikanwa . 21709) ; &I-M-21709; + (<-ancient + ((=ucs . #x7528) ; 用 + (=daikanwa . 21703) ; &I-M-21703; + )) + (<-ancient*sources + jiyun daikanwa) + (->subsumptive + ((==ucs@iso . #x24C06) ; &g2-M-21709; + (==daikanwa . 21709) ; &g2-M-21709; + (->subsumptive + ((===daikanwa . 21709) ; &R-M-21709; + ) + ((===ucs@iso . #x24C06) ; &R-U-00024C06; + ) + ((=hanziku-1 . #xABF9) ; &HZK01-ABF9; + )) + ) + ((==ucs@cns . #x24C06) ; &g2-CU+24C06; + (==cns11643-6 . #x2D2E) ; &g2-CU+24C06; [13-14] + )) )) (define-char '((ideographic-radical . 101) ; ⽤ (ideographic-strokes . 3) (total-strokes . 8) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND") + (=ucs . #x2FF4) ; ⿴ + ) + ((=big5-cdp . #x8BF5) ; &CDP-8BF5; + ) + ((ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=>ucs@iwds-1 . #x58EB) ; &A-IWDSU+58EB; + (=>iwds-1 . 31272) ; &A-IWDSU+58EB; + ) + ((=>ucs@iwds-1 . #x58EB) ; &A-IWDSU+58EB; + (=>iwds-1 . 31272) ; &A-IWDSU+58EB; + )) + )) (=ucs . #x200B5) ; 𠂵 )) (define-char @@ -479,28 +525,34 @@ ) ((=ucs . #x571F) ; 土 ) - ((=big5-cdp . #x8BF1) ; &CDP-8BF1; + ((=ucs . #x30001) ; 𰀁 )) )) - (=ucs@iso . #x200B5) ; &M-21710; - (=daikanwa . 21710) ; &M-21710; - (=hanziku-1 . #xABE7) ; &I-HZK01-ABE7; + (=ucs@iso . #x200B5) ; &C6-2D2D; + (=cns11643-6 . #x2D2D) ; &C6-2D2D; [13-13] + (=daikanwa . 21710) ; &I-M-21710; + (<-ancient + ((=ucs . #x7528) ; 用 + (=daikanwa . 21703) ; &I-M-21703; + )) + (<-ancient*sources + pianhai-leibian daikanwa) (->subsumptive - ((===daikanwa . 21710) ; &R-M-21710; + ((==ucs@iso . #x200B5) ; &g2-M-21710; + (==daikanwa . 21710) ; &g2-M-21710; + (->subsumptive + ((===daikanwa . 21710) ; &R-M-21710; + ) + ((===ucs@iso . #x200B5) ; &R-U-000200B5; + ) + ((=hanziku-1 . #xABE7) ; &HZK01-ABE7; + )) ) - ((===ucs@iso . #x200B5) ; &R-U-000200B5; + ((==ucs@cns . #x200B5) ; &g2-CU+200B5; + (==cns11643-6 . #x2D2D) ; &g2-CU+200B5; [13-13] )) )) (define-char - '((<-denotational - ((=ucs . #x200B5) ; 𠂵 - )) - (ideographic-radical . 101) ; ⽤ - (ideographic-strokes . 3) - (total-strokes . 8) - (=cns11643-6 . #x2D2D) ; &C6-2D2D; [13-13] - )) -(define-char '((ideographic-radical . 101) ; ⽤ (ideographic-strokes . 3) (total-strokes . 8) @@ -819,6 +871,37 @@ )) )) (define-char + '((ideographic-radical . 101) ; ⽤ + (ideographic-strokes . 6) + (total-strokes . 11) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=big5-cdp . #x8B72) ; &CDP-8B72; + ) + ((=ucs . #x7528) ; 用 + )) + (=ucs . #x2DEBA) ; 𭺺 + (=mj . 058082) ; &I-MJ058082; + (=koseki . 243540) ; 𭺺 + (<-formed + ((=ucs . #x8076) ; 聶 + )) + (<-formed$_1*sources + mj) + (<-formed*sources + mj) + (->subsumptive + ((==ucs@JP/hanazono . #x2DEBA) ; &g2-MJ058082; + (==mj . 058082) ; &g2-MJ058082; + (==koseki . 243540) ; &g2-MJ058082; + (->subsumptive + ((===mj . 058082) ; &R-MJ058082; + )) + )) + )) +(define-char '((<-denotational ((=>ucs@cognate . #x65C9) ; &A-cgnU+65C9; )) @@ -1087,3 +1170,7 @@ (total-strokes . 22) (=cns11643-5 . #x735B) ; &C5-735B; [83-59] )) +(define-char + '((ideographic-radical . 101) ; ⽤ + (==>ucs@bucs . #x752C) ; &BUCS+752C; + )) -- 1.7.10.4