Use `shuowen-tongxundingsheng' instead of `shuowen-tongxun-dingsheng'
authorMORIOKA Tomohiko <tomo.git@chise.org>
Thu, 18 Jul 2024 02:01:08 +0000 (11:01 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Thu, 18 Jul 2024 02:01:08 +0000 (11:01 +0900)
as a source ID.
(U-000209EA): Add `<-denotational@usage' for A2-DJT-01026.
(IU+209EA): Unify DJT-01026.
(A2-DJT-01026): New abstract node.

lisp/utf-2000/Ideograph-R025-Divination.el

index 0170528..8d09507 100644 (file)
       ))
     ))
 (define-char
-  '((ideographic-radical . 25) ; ⼘
+  '((<-denotational@usage
+     ((==>daijiten       . 01026)      ; &A2-DJT-01026;
+      ))
+    (ideographic-radical . 25) ; ⼘
     (ideographic-strokes . 7)
     (total-strokes      . 9)
     (ideographic-structure
     (=cns11643-4       . #x2851)       ; &C4-2851; [08-49]
     (=big5-cdp         . #x8AA6)       ; &I-CDP-8AA6;
     (=daikanwa         . 02810)        ; &I-M-02810;
+    (=daijiten         . 01026)        ; &I-DJT-01026;
     (=shinjigen                .  0840)        ; &C4-2851;
     (<-ancient
      ((=ucs              . #x5363)     ; 卣
       (=daikanwa         . 02791)      ; &I-M-02791;
       (=shinjigen        .  0839)      ; 卣
       ))
-    (<-ancient*denied  shuowen-tongxun-dingsheng daikanwa)
+    (<-ancient*denied  shuowen-tongxundingsheng daikanwa)
     (<-ancient*sources
      shuowen-zhu yunhai daikanwa shinjigen)
     (->Zhouwen
       (==cns11643-4      . #x2851)     ; &g2-CDP-8AA6; [08-49]
       (==big5-cdp        . #x8AA6)     ; &g2-CDP-8AA6;
       (==daikanwa        . 02810)      ; &g2-CDP-8AA6;
+      (==daijiten        . 01026)      ; &g2-CDP-8AA6;
       (==shinjigen       .  0840)      ; &g2-CDP-8AA6;
       (->subsumptive
        ((===daikanwa       . 02810)    ; &R-M-02810;
        )
+       ((===daijiten       . 01026)    ; &R-DJT-01026;
+       )
        ((===big5-cdp       . #x8AA6)   ; &R-CDP-8AA6;
        )
        ((===cns11643-4     . #x2851)   ; &R-C4-2851; [08-49]
   '((ideographic-radical . 25) ; ⼘
     (==>daijiten       . 01024)        ; &A2-DJT-01024;
     ))
+(define-char
+  '((ideographic-radical . 25) ; ⼘
+    (==>daijiten       . 01026)        ; &A2-DJT-01026;
+    ))