Use `shuowen-tongxundingsheng' instead of `shuowen-tongxun-dingsheng'
authorMORIOKA Tomohiko <tomo.git@chise.org>
Thu, 18 Jul 2024 02:43:25 +0000 (11:43 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Fri, 19 Jul 2024 07:08:14 +0000 (16:08 +0900)
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

index f15ad80..c7d333c 100644 (file)
   '((<-denotational
      ((=>ucs@component   . #x5DE6)     ; &A-compU+5DE6;
       ))
+    (<-denotational@usage
+     ((==>ucs@bucs       . #x5DE6)     ; &BUCS+5DE6;
+      ))
     (ideographic-radical . 48) ; ⼯
     (ideographic-strokes . 2)
     (total-strokes      . 5)
     (=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)    ; 𠂇
       (=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;
       (==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]
        )
        (=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;
     ))
 (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;
     ))