From 3f64919477bbdfd99d993a853643568ec2c6b0fd Mon Sep 17 00:00:00 2001 From: tomo Date: Wed, 25 Feb 2004 12:01:00 +0000 Subject: [PATCH] (JC3-82B5): Omit features except `->identical'; add `->identical*sources'. (U+5367): Unify C3-2A5C; use `ideographic-{radical|strokes}@{ucs|cns}', `total-strokes@{ucs|cns}' and `ideographic-radical@ucs*sources'. --- lisp/utf-2000/Ideograph-R025-Divination.el | 24 ++++++++++++++---------- 1 file changed, 14 insertions(+), 10 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R025-Divination.el b/lisp/utf-2000/Ideograph-R025-Divination.el index 29a21d4..ac0ea0a 100644 --- a/lisp/utf-2000/Ideograph-R025-Divination.el +++ b/lisp/utf-2000/Ideograph-R025-Divination.el @@ -173,14 +173,12 @@ (=jef-china3 . #x45CB) ; øº„—‹ )) (define-char - '((=>ucs . #x5361) ; 卡 - (morohashi-daikanwa 2781 0 0) - (ideographic-radical . 25) ; ⼘ - (ideographic-strokes . 3) - (total-strokes . 5) - (->identical - ((=jef-china3 . #x45CB) ; øº„—‹ + '((->identical + ((=ucs . #x5361) ; 卡 + (=jef-china3 . #x45CB) ; øº„—‹ )) + (->identical*sources + jef-china3) (=jef-china3 . #x82B5) ; øºˆŠµ )) (define-char @@ -508,9 +506,14 @@ (=cns11643-6 . #x2A22) ; ø»œ¿ )) (define-char - '((ideographic-radical . 25) ; ⼘ - (ideographic-strokes . 6) - (total-strokes . 8) + '((ideographic-radical@ucs . 25) ; ⼘ + (ideographic-strokes@ucs . 6) + (total-strokes@ucs . 8) + (ideographic-radical@ucs*sources + daikanwa ucs) + (ideographic-radical@cns . 131) ; ⾂ + (ideographic-strokes@cns . 2) + (total-strokes@cns . 9) (hanyu-dazidian 4 2801 2) (ideographic-structure ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT") @@ -522,6 +525,7 @@ )) (=ucs . #x5367) ; 卧 (=gb2312 . #x4E54) ; ø»…ˆ½ + (=cns11643-3 . #x2A5C) ; ø»•¤­ (=jis-x0213-2-2000 . #x2354) ; ø»¤ ¯ (=daikanwa . 02808) ; ø¸€«¸ (=hanziku-7 . #xEECB) ; ý¢¾»‹ -- 1.7.10.4