(G0-6566): Separate GT-K00266.

(<CJK RADICAL SNOUT TWO>): Copied from
u02E00-CJK-Radical-Supplement.el; unify GT-K00266.
(BC-897C): Map to <CJK RADICAL SNOUT TWO> instead of U+5F50.

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index 0a806d7..8120cad 100644 (file)
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -22,16 +22,8 @@
   '((<-denotational
      ((=ucs              . #x5F50)     ; 彐
       ))
-    (=gb2312           . #x6566)       ; &GT-K00266; [69-70]
-    (=gt-k             . 00266)        ; &I-GT-K00266;
-    (=gt-pj-k1         . #x3663)       ; &GT-K00266; [22-67]
-    (=ucs@unicode      . #x5F50)       ; &GT-K00266;
-    ))
-(define-char
-  '((<-denotational
-     ((=ucs              . #x5F50)     ; 彐
-      ))
-    (=big5-cdp         . #x897C)       ; &CDP-897C;
+    (=gb2312           . #x6566)       ; &G0-6566; [69-70]
+    (=ucs@unicode      . #x5F50)       ; &G0-6566;
     ))
 (define-char
   '((<-denotational
@@ -49,6 +41,28 @@
     (=gt-pj-k1         . #x3974)       ; &GT-K00267; [25-84]
     ))
 (define-char
+  '((name              . "CJK RADICAL SNOUT TWO")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (<-denotational
+     ((=ucs              . #x5F50)     ; 彐
+      ))
+    (<-radical
+     ((=ucs              . #x5F50)     ; 彐
+      ))
+    (=ucs              . #x2E95)       ; ⺕
+    (=gt-k             . 00266)        ; &I-GT-K00266;
+    (=gt-pj-k1         . #x3663)       ; ⺕ [22-67]
+    ))
+(define-char
+  '((<-denotational
+     ((name              . "CJK RADICAL SNOUT TWO")
+      (=ucs              . #x2E95)     ; ⺕
+      ))
+    (=big5-cdp         . #x897C)       ; &CDP-897C;
+    ))
+(define-char
   '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 0)
     (total-strokes      . 3)