From 03a3d0176dcc84cf588a8941e8063d5786594d89 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Thu, 14 Sep 2017 01:31:39 +0900 Subject: [PATCH] (A-IWDSU+51E1): New abstract node; unify IWDS1-55346. (IWDS1-0055): Unify A-IWDSU+5342 instead of A-compU+5342; add `<-denotational@component' for IWDS1-55346. (A-compU+5342): New abstract node. (U+5342): Add `<-denotational' for A-compU+5342. (A-UU+5342): Abolished; use A-IWDSU+5342 as different abstract node. (UU+5342): Use U+5342 instead of A-UU+5342 as its mother. (CU+5342): Likewise. (BC-88EC): Likewise. (CB07314): Likewise. (U+5342-itaiji-001): Use A-compU+5342 instead of U+5342 as its mother. --- lisp/utf-2000/Ideograph-R024-Ten.el | 59 ++++++++++++++++++++--------------- 1 file changed, 34 insertions(+), 25 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R024-Ten.el b/lisp/utf-2000/Ideograph-R024-Ten.el index 977f6b8..9110586 100644 --- a/lisp/utf-2000/Ideograph-R024-Ten.el +++ b/lisp/utf-2000/Ideograph-R024-Ten.el @@ -75,33 +75,42 @@ '((ideographic-radical . 24) ; ⼗ (ideographic-strokes . 1) (total-strokes . 3) - (=>ucs@component . #x5342) ; &A-compU+5342; - (=>iwds-1 . 0055) ; &A-compU+5342; + (=>ucs@iwds-1 . #x51E1) ; &A-IWDSU+51E1; + (=>iwds-1 . 55346) ; &A-IWDSU+51E1; )) (define-char '((<-denotational@component - ((=>ucs@component . #x5342) ; &A-compU+5342; - (=>iwds-1 . 0055) ; &A-compU+5342; + ((=>ucs@iwds-1 . #x51E1) ; &A-IWDSU+51E1; + (=>iwds-1 . 55346) ; &A-IWDSU+51E1; )) (ideographic-radical . 24) ; ⼗ (ideographic-strokes . 1) (total-strokes . 3) - (=ucs . #x5342) ; 卂 + (=>ucs@iwds-1 . #x5342) ; &A-IWDSU+5342; + (=>iwds-1 . 0055) ; &A-IWDSU+5342; + )) +(define-char + '((ideographic-radical . 24) ; ⼗ + (ideographic-strokes . 1) + (total-strokes . 3) + (=>ucs@component . #x5342) ; &A-compU+5342; )) (define-char '((<-denotational - ((=ucs . #x5342) ; 卂 + ((=>ucs@component . #x5342) ; &A-compU+5342; + )) + (<-denotational@component + ((=>ucs@iwds-1 . #x5342) ; &A-IWDSU+5342; + (=>iwds-1 . 0055) ; &A-IWDSU+5342; )) (ideographic-radical . 24) ; ⼗ (ideographic-strokes . 1) (total-strokes . 3) - (=>ucs@iwds-1 . #x5342) ; &A-IWDSU+5342; - (=>ucs@unicode . #x5342) ; &A-IWDSU+5342; + (=ucs . #x5342) ; 卂 )) (define-char '((<-denotational - ((=>ucs@iwds-1 . #x5342) ; &A-IWDSU+5342; - (=>ucs@unicode . #x5342) ; &A-IWDSU+5342; + ((=ucs . #x5342) ; 卂 )) (ideographic-radical . 24) ; ⼗ (ideographic-strokes . 1) @@ -162,18 +171,7 @@ )) (define-char '((<-denotational - ((=>ucs@iwds-1 . #x5342) ; &A-IWDSU+5342; - (=>ucs@unicode . #x5342) ; &A-IWDSU+5342; - )) - (ideographic-radical . 24) ; ⼗ - (ideographic-strokes . 1) - (total-strokes . 3) - (=big5-cdp . #x88EC) ; &CDP-88EC; - )) -(define-char - '((<-denotational - ((=>ucs@iwds-1 . #x5342) ; &A-IWDSU+5342; - (=>ucs@unicode . #x5342) ; &A-IWDSU+5342; + ((=ucs . #x5342) ; 卂 )) (ideographic-radical . 24) ; ⼗ (ideographic-strokes . 1) @@ -195,8 +193,19 @@ )) (define-char '((<-denotational - ((=>ucs@iwds-1 . #x5342) ; &A-IWDSU+5342; - (=>ucs@unicode . #x5342) ; &A-IWDSU+5342; + ((=ucs . #x5342) ; 卂 + )) + (ideographic-radical . 24) ; ⼗ + (ideographic-strokes . 1) + (total-strokes . 3) + (=big5-cdp . #x88EC) ; &CDP-88EC; + (->subsumptive + ((==big5-cdp . #x88EC) ; &g2-CDP-88EC; + )) + )) +(define-char + '((<-denotational + ((=ucs . #x5342) ; 卂 )) (ideographic-radical . 24) ; ⼗ (ideographic-strokes . 1) @@ -231,7 +240,7 @@ )) (define-char '((<-denotational - ((=ucs . #x5342) ; 卂 + ((=>ucs@component . #x5342) ; &A-compU+5342; )) (ideographic-radical . 24) ; ⼗ (ideographic-strokes . 1) -- 1.7.10.4