(U-0002394D): Add `<-ancient' for M-38752.

[chise/xemacs-chise.git] / 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 db5bbb8..a5ea8f8 100644 (file)
--- a/lisp/utf-2000/Ideograph-R077-Stop.el
+++ b/lisp/utf-2000/Ideograph-R077-Stop.el
@@ -25,8 +25,8 @@
     (<-ideographic-component-forms
      ((=ucs              . #x6B62)     ; 止
       ))
-    (=gt-k             . 00182)        ; &GT-K00182;
-    (=gt-pj-k1         . #x3A42)       ; &GT-K00182; [26-34]
+    (=gt-k             . 00439)        ; &GT-K00439;
+    (=gt-pj-k1         . #x347D)       ; &GT-K00439; [20-93]
     ))
 (define-char
   '((=>ucs             . #x6B62)       ; 止
@@ -37,8 +37,9 @@
     (<-ideographic-component-forms
      ((=ucs              . #x6B62)     ; 止
       ))
-    (=gt-k             . 00439)        ; &GT-K00439;
-    (=gt-pj-k1         . #x347D)       ; &GT-K00439; [20-93]
+    (=big5-cdp         . #x8960)       ; &CDP-8960;
+    (=gt-k             . 00182)        ; &I-GT-K00182;
+    (=gt-pj-k1         . #x3A42)       ; &CDP-8960; [26-34]
     ))
 (define-char
   '((=>daikanwa                . 16253)        ; 止
@@ -49,8 +50,13 @@
      ((=ucs              . #x6B62)     ; 止
       ))
     (=ucs              . #x9FB0)       ; 龰
-    (=gt-k             . 00440)        ; &I-GT-K00440;
-    (=gt-pj-k1         . #x3675)       ; 龰 [22-85]
+    (->subsumptive
+     ((=big5-cdp         . #x8B68)     ; &CDP-8B68;
+      )
+     ((=gt-k             . 00440)      ; &GT-K00440;
+      (=gt-pj-k1         . #x3675)     ; &GT-K00440; [22-85]
+      (=ucs@unicode      . #x9FB0)     ; &GT-K00440;
+      ))
     ))
 (define-char
   '((=>ucs             . #x23942)      ; 𣥂
@@ -259,6 +265,12 @@
   '((ideographic-radical . 77) ; ⽌
     (ideographic-strokes . 4)
     (total-strokes      . 8)
+    (<-ancient
+     ((=ks-x1001         . #x504E)     ; &M-38752; [48-46]
+      (=daikanwa         . 38752)      ; &I-M-38752;
+      ))
+    (<-ancient*sources
+     shuowen daikanwa)
     (hanyu-dazidian    2 1441 6)
     (=ucs              . #x2394D)      ; 𣥍
     (=cns11643-6       . #x2C3C)       ; &I-C6-2C3C; [12-28]