(U+745A): Add `<-denotational@usage' for BUCS+745A; apply new
authorMORIOKA Tomohiko <tomo.git@chise.org>
Fri, 29 Mar 2024 17:14:11 +0000 (02:14 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Sun, 7 Apr 2024 09:26:04 +0000 (18:26 +0900)
conventions for glyph granularity.
(BUCS+745A): New abstract node; unify A2-DJT-07343.

lisp/utf-2000/Ideograph-R096-Jade.el

index c38bc3b..428848c 100644 (file)
       ))
     ))
 (define-char
-  '((ideographic-radical . 96) ; ⽟
+  '((<-denotational@usage
+     ((==>ucs@bucs       . #x745A)     ; &BUCS+745A;
+      ))
+    (ideographic-radical . 96) ; ⽟
     (ideographic-strokes . 9)
     (total-strokes      . 13)
     (ideographic-structure
      ((=ucs              . #x80E1)     ; 胡
       ))
     (=ucs              . #x745A)       ; 瑚
-    (=adobe-japan1-0   . 01950)        ; &I-AJ1-01950;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x745A)     ; 瑚
+      ))
+    (ideographic-radical . 96) ; ⽟
+    (ideographic-strokes . 9)
+    (total-strokes      . 13)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x248E9)    ; 𤣩
+      )
+     ((=ucs@unicode      . #x80E1)     ; &AJ1-01929;
+      (=adobe-japan1-0   . 01929)      ; &AJ1-01929;
+      ))
+    (=ucs@unicode      . #x745A)       ; &AJ1-01950;
+    (=adobe-japan1-0   . 01950)        ; &AJ1-01950;
     (=jis-x0208                . #x386A)       ; &I-J90-386A; [24-74]
     (=gb2312           . #x3A77)       ; &I-G0-3A77; [26-87]
     (=ks-x1001         . #x7B51)       ; &I-K0-7B51; [91-49]
     (=gt               . 27016)        ; &I-GT-27016;
     (=gt-pj-1          . #x386A)       ; &I-GT-27016; [24-74]
     (=daikanwa         . 21126)        ; &I-M-21126;
-    (=shinjigen@1ed    .  4937)        ; 瑚
-    (=shinjigen@rev    .  4934)        ; 瑚
+    (=daijiten         . 07343)        ; &I-DJT-07343;
+    (=shinjigen@1ed    .  4937)        ; &AJ1-01950;
+    (=shinjigen@rev    .  4934)        ; &AJ1-01950;
     (->subsumptive
      ((=decomposition@cid
        ((=ucs              . #x745A)   ; 瑚
        )
        ((=ucs              . #xE0100)  ; 󠄀
        ))
-      (ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-       (=ucs               . #x2FF0)   ; ⿰
-       )
-       ((name              . "CJK RADICAL JADE")
-       (=ucs               . #x2EA9)   ; ⺩
-       )
-       ((==ucs@unicode     . #x80E1)   ; &g2-AJ1-01929;
-       (==adobe-japan1-0   . 01929)    ; &g2-AJ1-01929;
-       ))
       (==ucs@unicode     . #x745A)     ; &g2-AJ1-01950;
       (==adobe-japan1-0          . 01950)      ; &g2-AJ1-01950;
       (==gb2312                  . #x3A77)     ; &g2-AJ1-01950; [26-87]
        ((===ucs@unicode            . #x745A)   ; &R-UU+745A;
        ))
       )
+     ((==daijiten        . 07343)      ; &g2-DJT-07343;
+      )
      ((===hng-kar        . 02430)      ; &HNG018-02430;
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-       (=ucs               . #x2FF0)   ; ⿰
-       )
-       ((name              . "CJK RADICAL JADE")
-       (=ucs               . #x2EA9)   ; ⺩
-       )
-       ((==ucs@cns         . #x80E1)   ; &g2-CU+80E1;
-       (==cns11643-1       . #x532D)   ; &g2-CU+80E1; [51-13]
-       ))
-      (==ucs@cns         . #x745A)     ; &g2-CU+745A;
+     ((==ucs@cns         . #x745A)     ; &g2-CU+745A;
       (==cns11643-1      . #x652C)     ; &g2-CU+745A; [69-12]
       ))
     ))
     ))
 (define-char
   '((ideographic-radical . 96) ; ⽟
+    (==>ucs@bucs       . #x745A)       ; &BUCS+745A;
+    (==>daijiten       . 07343)        ; &BUCS+745A;
+    ))
+(define-char
+  '((ideographic-radical . 96) ; ⽟
     (==>ucs@bucs       . #x7460)       ; &BUCS+7460;
     ))
 (define-char