(U-0002028A): Use `ideographic-radical@ucs' instead of

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R116-Cave.el

diff --git a/lisp/utf-2000/Ideograph-R116-Cave.el b/lisp/utf-2000/Ideograph-R116-Cave.el
index f686726..4fe449a 100644 (file)
--- a/lisp/utf-2000/Ideograph-R116-Cave.el
+++ b/lisp/utf-2000/Ideograph-R116-Cave.el
@@ -197,13 +197,13 @@
     (=ucs              . #x7A81)       ; 突
     ))
 (define-char
-  '((=>ucs@jis         . #x7A81)       ; &GT-32811;
+  '((<-denotational
+     ((=ucs              . #x7A81)     ; 突
+      ))
+    (=>ucs@jis         . #x7A81)       ; &GT-32811;
     (ideographic-radical . 116)        ; ⽳
     (ideographic-strokes . 3)
     (total-strokes      . 8)
-    (<-denotational
-     ((=ucs              . #x7A81)     ; 突
-      ))
     (=ucs              . #x2592E)      ; 𥤮
     (->subsumptive
      ((<-simplified@JP/Jouyou
@@ -373,13 +373,13 @@
       ))
     ))
 (define-char
-  '((=>ucs@jis         . #xFA55)       ; 突
+  '((<-denotational
+     ((=ucs              . #x7A81)     ; 突
+      ))
+    (=>ucs@jis         . #xFA55)       ; 突
     (ideographic-radical . 116)        ; ⽳
     (ideographic-strokes . 4)
     (total-strokes      . 9)
-    (<-denotational
-     ((=ucs              . #x7A81)     ; 突
-      ))
     (=big5             . #xACF0)       ; &B-ACF0;
     (->subsumptive
      ((=>ucs*            . #x7A81)     ; 突
@@ -1490,7 +1490,10 @@
     (total-strokes      . 12)
     (=ucs              . #x2598E)      ; 𥦎
     (->subsumptive
-     ((=daikanwa         . 25542)      ; &M-25542;
+     ((=gt               . 32948)      ; &GT-32948;
+      (=gt-pj-5                  . #x5922)     ; &GT-32948; [57-02]
+      (=daikanwa         . 25542)      ; &I-M-25542;
+      (=ucs@JP           . #x2598E)    ; &GT-32948;
       )
      ((=cns11643-6       . #x4C4F)     ; &C6-4C4F; [44-47]
       (=ucs@iso                  . #x2598E)    ; &C6-4C4F;
@@ -2397,12 +2400,12 @@
     (=ucs              . #x7AB4)       ; 窴
     ))
 (define-char
-  '((ideographic-radical . 116)        ; ⽳
-    (ideographic-strokes . 10)
-    (total-strokes      . 15)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x7AB4)     ; 窴
       ))
+    (ideographic-radical . 116)        ; ⽳
+    (ideographic-strokes . 10)
+    (total-strokes      . 15)
     (=daikanwa         . 25598)        ; &M-25598;
     ))
 (define-char
@@ -2656,12 +2659,12 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 116)        ; ⽳
-    (ideographic-strokes . 10)
-    (total-strokes      . 15)
-    (<-denotational
+  '((<-denotational
      ((=ucs              . #x7AB4)     ; 窴
       ))
+    (ideographic-radical . 116)        ; ⽳
+    (ideographic-strokes . 10)
+    (total-strokes      . 15)
     (=big5             . #xE6D4)       ; &B-E6D4;
     (->subsumptive
      ((=daikanwa         . 25618)      ; &M-25618;