From 177dcc3796ed0a20e79f972813dba4d1ec0ac5e7 Mon Sep 17 00:00:00 2001 From: tomo Date: Thu, 14 Oct 2004 14:34:11 +0000 Subject: [PATCH] (U-00020B02): Use `->subsumptive'; use `->synonyms*sources' instead of char-ref in `->synonyms'. --- lisp/utf-2000/Ideograph-R028-Private.el | 42 +++++++++++++++++++++---------- 1 file changed, 29 insertions(+), 13 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R028-Private.el b/lisp/utf-2000/Ideograph-R028-Private.el index 6eb5d55..e1b6d50 100644 --- a/lisp/utf-2000/Ideograph-R028-Private.el +++ b/lisp/utf-2000/Ideograph-R028-Private.el @@ -908,21 +908,37 @@ (=hanziku-1 . #xF5F0) ; &I-HZK01-F5F0; )) (define-char - '((ideographic-radical . 28) ; ⼛ - (ideographic-strokes . 10) + '((ideographic-radical@ucs . 28) ; ⼛ + (ideographic-strokes@ucs . 10) + (ideographic-radical@ucs*sources + daikanwa=03104 ucs) + (ideographic-radical@cns . 136) ; ⾇ + (ideographic-strokes@cns . 6) + (ideographic-radical@cns*sources + daikanwa=30340 cns11643) (total-strokes . 12) - (->identical - ((=daikanwa . 30340) ; &M-30340; - )) - (->synonyms - (:sources (henkai-ruihen morohashi-daikanwa) - :char ((=daikanwa . 13502) ; &I-M-13502; - ) - )) - (hanyu-dazidian 1 389 3) (=ucs . #x20B02) ; 𠬂 - (=daikanwa . 03104) ; &I-M-03104; - (=hanziku-1 . #xF5EF) ; &I-HZK01-F5EF; + (->subsumptive + ((hanyu-dazidian 1 389 3) + (=hanziku-1 . #xF5EF) ; &HZK01-F5EF; + (=ucs@iso . #x20B02) ; &HZK01-F5EF; + (->subsumptive + ((ideographic-radical . 28) ; ⼛ + (ideographic-strokes . 10) + (->synonyms + ((=daikanwa . 13502) ; &I-M-13502; + )) + (->synonyms*sources + pianhai-leibian daikanwa) + (=daikanwa . 03104) ; &M-03104; + ) + ((ideographic-radical . 136) ; ⾇ + (ideographic-strokes . 6) + (=daikanwa . 30340) ; &M-30340; + )) + ) + ((=cns11643-6 . #x4D62) ; &C6-4D62; [45-66] + )) )) (define-char '((ideographic-radical . 28) ; ⼛ -- 1.7.10.4