(U+9F8D): Use `->subsumptive'.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R092-Fang.el

diff --git a/lisp/utf-2000/Ideograph-R092-Fang.el b/lisp/utf-2000/Ideograph-R092-Fang.el
index ddd9ffd..bdb5939 100644 (file)
--- a/lisp/utf-2000/Ideograph-R092-Fang.el
+++ b/lisp/utf-2000/Ideograph-R092-Fang.el
@@ -1,24 +1,29 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
-  '((=>ucs             . #x7259)       ; 牙
-    (ideographic-radical . 92) ; ⽛
+  '((ideographic-radical . 92) ; ⽛
     (ideographic-strokes . 0)
-    (total-strokes      . 4)
-    (=cns11643-1       . #x455B)       ; &M-19909; [37-59]
-    (=daikanwa         . 19909)        ; &I-M-19909;
+    (=ucs              . #x7259)       ; 牙
     ))
 (define-char
-  '((morohashi-daikanwa        19909 0 0)
+  '((<-denotational
+     ((=ucs              . #x7259)     ; 牙
+      ))
     (ideographic-radical . 92) ; ⽛
     (ideographic-strokes . 0)
     (total-strokes      . 4)
-    (=ucs              . #x7259)       ; 牙
-    (=gb2312           . #x5140)       ; &I-G0-5140; [49-32]
-    (=big5             . #xA4FA)       ; &I-B-A4FA;
-    ))
-(define-char
-  '((=>ucs             . #x7259)       ; 牙
-    (morohashi-daikanwa        19909 0 1)
+    (->subsumptive
+     ((=cns11643-1       . #x455B)     ; &M-19909; [37-59]
+      (=daikanwa         . 19909)      ; &I-M-19909;
+      )
+     ((=gb2312           . #x5140)     ; &G0-5140; [49-32]
+      (=big5             . #xA4FA)     ; &I-B-A4FA;
+      (=ucs@unicode      . #x7259)     ; &G0-5140;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x7259)     ; 牙
+      ))
     (ideographic-radical . 92) ; ⽛
     (ideographic-strokes . 0)
     (total-strokes      . 5)