From 9076776c61e7c959d6d1945e6e7c91cfc4298ee7 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Fri, 16 Sep 2022 17:35:59 +0900 Subject: [PATCH] (A-BC-8BEC): New abstract node; unify A-GT-K02306. (GT-K02306): New character; use `<-denotational' for A-BC-8BEC. (BC-8BEC): New character; use `<-denotational' for A-BC-8BEC; unify GT-K02309. --- lisp/utf-2000/Ideograph-R008-Lid.el | 62 +++++++++++++++++++++++++++++++++++ 1 file changed, 62 insertions(+) diff --git a/lisp/utf-2000/Ideograph-R008-Lid.el b/lisp/utf-2000/Ideograph-R008-Lid.el index 875c114..6e9dfbb 100644 --- a/lisp/utf-2000/Ideograph-R008-Lid.el +++ b/lisp/utf-2000/Ideograph-R008-Lid.el @@ -469,6 +469,21 @@ ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") (=ucs . #x2FF1) ; ⿱ ) + ((=big5-cdp . #x8BAE) ; &CDP-8BAE; + ) + ((=>ucs@component . #x5182) ; &A-compU+5182; + )) + (=>big5-cdp . #x8BEC) ; &A-GT-K02306; + (=>gt-k . 02306) ; &A-GT-K02306; + )) +(define-char + '((ideographic-radical . 8) ; ⼇ + (ideographic-strokes . 2) + (total-strokes . 4) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) ((=ucs . #x4EA0) ; 亠 ) ((=ucs . #x4E86) ; 了 @@ -482,6 +497,53 @@ )) (define-char '((<-denotational + ((=>big5-cdp . #x8BEC) ; &A-GT-K02306; + )) + (ideographic-radical . 8) ; ⼇ + (ideographic-strokes . 2) + (total-strokes . 4) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=big5-cdp . #x8BAE) ; &CDP-8BAE; + ) + ((=ucs . #x5182) ; 冂 + )) + (=gt-k . 02306) ; >-K02306; + (=gt-pj-k1 . #x372E) ; >-K02306; [23-14] + (->subsumptive + ((==gt-k . 02306) ; &g2-GT-K02306; + (==gt-pj-k1 . #x372E) ; &g2-GT-K02306; [23-14] + )) + )) +(define-char + '((<-denotational + ((=>big5-cdp . #x8BEC) ; &A-GT-K02306; + )) + (ideographic-radical . 8) ; ⼇ + (ideographic-strokes . 2) + (total-strokes . 4) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=big5-cdp . #x8BAE) ; &CDP-8BAE; + ) + ((=ucs . #x5196) ; 冖 + )) + (=big5-cdp . #x8BEC) ; &CDP-8BEC; + (=gt-k . 02309) ; &I-GT-K02309; + (=gt-pj-k1 . #x323B) ; &CDP-8BEC; [18-27] + (->subsumptive + ((==big5-cdp . #x8BEC) ; &g2-CDP-8BEC; + ) + ((==gt-k . 02309) ; &g2-GT-K02309; + (==gt-pj-k1 . #x323B) ; &g2-GT-K02309; [18-27] + )) + )) +(define-char + '((<-denotational ((=>ucs@cognate . #x4EA2) ; &A-cgnU+4EA2; )) (ideographic-radical . 8) ; ⼇ -- 1.7.10.4