From 429506c602ed8074261e4619ee2b0bdba883211b Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Sat, 17 Aug 2024 14:38:48 +0900 Subject: [PATCH] (U-00024C04): New character; use `<-denotational' for A-cgnU+752C; use `<-denotational@usage' for BUCS+752C. --- lisp/utf-2000/Ideograph-R101-Use.el | 39 +++++++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) diff --git a/lisp/utf-2000/Ideograph-R101-Use.el b/lisp/utf-2000/Ideograph-R101-Use.el index eee1356..4fb75e4 100644 --- a/lisp/utf-2000/Ideograph-R101-Use.el +++ b/lisp/utf-2000/Ideograph-R101-Use.el @@ -500,6 +500,45 @@ (=ucs-itaiji-005 . #x752C) ; &U-i005+752C; )) (define-char + '((<-denotational + ((=>ucs@cognate . #x752C) ; &A-cgnU+752C; + )) + (<-denotational@usage + ((==>ucs@bucs . #x752C) ; &BUCS+752C; + )) + (ideographic-radical . 101) ; ⽤ + (ideographic-strokes . 2) + (total-strokes . 7) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=>ucs@component . #x5200) ; &A-compU+5200; + (=>iwds-1 . 0149) ; &A-compU+5200; + ) + ((=>ucs@iwds-1 . #x7528) ; &A-IWDSU+7528; + )) + (=ucs . #x24C04) ; 𤰄 + )) +(define-char + '((<-denotational + ((=ucs . #x24C04) ; 𤰄 + )) + (ideographic-radical . 101) ; ⽤ + (ideographic-strokes . 2) + (total-strokes . 7) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=ucs . #x5200) ; 刀 + ) + ((=ucs@unicode . #x7528) ; &AJ1-03899; + (=adobe-japan1-0 . 03899) ; &AJ1-03899; + )) + (=ucs@iso . #x24C04) ; &U-00024C04; + )) +(define-char '((<-denotational@usage ((==>ucs@bucs . #x752C) ; &BUCS+752C; )) -- 1.7.10.4