From 97a32c1cd49292ac2bcc2420a3d155640165f93a Mon Sep 17 00:00:00 2001 From: tomo Date: Tue, 2 Mar 2004 04:16:31 +0000 Subject: [PATCH] (U-00025390): Use `->subsumptive' instead of `->identical' for M-01841. --- lisp/utf-2000/Ideograph-R110-Spear.el | 40 +++++++++++++++++---------------- 1 file changed, 21 insertions(+), 19 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R110-Spear.el b/lisp/utf-2000/Ideograph-R110-Spear.el index de8e9b0..c770d9f 100644 --- a/lisp/utf-2000/Ideograph-R110-Spear.el +++ b/lisp/utf-2000/Ideograph-R110-Spear.el @@ -688,6 +688,27 @@ (=daikanwa . 23902) ; ø¸…µž )) (define-char + '((ideographic-radical@ucs . 110) ; â½­ + (ideographic-strokes@ucs . 12) + (ideographic-radical@ucs*sources + daikanwa@r110 ucs) + (ideographic-radical@cns . 17) ; ⼐ + (ideographic-strokes@cns . 15) + (ideographic-radical@cns*sources + daikanwa@r017 cns11643) + (total-strokes . 17) + (=ucs . #x25390) ; 𥎐 + (->subsumptive + ((hanyu-dazidian 4 2768 16) + (=cns11643-5 . #x5A75) ; ø»š¿® + (=daikanwa . 01841) ; ø¸€œ± + (=hanziku-7 . #xE845) ; ý¢¾¡… + (=ucs@iso . #x25390) ; ø»š¿® + ) + ((=daikanwa . 23906) ; ø¸…µ¢ + )) + )) +(define-char '((ideographic-radical . 110) ; â½­ (ideographic-strokes . 12) (total-strokes . 17) @@ -726,25 +747,6 @@ (=cns11643-7 . #x3965) ; ø»ž£ˆ )) (define-char - '((ideographic-radical@ucs . 110) ; â½­ - (ideographic-strokes@ucs . 12) - (ideographic-radical@ucs*sources - daikanwa@r110 ucs) - (ideographic-radical@cns . 17) ; ⼐ - (ideographic-strokes@cns . 15) - (ideographic-radical@cns*sources - daikanwa@r017 cns11643) - (total-strokes . 17) - (->identical - ((=daikanwa . 01841) ; ø¸€œ± - )) - (hanyu-dazidian 4 2768 16) - (=ucs . #x25390) ; 𥎐 - (=cns11643-5 . #x5A75) ; ø»š¿® - (=daikanwa . 23906) ; ø¸…µ¢ - (=hanziku-7 . #xE845) ; ý¢¾¡… - )) -(define-char '((ideographic-radical . 110) ; â½­ (ideographic-strokes . 12) (total-strokes . 17) -- 1.7.10.4