Add some Adobe-Japan1-0 code points.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / u02E00-CJK-Radical-Supplement.el

diff --git a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
index 137bd3e..3c19af2 100644 (file)
--- a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
+++ b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
@@ -832,17 +832,6 @@
     (ideographic-radical . 123)        ; ⽺
     (ideographic-strokes . 0)
     (total-strokes      . 6)
-    (=gt-k             . 01701)        ; &GT-K01701;
-    (=gt-pj-k1         . #x3443)       ; &GT-K01701; [20-35]
-    (<-formed@component/connect-right
-     ((=ucs              . #x7F8A)     ; 羊
-      ))
-    ))
-(define-char
-  '((=>ucs             . #x2EB6)       ; ⺶
-    (ideographic-radical . 123)        ; ⽺
-    (ideographic-strokes . 0)
-    (total-strokes      . 6)
     (=big5-cdp         . #x8970)       ; &CDP-8970;
     (<-formed@component
      ((=ucs              . #x7F8A)     ; 羊
@@ -1142,7 +1131,10 @@
       ))
     ))
 (define-char
-  '((name              . "CJK RADICAL FOOT")
+  '((<-denotational
+     ((=ucs              . #x27FB7)    ; 𧾷
+      ))
+    (name              . "CJK RADICAL FOOT")
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
@@ -1152,6 +1144,9 @@
     (<-formed@component/connect-right
      ((=ucs              . #x8DB3)     ; 足
       ))
+    (<-identical@component/connect-right
+     ((=ucs              . #x27FB7)    ; 𧾷
+      ))
     ))
 (define-char
   '((<-denotational