(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 1b3c937..a5ea8f8 100644 (file)
--- a/lisp/utf-2000/Ideograph-R077-Stop.el
+++ b/lisp/utf-2000/Ideograph-R077-Stop.el
@@ -3,6 +3,7 @@
   '((ideographic-radical . 77) ; ⽌
     (ideographic-strokes . 0)
     (total-strokes      . 4)
+    (shinjigen-1       . 3947)
     (shinjigen-2       . 3947)
     (=ucs              . #x6B62)       ; 止
     (=jis-x0208                . #x3B5F)       ; &I-J90-3B5F; [27-63]
@@ -17,30 +18,45 @@
     ))
 (define-char
   '((=>ucs             . #x6B62)       ; 止
-    (morohashi-daikanwa        16253 0 0)
+    (=>daikanwa                . 16253)        ; 止
     (ideographic-radical . 77) ; ⽌
     (ideographic-strokes . 0)
     (total-strokes      . 3)
-    (=gt-k             . 00182)        ; &GT-K00182;
-    (=gt-pj-k1         . #x3A42)       ; &GT-K00182; [26-34]
+    (<-ideographic-component-forms
+     ((=ucs              . #x6B62)     ; 止
+      ))
+    (=gt-k             . 00439)        ; &GT-K00439;
+    (=gt-pj-k1         . #x347D)       ; &GT-K00439; [20-93]
     ))
 (define-char
   '((=>ucs             . #x6B62)       ; 止
-    (morohashi-daikanwa        16253 0 1)
+    (=>daikanwa                . 16253)        ; 止
     (ideographic-radical . 77) ; ⽌
     (ideographic-strokes . 0)
     (total-strokes      . 3)
-    (=gt-k             . 00439)        ; &GT-K00439;
-    (=gt-pj-k1         . #x347D)       ; &GT-K00439; [20-93]
+    (<-ideographic-component-forms
+     ((=ucs              . #x6B62)     ; 止
+      ))
+    (=big5-cdp         . #x8960)       ; &CDP-8960;
+    (=gt-k             . 00182)        ; &I-GT-K00182;
+    (=gt-pj-k1         . #x3A42)       ; &CDP-8960; [26-34]
     ))
 (define-char
-  '((=>ucs             . #x6B62)       ; 止
-    (morohashi-daikanwa        16253 0 2)
+  '((=>daikanwa                . 16253)        ; 止
     (ideographic-radical . 77) ; ⽌
     (ideographic-strokes . 0)
     (total-strokes      . 4)
-    (=gt-k             . 00440)        ; &GT-K00440;
-    (=gt-pj-k1         . #x3675)       ; &GT-K00440; [22-85]
+    (<-ideographic-component-forms
+     ((=ucs              . #x6B62)     ; 止
+      ))
+    (=ucs              . #x9FB0)       ; 龰
+    (->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)      ; 𣥂
@@ -249,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]
@@ -1030,7 +1052,7 @@
     (total-strokes      . 12)
     (=ucs              . #x2398B)      ; 𣦋
     (->subsumptive
-     ((=ucs@iso                  . #x2398B)    ; &UU+2398B;
+     ((=ucs@iso                  . #x2398B)    ; &U-0002398B;
       )
      ((hanyu-dazidian    2 1444 5)
       (=hanziku-4        . #xD3B4)     ; &HZK04-D3B4;