From ffab3a1ee42dfb67c0a8dd3d39baa2332de71983 Mon Sep 17 00:00:00 2001 From: tomo Date: Sat, 3 Jul 2004 03:35:13 +0000 Subject: [PATCH] (U+6B64): Use `->subsumptive'. (U-00023945): Likewise. --- lisp/utf-2000/Ideograph-R077-Stop.el | 58 ++++++++++++++-------------------- 1 file changed, 23 insertions(+), 35 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R077-Stop.el b/lisp/utf-2000/Ideograph-R077-Stop.el index f285406..8666474 100644 --- a/lisp/utf-2000/Ideograph-R077-Stop.el +++ b/lisp/utf-2000/Ideograph-R077-Stop.el @@ -119,48 +119,36 @@ '((ideographic-radical . 77) ; ⽌ (ideographic-strokes . 2) (total-strokes . 6) - (shinjigen-2 . 3949) (=ucs . #x6B64) ; 此 - (=jis-x0208 . #x3A21) ; &I-J90-3A21; [26-01] - (=gb2312 . #x344B) ; &I-G0-344B; [20-43] - (=ks-x1001 . #x732E) ; &I-K0-732E; [83-14] - (=gt . 20888) ; &I-GT-20888; - (=gt-k . 01614) ; &I-GT-K01614; - (=gt-pj-1 . #x3A21) ; &I-GT-20888; [26-01] - (=daikanwa . 16259) ; &I-M-16259; - )) -(define-char - '((=>ucs . #x6B64) ; 此 - (morohashi-daikanwa 16259 0 1) - (ideographic-radical . 77) ; ⽌ - (ideographic-strokes . 2) - (total-strokes . 6) - (=cns11643-1 . #x483A) ; &C1-483A; [40-26] (=big5 . #xA6B9) ; &I-B-A6B9; + (->subsumptive + ((shinjigen-2 . 3949) + (=jis-x0208 . #x3A21) ; >-20888; [26-01] + (=gb2312 . #x344B) ; &I-G0-344B; [20-43] + (=ks-x1001 . #x732E) ; &I-K0-732E; [83-14] + (=gt . 20888) ; &I-GT-20888; + (=gt-k . 01614) ; &I-GT-K01614; + (=gt-pj-1 . #x3A21) ; &I-GT-20888; [26-01] + (=daikanwa . 16259) ; &I-M-16259; + (=ucs@unicode . #x6B64) ; >-20888; + ) + ((=cns11643-1 . #x483A) ; &C1-483A; [40-26] + )) )) (define-char - '((=>ucs . #x23945) ; 𣥅 - (ideographic-radical . 77) ; ⽌ - (ideographic-strokes . 2) - (total-strokes . 6) - (=daikanwa . 16260) ; &M-16260; - )) -(define-char - '((=>ucs . #x23945) ; 𣥅 - (morohashi-daikanwa 16260 0 0) - (ideographic-radical . 77) ; ⽌ - (ideographic-strokes . 2) - (total-strokes . 6) - (=cns11643-6 . #x2526) ; &C6-2526; [05-06] - )) -(define-char - '((morohashi-daikanwa 16260 0 1) - (ideographic-radical . 77) ; ⽌ + '((ideographic-radical . 77) ; ⽌ (ideographic-strokes . 2) (total-strokes . 6) - (hanyu-dazidian 2 1438 4) (=ucs . #x23945) ; 𣥅 - (=hanziku-4 . #xD26E) ; &I-HZK04-D26E; + (->subsumptive + ((=daikanwa . 16260) ; &M-16260; + ) + ((=cns11643-6 . #x2526) ; &C6-2526; [05-06] + ) + ((hanyu-dazidian 2 1438 4) + (=hanziku-4 . #xD26E) ; &HZK04-D26E; + (=ucs@iso . #x23945) ; &HZK04-D26E; + )) )) (define-char '((ideographic-radical . 77) ; ⽌ -- 1.7.10.4