From 7af1e7278c7aa98a3fdd0058be54b0c7bf624016 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Fri, 21 Jul 2017 00:34:14 +0900 Subject: [PATCH] (U+7535): Apply new conventions for glyph granularity; add `=>iwds-1'. --- lisp/utf-2000/Ideograph-R073-Say.el | 31 +++++++++++++++++++++++++++++-- 1 file changed, 29 insertions(+), 2 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R073-Say.el b/lisp/utf-2000/Ideograph-R073-Say.el index bbbbb57..d9127d5 100644 --- a/lisp/utf-2000/Ideograph-R073-Say.el +++ b/lisp/utf-2000/Ideograph-R073-Say.el @@ -73,7 +73,17 @@ (ideographic-strokes . 1) (total-strokes . 5) (=ucs . #x7535) ; 电 - (=gb2312 . #x3567) ; &I-G0-3567; [21-71] + (=>iwds-1 . 0097) ; 电 + )) +(define-char + '((<-denotational + ((=ucs . #x7535) ; 电 + )) + (ideographic-radical . 73) ; ⽈ + (ideographic-strokes . 1) + (total-strokes . 5) + (=ucs@unicode . #x7535) ; &G0-3567; + (=gb2312 . #x3567) ; &G0-3567; [21-71] (=cbeta . 02169) ; &I-CB02169; (=jef-china3 . #x81E2) ; &I-JC3-81E2; (<-simplified@CN @@ -81,6 +91,19 @@ (=adobe-japan1-0 . 03135) ; &AJ1-03135; (=gb12345 . #x3567) ; &AJ1-03135; [21-71] )) + (->subsumptive + ((==ucs@unicode . #x7535) ; &g2-CB02169; + (==gb2312 . #x3567) ; &g2-CB02169; [21-71] + (==cbeta . 02169) ; &g2-CB02169; + (==jef-china3 . #x81E2) ; &g2-CB02169; + (->subsumptive + ((===ucs@unicode . #x7535) ; &R-UU+7535; + ) + ((===cbeta . 02169) ; &R-CB02169; + ) + ((===jef-china3 . #x81E2) ; &R-JC3-81E2; + )) + )) )) (define-char '((<-denotational @@ -91,7 +114,11 @@ (total-strokes . 5) (=big5-cdp . #x8BE8) ; &CDP-8BE8; (<-formed@component - ((=ucs . #x7535) ; 电 + ((=ucs@unicode . #x7535) ; &G0-3567; + (=gb2312 . #x3567) ; &G0-3567; [21-71] + )) + (->subsumptive + ((==big5-cdp . #x8BE8) ; &g2-CDP-8BE8; )) )) (define-char -- 1.7.10.4