From: tomo <tomo>
Date: Sat, 7 Aug 2004 14:44:20 +0000 (+0000)
Subject: (U+3AB7): Add `ideographic-{radical|strokes}' in derived characters.
X-Git-Tag: r21-4-15-chise-0_21-31^2~87
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=3204b518332c79aed8478641a6554312b591b5d2;p=chise%2Fxemacs-chise.git.1

(U+3AB7): Add `ideographic-{radical|strokes}' in derived characters.
---

diff --git a/lisp/utf-2000/Ideograph-R068-Dipper.el b/lisp/utf-2000/Ideograph-R068-Dipper.el
index 4e1fd2b..04f362e 100644
--- a/lisp/utf-2000/Ideograph-R068-Dipper.el
+++ b/lisp/utf-2000/Ideograph-R068-Dipper.el
@@ -178,16 +178,13 @@
     (=cns11643-6	. #x4045)	; &I-C6-4045; [32-37]
     ))
 (define-char
-  '((ideographic-radical@ucs . 68)	; ⽃
-    (ideographic-strokes@ucs . 7)
-    (ideographic-radical@ucs*sources
-     daikanwa ucs)
-    (ideographic-radical@cns . 151)	; ⾖
-    (ideographic-strokes@cns . 4)
-    (total-strokes	 . 11)
+  '((total-strokes	 . 11)
     (=ucs		. #x3AB7)	; 㪷
     (->subsumptive
-     ((ideographic-structure
+     ((ideographic-radical . 68)	; ⽃
+      (ideographic-strokes . 7)
+      (ideographic-radical*sources daikanwa cbeta ucs)
+      (ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
 	(=ucs		    . #x2FF0)	; â¿°
 	)
@@ -199,7 +196,9 @@
       (=cbeta		  . 00356)	; &I-CB00356;
       (=ucs@unicode	  . #x3AB7)	; &M-13507;
       )
-     ((=cns11643-3	  . #x392B)	; &C3-392B; [25-11]
+     ((ideographic-radical . 151)	; ⾖
+      (ideographic-strokes . 4)
+      (=cns11643-3	  . #x392B)	; &C3-392B; [25-11]
       ))
     ))
 (define-char