From fbeb275f77055073897c612110293ec08030fa8c Mon Sep 17 00:00:00 2001 From: tomo Date: Mon, 19 Apr 2004 12:06:20 +0000 Subject: [PATCH] (U+5451): Use `<-vulgar*sources' instead of char-ref in `<-vulgar'. (J78-4A2E): Moved into U+5674. (U+5674): Use `->subsumptive'. --- lisp/utf-2000/Ideograph-R030-Mouth.el | 84 ++++++++++++++++----------------- 1 file changed, 41 insertions(+), 43 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R030-Mouth.el b/lisp/utf-2000/Ideograph-R030-Mouth.el index f6de605..d8b5b9c 100644 --- a/lisp/utf-2000/Ideograph-R030-Mouth.el +++ b/lisp/utf-2000/Ideograph-R030-Mouth.el @@ -4017,10 +4017,11 @@ (ideographic-strokes . 4) (total-strokes . 7) (<-vulgar - (:sources (morohashi-daikanwa) - :char ((=daikanwa . 03329) ; &I-M-03329; - ) + ((=ucs . #x541E) ; 吞 + (=daikanwa . 03329) ; &I-M-03329; )) + (<-vulgar*sources + daikanwa) (ideographic-structure ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") (=ucs . #x2FF1) ; ⿱ @@ -25515,50 +25516,47 @@ (=hanziku-2 . #xDE4F) ; &I-HZK02-DE4F; )) (define-char - '((=>ucs . #x5674) ; 噴 - (ideographic-radical . 30) ; ⼝ - (ideographic-strokes . 12) - (total-strokes . 15) - (<-vulgar - (:sources (morohashi-daikanwa) - :char ((=daikanwa . 04409) ; &I-M-04409; - ) - )) - (ideographic-structure - ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT") - (=ucs . #x2FF0) ; ⿰ - ) - ((=ucs . #x53E3) ; 口 - ) - ((=ucs . #x8CC1) ; 賁 - )) - (shinjigen-1 . 1247) - (shinjigen-2 . 1247) - (=jis-x0208-1978 . #x4A2E) ; &M-04345; - (=jis-x0208-1983 . #x4A2E) ; &I-J83-4A2E; - (=ks-x1001 . #x5D44) ; &I-K0-5D44; - (=daikanwa . 04345) ; &I-M-04345; - )) -(define-char - '((morohashi-daikanwa 4345 0 0) - (ideographic-radical . 30) ; ⼝ + '((ideographic-radical . 30) ; ⼝ (ideographic-strokes . 12) (total-strokes . 15) - (ideographic-structure - ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT") - (=ucs . #x2FF0) ; ⿰ - ) - ((=ucs . #x53E3) ; 口 + (=ucs . #x5674) ; 噴 + (->subsumptive + ((<-vulgar + ((=daikanwa . 04409) ; &I-M-04409; + )) + (<-vulgar*sources + daikanwa) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT") + (=ucs . #x2FF0) ; ⿰ + ) + ((=ucs . #x53E3) ; 口 + ) + ((=ucs . #x8CC1) ; 賁 + )) + (shinjigen-1 . 1247) + (shinjigen-2 . 1247) + (=jis-x0208-1978 . #x4A2E) ; &M-04345; + (=jis-x0208-1983 . #x4A2E) ; &I-J83-4A2E; + (=ks-x1001 . #x5D44) ; &I-K0-5D44; + (=daikanwa . 04345) ; &I-M-04345; ) - ((=ucs . #x8CC1) ; 賁 + ((ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT") + (=ucs . #x2FF0) ; ⿰ + ) + ((=ucs . #x53E3) ; 口 + ) + ((=ucs . #x8CC1) ; 賁 + )) + (=jis-x0208-1990 . #x4A2E) ; >-05461; + (=cns11643-1 . #x6C3B) ; &I-C1-6C3B; + (=gb12345 . #x4567) ; >-05461; + (=big5 . #xBC51) ; &I-B-BC51; + (=gt . 05461) ; &I-GT-05461; + (=gt-pj-1 . #x4A2E) ; &I-GT-05461; + (=ucs@unicode . #x5674) ; >-05461; )) - (=ucs . #x5674) ; 噴 - (=jis-x0208-1990 . #x4A2E) ; &I-J90-4A2E; - (=cns11643-1 . #x6C3B) ; &I-C1-6C3B; - (=gb12345 . #x4567) ; 噴 - (=big5 . #xBC51) ; &I-B-BC51; - (=gt . 05461) ; &I-GT-05461; - (=gt-pj-1 . #x4A2E) ; &I-GT-05461; )) (define-char '((ideographic-radical . 30) ; ⼝ -- 1.7.10.4