From 598fe43867aca38a8f29fd2027e02322fcdfa808 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 20 Nov 2014 01:13:40 +0900
Subject: [PATCH] (<CJK RADICAL KNIFE ONE>): Use BC-8B5B instead of U-0002008A
 as the mother; add `ideographic-radical',
 `ideographic-strokes' and `total-strokes'. (U-0002008A):
 Separate BC-8B5B. (GT-K00089): Use BC-8B5B instead of
 U-0002008A as the mother. (BC-8B6C): Add
 `<-formed@component' for U+5200.

---
 lisp/utf-2000/Ideograph-R018-Knife.el |   41 ++++++++++++++++++++++-----------
 1 file changed, 27 insertions(+), 14 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R018-Knife.el b/lisp/utf-2000/Ideograph-R018-Knife.el
index 3158ca0..a3b3f19 100644
--- a/lisp/utf-2000/Ideograph-R018-Knife.el
+++ b/lisp/utf-2000/Ideograph-R018-Knife.el
@@ -82,12 +82,15 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x2008A)	; 𠂊
+     ((=big5-cdp	  . #x8B5B)	; &CDP-8B5B;
       ))
     (name		. "CJK RADICAL KNIFE ONE")
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ideographic-radical . 18)	; ⼑
+    (ideographic-strokes . 0)
+    (total-strokes	 . 2)
     (=ucs		. #x2E88)	; ⺈
     (=gt-k		. 00091)	; &I-GT-K00091;
     (=gt-pj-k1		. #x3234)	; ⺈ [18-20]
@@ -95,13 +98,27 @@
      ((=ucs		  . #x5200)	; 刀
       ))
     (<-identical@component/connect-below
+     ((=big5-cdp	  . #x8B5B)	; &CDP-8B5B;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 18)	; ⼑
+    (ideographic-strokes . 0)
+    (total-strokes	 . 2)
+    (=ucs		. #x2008A)	; 𠂊
+    ))
+(define-char
+  '((<-denotational
      ((=ucs		  . #x2008A)	; 𠂊
       ))
+    (ideographic-radical . 18)	; ⼑
+    (ideographic-strokes . 0)
+    (total-strokes	 . 2)
+    (=ucs@iso		. #x2008A)	; &U-0002008A;
     ))
 (define-char
   '((<-denotational
-     ((name		  . "CJK RADICAL KNIFE ONE")
-      (=ucs		  . #x2E88)	; ⺈
+     ((=big5-cdp	  . #x8B6C)	; &CDP-8B6C;
       ))
     (ideographic-radical . 18)	; ⼑
     (ideographic-strokes . 0)
@@ -118,23 +135,16 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 18)	; ⼑
-    (ideographic-strokes . 0)
-    (total-strokes	 . 2)
-    (=ucs		. #x2008A)	; 𠂊
-    (=big5-cdp		. #x8B5B)	; &CDP-8B5B;
-    (<-formed@component
-     ((=ucs		  . #x5200)	; 刀
-      ))
-    ))
-(define-char
   '((<-denotational
      ((=ucs		  . #x2008A)	; 𠂊
       ))
     (ideographic-radical . 18)	; ⼑
     (ideographic-strokes . 0)
     (total-strokes	 . 2)
-    (=ucs@iso		. #x2008A)	; &U-0002008A;
+    (=big5-cdp		. #x8B5B)	; &CDP-8B5B;
+    (<-formed@component
+     ((=ucs		  . #x5200)	; 刀
+      ))
     ))
 (define-char
   '((<-denotational
@@ -144,6 +154,9 @@
     (ideographic-strokes . 0)
     (total-strokes	 . 2)
     (=big5-cdp		. #x8B6C)	; &CDP-8B6C;
+    (<-formed@component
+     ((=ucs		  . #x5200)	; 刀
+      ))
     ))
 (define-char
   '((ideographic-radical . 18)	; ⼑
-- 
1.7.10.4