(U+382F): Use `->denotational' instead of `->subsumptive'.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R077-Stop.el

diff --git a/lisp/utf-2000/Ideograph-R077-Stop.el b/lisp/utf-2000/Ideograph-R077-Stop.el
index 40a488b..b00a5fb 100644 (file)
--- a/lisp/utf-2000/Ideograph-R077-Stop.el
+++ b/lisp/utf-2000/Ideograph-R077-Stop.el
@@ -17,8 +17,9 @@
     (=shinjigen                .  3947)        ; 止
     ))
 (define-char
-  '((=>ucs             . #x6B62)       ; 止
-    (=>daikanwa                . 16253)        ; 止
+  '((<-denotational
+     ((=ucs              . #x6B62)     ; 止
+      ))
     (ideographic-radical . 77) ; ⽌
     (ideographic-strokes . 0)
     (total-strokes      . 3)
@@ -29,8 +30,9 @@
       ))
     ))
 (define-char
-  '((=>ucs             . #x6B62)       ; 止
-    (=>daikanwa                . 16253)        ; 止
+  '((<-denotational
+     ((=ucs              . #x6B62)     ; 止
+      ))
     (ideographic-radical . 77) ; ⽌
     (ideographic-strokes . 0)
     (total-strokes      . 3)
@@ -42,21 +44,27 @@
       ))
     ))
 (define-char
-  '((=>daikanwa                . 16253)        ; 止
+  '((<-denotational
+     ((=ucs              . #x6B62)     ; 止
+      ))
     (ideographic-radical . 77) ; ⽌
     (ideographic-strokes . 0)
     (total-strokes      . 4)
-    (=ucs              . #x9FB0)       ; 龰
+    (=big5-cdp         . #x8B68)       ; &CDP-8B68;
     (<-formed@component/connect-above
      ((=ucs              . #x6B62)     ; 止
       ))
-    (->subsumptive
+    ))
+(define-char
+  '((<-denotational
      ((=big5-cdp         . #x8B68)     ; &CDP-8B68;
-      )
-     ((=ucs@unicode      . #x9FB0)     ; &GT-K00440;
-      (=gt-k             . 00440)      ; &GT-K00440;
-      (=gt-pj-k1         . #x3675)     ; &GT-K00440; [22-85]
       ))
+    (ideographic-radical . 77) ; ⽌
+    (ideographic-strokes . 0)
+    (total-strokes      . 4)
+    (=ucs              . #x9FB0)       ; 龰
+    (=gt-k             . 00440)        ; &I-GT-K00440;
+    (=gt-pj-k1         . #x3675)       ; 龰 [22-85]
     ))
 (define-char
   '((ideographic-radical . 77) ; ⽌
@@ -1750,10 +1758,7 @@
     (->subsumptive
      ((=daikanwa         . 16342)      ; &M-16342;
       (<-same
-       ((=ucs@jis          . #x8E72)   ; &GT-50590;
-       (=jis-x0208         . #x6D2D)   ; &GT-50590; [77-13]
-       (=jis-x0213-1       . #x6D2D)   ; &I-JX1-6D2D; [77-13]
-       (=daikanwa          . 37874)    ; &I-M-37874;
+       ((=daikanwa         . 37874)    ; &M-37874;
        ))
       (<-same*sources
        yupian daikanwa)