Use `shuowen-tongxundingsheng' instead of `shuowen-tongxun-dingsheng'
authorMORIOKA Tomohiko <tomo.git@chise.org>
Wed, 17 Jul 2024 20:14:49 +0000 (05:14 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Fri, 19 Jul 2024 06:49:23 +0000 (15:49 +0900)
as a source ID.
(U+5C53): Add BUCS+5C6D as a target of `<-denotational@usage'.
(BUCS+5C6D): New abstract node.
(A2-DJT-02506): Unify BUCS+5C64.
(BUCS+5C68): New abstract node; unify A2-DJT-02511.

lisp/utf-2000/Ideograph-R044-Corpse.el

index d7717df..1d2cabe 100644 (file)
       (=daikanwa         . 14879)      ; &I-M-14879;
       ))
     (<-interchangeable$_1*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-interchangeable$_2*sources
      wenxuan-lishan-zhu daikanwa)
     (<-interchangeable*sources
       (=daikanwa         . 17271)      ; &I-M-17271;
       ))
     (<-interchangeable$_1*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-interchangeable$_2*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-interchangeable*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-same
      ((=ucs@unicode      . #x3795)     ; &MJ000804;
       (=mj               . 000804)     ; &MJ000804;
 (define-char
   '((<-denotational@usage
      ((==>daijiten       . 02495)      ; &A2-DJT-02495;
+      )
+     ((==>ucs@bucs       . #x5C6D)     ; &BUCS+5C6D;
       ))
     (ideographic-radical . 44) ; ⼫
     (ideographic-strokes . 7)
       (=daikanwa         . 07683)      ; &I-M-07683;
       ))
     (<-same$_1*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-same*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-wrong
      ((=ucs              . #x3792)     ; 㞒
       ))
     (<-wrong$_1*sources
-     shuowen-tongxun-dingsheng)
+     shuowen-tongxundingsheng)
     (->subsumptive
      ((=decomposition@cid
        ((=ucs              . #x5C53)   ; 屓
       (=daikanwa         . 07670)      ; &I-M-07670;
       ))
     (<-interchangeable$_1*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-interchangeable*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (->formed
      ((=ucs              . #x5C5C)     ; 屜
       (=daikanwa         . 07735)      ; &I-M-07735;
     ))
 (define-char
   '((<-denotational@usage
-     ((==>daijiten       . 02506)      ; &A2-DJT-02506;
+     ((==>ucs@bucs       . #x5C64)     ; &BUCS+5C64;
       ))
     (ideographic-radical . 44) ; ⼫
     (ideographic-structure
       (=daikanwa         . 05454)      ; &I-M-05454;
       ))
     (<-interchangeable$_1*sources
-     zengyun shuowen-tongxun-dingsheng daikanwa)
+     zengyun shuowen-tongxundingsheng daikanwa)
     (<-interchangeable$_2*sources
      daikanwa)
     (<-interchangeable*sources
     ))
 (define-char
   '((<-denotational@usage
-     ((==>daijiten       . 02511)      ; &A2-DJT-02511;
+     ((==>ucs@bucs       . #x5C68)     ; &BUCS+5C68;
       ))
     (ideographic-radical . 44) ; ⼫
     (ideographic-strokes . 12)
     ))
 (define-char
   '((<-denotational@usage
-     ((==>daijiten       . 02511)      ; &A2-DJT-02511;
+     ((==>ucs@bucs       . #x5C68)     ; &BUCS+5C68;
       ))
     (ideographic-radical . 44) ; ⼫
     (ideographic-strokes . 14)
       (=daikanwa         . 07799)      ; &I-M-07799;
       ))
     (<-interchangeable$_1*sources
-     shuowen-tongxun-dingsheng daikanwa)
+     shuowen-tongxundingsheng daikanwa)
     (<-interchangeable$_2*sources
      shiwen daikanwa)
     (<-interchangeable*sources
     ))
 (define-char
   '((ideographic-radical . 44) ; ⼫
+    (==>ucs@bucs       . #x5C6D)       ; &BUCS+5C6D;
+    ))
+(define-char
+  '((ideographic-radical . 44) ; ⼫
     (==>daijiten       . 02496)        ; &A2-DJT-02496;
     ))
 (define-char
     ))
 (define-char
   '((ideographic-radical . 44) ; ⼫
-    (==>daijiten       . 02506)        ; &A2-DJT-02506;
+    (==>ucs@bucs       . #x5C64)       ; &BUCS+5C64;
+    (==>daijiten       . 02506)        ; &BUCS+5C64;
     ))
 (define-char
   '((ideographic-radical . 44) ; ⼫
     ))
 (define-char
   '((ideographic-radical . 44) ; ⼫
+    (==>ucs@bucs       . #x5C68)       ; &BUCS+5C68;
+    (==>daijiten       . 02511)        ; &BUCS+5C68;
+    ))
+(define-char
+  '((ideographic-radical . 44) ; ⼫
     (==>daijiten       . 02512)        ; &A2-DJT-02512;
     ))
 (define-char