From 9b0aab9c80263dbed425497ebecc4f2e3a7d045b Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 26 Jul 2023 23:49:05 +0900
Subject: [PATCH] (A-BC-89B3): New abstract node. (U+2B740-itaiji-001): Use
 A-BC-89B3 instead of A-compU+2B740 as its mother; add
 `<-denotational@component' for A-compU+2B740. (BC-89B3):
 New character; use `<-denotational' for A-BC-89B3.

---
 lisp/utf-2000/Ideograph-R002-Line.el |   20 +++++++++++++++++++-
 1 file changed, 19 insertions(+), 1 deletion(-)

diff --git a/lisp/utf-2000/Ideograph-R002-Line.el b/lisp/utf-2000/Ideograph-R002-Line.el
index befa957..575298e 100644
--- a/lisp/utf-2000/Ideograph-R002-Line.el
+++ b/lisp/utf-2000/Ideograph-R002-Line.el
@@ -690,10 +690,15 @@
     ))
 (define-char
   '((ideographic-radical . 2)	; ⼁
-    (=>ucs@component	. #x2B740)	; &A-compU+2B740;
+    (ideographic-strokes . 2)
+    (total-strokes	 . 3)
+    (=>big5-cdp		. #x89B3)	; &A-CDP-89B3;
     ))
 (define-char
   '((<-denotational
+     ((=>big5-cdp	  . #x89B3)	; &A-CDP-89B3;
+      ))
+    (<-denotational@component
      ((=>ucs@component	  . #x2B740)	; &A-compU+2B740;
       ))
     (ideographic-radical . 2)	; ⼁
@@ -760,6 +765,15 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x89B3)	; &A-CDP-89B3;
+      ))
+    (ideographic-radical . 2)	; ⼁
+    (ideographic-strokes . 2)
+    (total-strokes	 . 3)
+    (=big5-cdp		. #x89B3)	; &CDP-89B3;
+    ))
+(define-char
   '((<-denotational@usage
      ((==>daijiten	  . 00051)	; &A2-DJT-00051;
       ))
@@ -2867,6 +2881,10 @@
     ))
 (define-char
   '((ideographic-radical . 2)	; ⼁
+    (=>ucs@component	. #x2B740)	; &A-compU+2B740;
+    ))
+(define-char
+  '((ideographic-radical . 2)	; ⼁
     (==>daijiten	. 00044)	; &A2-DJT-00044;
     ))
 (define-char
-- 
1.7.10.4