From 311821304031034d527fb976c90ac32f0e7ca135 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Tue, 9 Jan 2018 19:09:56 +0900 Subject: [PATCH] (A-compU+5341): Separate IWDS1-0037. (IWDS1-0037): Unify A-IWDSU+5341 instead of A-compU+5341; add `<-denotational@component' for A-compU+5341. (U+20991-var-003): New character; use `<-denotational' for U-00020991. --- lisp/utf-2000/Ideograph-R024-Ten.el | 25 +++++++++++++++++++++++-- 1 file changed, 23 insertions(+), 2 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R024-Ten.el b/lisp/utf-2000/Ideograph-R024-Ten.el index e068019..f670653 100644 --- a/lisp/utf-2000/Ideograph-R024-Ten.el +++ b/lisp/utf-2000/Ideograph-R024-Ten.el @@ -4,12 +4,21 @@ (ideographic-strokes . 0) (total-strokes . 2) (=>ucs@component . #x5341) ; &A-compU+5341; - (=>iwds-1 . 0037) ; &A-compU+5341; )) (define-char '((<-denotational@component ((=>ucs@component . #x5341) ; &A-compU+5341; - (=>iwds-1 . 0037) ; &A-compU+5341; + )) + (ideographic-radical . 24) ; ⼗ + (ideographic-strokes . 0) + (total-strokes . 2) + (=>ucs@iwds-1 . #x5341) ; &A-IWDSU+5341; + (=>iwds-1 . 0037) ; &A-IWDSU+5341; + )) +(define-char + '((<-denotational@component + ((=>ucs@iwds-1 . #x5341) ; &A-IWDSU+5341; + (=>iwds-1 . 0037) ; &A-IWDSU+5341; )) (ideographic-radical . 24) ; ⼗ (ideographic-strokes . 0) @@ -1534,7 +1543,19 @@ (ideographic-radical . 24) ; ⼗ (ideographic-strokes . 5) (total-strokes . 7) + (=ucs-var-003 . #x20991) ; &U-v003+20991; + )) +(define-char + '((<-denotational + ((=ucs . #x20991) ; 𠦑 + )) + (ideographic-radical . 24) ; ⼗ + (ideographic-strokes . 5) + (total-strokes . 7) (=cbeta . 07083) ; &CB07083; + (->subsumptive + ((==cbeta . 07083) ; &g2-CB07083; + )) )) (define-char '((<-denotational -- 1.7.10.4