From: tomo <tomo>
Date: Thu, 7 Apr 2005 13:41:16 +0000 (+0000)
Subject: (U+389F): Use `->denotational'.
X-Git-Tag: r21-4-15-chise-0_22^2~219
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=68ef04421887bfc53279a619391d48a8f595a7fc;p=chise%2Fxemacs-chise.git

(U+389F): Use `->denotational'.
(BC-88F4): New character.
---

diff --git a/lisp/utf-2000/Ideograph-R054-Long-Stride.el b/lisp/utf-2000/Ideograph-R054-Long-Stride.el
index 4414c79..7797943 100644
--- a/lisp/utf-2000/Ideograph-R054-Long-Stride.el
+++ b/lisp/utf-2000/Ideograph-R054-Long-Stride.el
@@ -21,18 +21,31 @@
 (define-char
   '((ideographic-radical . 54)	; â¼µ
     (=ucs		. #x389F)	; 㢟
+    ))
+(define-char
+  '((ideographic-radical . 54)	; â¼µ
+    (ideographic-strokes . 3)
+    (total-strokes	 . 6)
+    (<-denotational
+     ((=ucs		  . #x389F)	; 㢟
+      ))
     (->subsumptive
-     ((ideographic-strokes . 3)
-      (total-strokes	   . 6)
-      (=daikanwa	  . 09567)	; &M-09567;
+     ((=daikanwa	  . 09567)	; &M-09567;
       )
-     ((ideographic-strokes . 3)
-      (total-strokes	   . 6)
-      (=ucs@unicode	  . #x389F)	; &UU+389F;
+     ((=ucs@unicode	  . #x389F)	; &UU+389F;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 54)	; â¼µ
+    (ideographic-strokes . 4)
+    (total-strokes	 . 7)
+    (<-denotational
+     ((=ucs		  . #x389F)	; 㢟
+      ))
+    (->subsumptive
+     ((=big5-cdp	  . #x88F4)	; &CDP-88F4;
       )
-     ((ideographic-strokes . 4)
-      (total-strokes	   . 7)
-      (=cns11643-4	  . #x2429)	; &C4-2429; [04-09]
+     ((=cns11643-4	  . #x2429)	; &C4-2429; [04-09]
       ))
     ))
 (define-char