From 45d018494775d31ff1a40a248b852e1786061d7f Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Tue, 20 Aug 2024 05:51:21 +0900 Subject: [PATCH] (U-00021A1D): Use A-compU+5915 instead of U+5915 as a component. (U+21A1D-itaiji-001): Modify structure. (U+21A1D-itaiji-004): New character; use `<-denotational' for U-00021A1D. --- lisp/utf-2000/Ideograph-R040-Roof.el | 27 +++++++++++++++++++++------ 1 file changed, 21 insertions(+), 6 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R040-Roof.el b/lisp/utf-2000/Ideograph-R040-Roof.el index 0159f2b..dfcaa8c 100644 --- a/lisp/utf-2000/Ideograph-R040-Roof.el +++ b/lisp/utf-2000/Ideograph-R040-Roof.el @@ -9309,7 +9309,7 @@ ) ((=>ucs@component . #x707E) ; &A-compU+707E; ) - ((=ucs . #x5915) ; 夕 + ((=>ucs@component . #x5915) ; &A-compU+5915; )) (=ucs . #x21A1D) ; 𡨝 (<-formed @@ -9349,18 +9349,33 @@ (ideographic-strokes . 7) (total-strokes . 10) (ideographic-structure - ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW") - (=ucs . #x2FF3) ; ⿳ - ) - ((=ucs . #x5B80) ; 宀 + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ ) - ((=gt-k . 00859) ; >-K00859; + ((=ucs-itaiji-001 . #x707E) ; &U-i001+707E; ) ((=ucs . #x5915) ; 夕 )) (=ucs-itaiji-001 . #x21A1D) ; &U-i001+21A1D; )) (define-char + '((<-denotational + ((=ucs . #x21A1D) ; 𡨝 + )) + (ideographic-radical . 40) ; ⼧ + (ideographic-strokes . 7) + (total-strokes . 10) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=ucs-itaiji-001 . #x707E) ; &U-i001+707E; + ) + ((=ucs . #x5902) ; 夂 + )) + (=ucs-itaiji-004 . #x21A1D) ; &U-i004+21A1D; + )) +(define-char '((ideographic-radical . 40) ; ⼧ (ideographic-strokes . 7) (total-strokes . 10) -- 1.7.10.4