From 7c612fc38b21a6874da72b9525a91390add10546 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Fri, 4 Oct 2024 12:16:09 +0900 Subject: [PATCH] (GT-K02027): New character; use `<-denotational@component' for A-U+5C17-itaiji-002; unify U+70CF-itaiji-003. --- lisp/utf-2000/Ideograph-R036-Evening.el | 28 +++++++++++++++++++++++++++- 1 file changed, 27 insertions(+), 1 deletion(-) diff --git a/lisp/utf-2000/Ideograph-R036-Evening.el b/lisp/utf-2000/Ideograph-R036-Evening.el index 0fdd67a..5a28af4 100644 --- a/lisp/utf-2000/Ideograph-R036-Evening.el +++ b/lisp/utf-2000/Ideograph-R036-Evening.el @@ -1054,6 +1054,31 @@ )) )) (define-char + '((<-denotational@component + ((=>ucs-itaiji-002 . #x5C17) ; &A-U-i002+5C17; + )) + (ideographic-radical . 36) ; ⼣ + (ideographic-strokes . 3) + (total-strokes . 6) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=ucs . #x5915) ; 夕 + ) + ((=big5-cdp . #x885E) ; &CDP-885E; + )) + (=gt-k . 02027) ; >-K02027; + (=gt-pj-k1 . #x3849) ; >-K02027; [24-41] + (=ucs-itaiji-003 . #x70CF) ; >-K02027; + (->subsumptive + ((==ucs-itaiji-003 . #x70CF) ; &g2-U-i003+70CF; + ) + ((==gt-k . 02027) ; &g2-GT-K02027; + (==gt-pj-k1 . #x3849) ; &g2-GT-K02027; [24-41] + )) + )) +(define-char '((ideographic-radical . 36) ; ⼣ (ideographic-strokes . 4) (total-strokes . 7) @@ -3690,7 +3715,8 @@ (=cns11643-7 . #x3F3B) ; &C7-3F3B; [31-27] (=daikanwa . 49007) ; &I-M-49007; (<-ancient - ((=ucs . #x70CF) ; 烏 + ((=ucs@unicode . #x70CF) ; &AJ1-01226; + (=adobe-japan1-0 . 01226) ; &AJ1-01226; (=daikanwa . 18998) ; &I-M-18998; )) (<-ancient*sources -- 1.7.10.4