From a95eb75aa391005565365bf0be8eef58f90374a5 Mon Sep 17 00:00:00 2001 From: tomo Date: Wed, 16 Jun 2004 13:33:26 +0000 Subject: [PATCH] Rename `<-original-ideograph' to `<-original'. (U+461A): Use `->subsumptive'; use `<-original' and `<-original*sources' instead of `<-original-ideograph' with char-ref. --- lisp/utf-2000/Ideograph-R145-Clothes.el | 35 ++++++++++++++----------------- 1 file changed, 16 insertions(+), 19 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R145-Clothes.el b/lisp/utf-2000/Ideograph-R145-Clothes.el index 86e0894..c1c4a8a 100644 --- a/lisp/utf-2000/Ideograph-R145-Clothes.el +++ b/lisp/utf-2000/Ideograph-R145-Clothes.el @@ -65,27 +65,24 @@ (=cns11643-5 . #x2766) ; &I-C5-2766; [07-70] )) (define-char - '((=>ucs . #x461A) ; 䘚 - (ideographic-radical . 145) ; ⾐ - (ideographic-strokes . 2) - (total-strokes . 8) - (<-original-ideograph - (:sources (seiji-tsuu morohashi-daikanwa shinjigen-1) - :char ((ideographic-radical . 24) ; ⼗ - (shinjigen-1 . 823) - (=daikanwa . 02740) ; &I-M-02740; - ) - )) - (shinjigen-1 . 823) - (=daikanwa . 34094) ; &M-34094; - )) -(define-char - '((morohashi-daikanwa 34094 0 0) - (ideographic-radical . 145) ; ⾐ + '((ideographic-radical . 145) ; ⾐ (ideographic-strokes . 2) (total-strokes . 8) (=ucs . #x461A) ; 䘚 - (=cns11643-3 . #x2A6E) ; &I-C3-2A6E; [10-78] + (->subsumptive + ((<-original + ((ideographic-radical . 24) ; ⼗ + (shinjigen-1 . 823) + (=daikanwa . 02740) ; &I-M-02740; + )) + (<-original*sources + zhengzi-tong daikanwa shinjigen-1) + (shinjigen-1 . 823) + (=daikanwa . 34094) ; &M-34094; + ) + ((=cns11643-3 . #x2A6E) ; &C3-2A6E; [10-78] + (=ucs@unicode . #x461A) ; &C3-2A6E; + )) )) (define-char '((ideographic-radical . 145) ; ⾐ @@ -2568,7 +2565,7 @@ (ideographic-radical . 145) ; ⾐ (ideographic-strokes . 6) (total-strokes . 12) - (<-original-ideograph + (<-original (:sources (seiji-tsuu morohashi-daikanwa) :char ((=daikanwa . 34310) ; &I-M-34310; ) -- 1.7.10.4