From 6b24b17b86d731c5c2f9d766f4fe3c087cc9221a Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Thu, 18 Jul 2024 11:43:25 +0900 Subject: [PATCH] Use `shuowen-tongxundingsheng' instead of `shuowen-tongxun-dingsheng' as a source ID. (U+5DE6): Add `<-denotational@usage' for BUCS+5DE6. (UU+5DE6): Unify DJT-02774. (BUCS+5DE6): New abstract node; unify A2-DJT-02774. --- lisp/utf-2000/Ideograph-R048-Work.el | 20 ++++++++++++++++---- 1 file changed, 16 insertions(+), 4 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R048-Work.el b/lisp/utf-2000/Ideograph-R048-Work.el index f15ad80..c7d333c 100644 --- a/lisp/utf-2000/Ideograph-R048-Work.el +++ b/lisp/utf-2000/Ideograph-R048-Work.el @@ -387,6 +387,9 @@ '((<-denotational ((=>ucs@component . #x5DE6) ; &A-compU+5DE6; )) + (<-denotational@usage + ((==>ucs@bucs . #x5DE6) ; &BUCS+5DE6; + )) (ideographic-radical . 48) ; ⼯ (ideographic-strokes . 2) (total-strokes . 5) @@ -430,6 +433,7 @@ (=gt-k . 00933) ; &I-GT-K00933; (=gt-pj-1 . #x3A38) ; &I-GT-11000; [26-24] (=daikanwa . 08720) ; &I-M-08720; + (=daijiten . 02774) ; &I-DJT-02774; (=shinjigen . 2063) ; &MJ010774; (<-formed ((=ucs . #x20087) ; 𠂇 @@ -441,7 +445,7 @@ (=daikanwa . 00112) ; &I-M-00112; )) (<-interchangeable*sources - shuowen-tongxun-dingsheng daikanwa) + shuowen-tongxundingsheng daikanwa) (<-same ((=ucs@unicode . #x4F50) ; &AJ1-02084; (=adobe-japan1-0 . 02084) ; &AJ1-02084; @@ -472,10 +476,13 @@ (==gt . 11000) ; &g2-MJ010774; (==gt-k . 00933) ; &g2-MJ010774; (==daikanwa . 08720) ; &g2-MJ010774; + (==daijiten . 02774) ; &g2-MJ010774; (==shinjigen . 2063) ; &g2-MJ010774; (->subsumptive ((===daikanwa . 08720) ; &R-M-08720; ) + ((===daijiten . 02774) ; &R-DJT-02774; + ) ((===jis-x0208 . #x3A38) ; &R-J0-3A38; [26-24] (===jis-x0213-1 . #x3A38) ; &R-J0-3A38; [26-24] ) @@ -710,11 +717,11 @@ (=daikanwa . 35370) ; &I-M-35370; )) (<-interchangeable$_1*sources - shuowen-tongxun-dingsheng daikanwa) + shuowen-tongxundingsheng daikanwa) (<-interchangeable$_2*sources - shuowen-tongxun-dingsheng hanshu-zhu daikanwa) + shuowen-tongxundingsheng hanshu-zhu daikanwa) (<-interchangeable*sources - shuowen-tongxun-dingsheng daikanwa) + shuowen-tongxundingsheng daikanwa) (<-original ((=ucs@cns . #x77E9) ; &AJ1-13732; (=adobe-japan1-4 . 13732) ; &AJ1-13732; @@ -2883,6 +2890,11 @@ )) (define-char '((ideographic-radical . 48) ; ⼯ + (==>ucs@bucs . #x5DE6) ; &BUCS+5DE6; + (==>daijiten . 02774) ; &BUCS+5DE6; + )) +(define-char + '((ideographic-radical . 48) ; ⼯ (==>ucs@bucs . #x5DE8) ; &BUCS+5DE8; (==>daijiten . 02776) ; &BUCS+5DE8; )) -- 1.7.10.4