From 9d0093a902177df00810e79548f28ffeddfb0f64 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Fri, 8 Dec 2017 12:45:42 +0900 Subject: [PATCH] (U+7676-itaiji-004): Unify GT-K01793. --- lisp/utf-2000/Ideograph-R105-Dotted-Tent.el | 40 +++++++++++++++------------ 1 file changed, 23 insertions(+), 17 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R105-Dotted-Tent.el b/lisp/utf-2000/Ideograph-R105-Dotted-Tent.el index fa63636..8af539e 100644 --- a/lisp/utf-2000/Ideograph-R105-Dotted-Tent.el +++ b/lisp/utf-2000/Ideograph-R105-Dotted-Tent.el @@ -113,46 +113,52 @@ )) (define-char '((<-denotational - ((=>ucs-itaiji-004 . #x7676) ; &A-U-i004+7676; + ((=>big5-cdp . #x8C4F) ; &A-CDP-8C4F; )) (ideographic-radical . 105) ; ⽨ (ideographic-strokes . 0) - (total-strokes . 6) + (total-strokes . 5) (ideographic-structure ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT") (=ucs . #x2FF0) ; ⿰ ) ((=ucs . #x5915) ; 夕 ) - ((=big5-cdp . #x88D5) ; &CDP-88D5; + ((=big5-cdp . #x8C4E) ; &CDP-8C4E; + )) + (=gt-k . 01253) ; >-K01253; + (=gt-pj-k1 . #x3B2D) ; >-K01253; [27-13] + (<-formed@component + ((=big5-cdp . #x8C4F) ; &CDP-8C4F; + ) + ((=ucs . #x7676) ; 癶 + )) + (->subsumptive + ((==gt-k . 01253) ; &g2-GT-K01253; + (==gt-pj-k1 . #x3B2D) ; &g2-GT-K01253; [27-13] )) - (=ucs-itaiji-004 . #x7676) ; &U-i004+7676; )) (define-char '((<-denotational - ((=>big5-cdp . #x8C4F) ; &A-CDP-8C4F; + ((=>ucs-itaiji-004 . #x7676) ; &A-U-i004+7676; )) (ideographic-radical . 105) ; ⽨ (ideographic-strokes . 0) - (total-strokes . 5) + (total-strokes . 6) (ideographic-structure ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT") (=ucs . #x2FF0) ; ⿰ ) ((=ucs . #x5915) ; 夕 ) - ((=big5-cdp . #x8C4E) ; &CDP-8C4E; - )) - (=gt-k . 01253) ; >-K01253; - (=gt-pj-k1 . #x3B2D) ; >-K01253; [27-13] - (<-formed@component - ((=big5-cdp . #x8C4F) ; &CDP-8C4F; - ) - ((=ucs . #x7676) ; 癶 + ((=big5-cdp . #x88D5) ; &CDP-88D5; )) + (=gt-k . 01793) ; &U-i004+7676; + (=gt-pj-k1 . #x3878) ; &U-i004+7676; [24-88] + (=ucs-itaiji-004 . #x7676) ; &U-i004+7676; (->subsumptive - ((==gt-k . 01253) ; &g2-GT-K01253; - (==gt-pj-k1 . #x3B2D) ; &g2-GT-K01253; [27-13] + ((==gt-k . 01793) ; &g2-GT-K01793; + (==gt-pj-k1 . #x3878) ; &g2-GT-K01793; [24-88] )) )) (define-char @@ -345,7 +351,7 @@ ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") (=ucs . #x2FF1) ; ⿱ ) - ((=ucs-itaiji-004 . #x7676) ; &U-i004+7676; + ((=gt-k . 01793) ; &U-i004+7676; ) ((=ucs . #x2067C) ; 𠙼 )) -- 1.7.10.4