From d00843adba4d70f2e5ee38a3c75b1f6b14a6576c Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 3 Jul 2023 18:54:55 +0900
Subject: [PATCH] (A-cgnU+20B1E): New abstract node. (U-00020B1E): Add
 `<-denotational' for A-cgnU+20B1E. (A-U+20B1E-itaiji-002):
 New abstract node; use `<-denotational' for A-cgnU+20B1E;
 use `<-denotational@component' for A-IWDSU+2BD74.
 (U+20B1E-itaiji-002): New character; use `<-denotational'
 for A-U+20B1E-itaiji-002. (A-BC-85C8): New abstract node.
 (BC-85C8): New character; use `<-denotational' for
 A-BC-85C8.

---
 lisp/utf-2000/Ideograph-R029-Again.el |   78 ++++++++++++++++++++++++++++++++-
 1 file changed, 77 insertions(+), 1 deletion(-)

diff --git a/lisp/utf-2000/Ideograph-R029-Again.el b/lisp/utf-2000/Ideograph-R029-Again.el
index e4cf789..abacc1f 100644
--- a/lisp/utf-2000/Ideograph-R029-Again.el
+++ b/lisp/utf-2000/Ideograph-R029-Again.el
@@ -1150,7 +1150,14 @@
     (*note		"maybe unified by IWDS-1")
     ))
 (define-char
-  '((<-denotational@component
+  '((ideographic-radical . 29)	; ⼜
+    (=>ucs@cognate	. #x20B1E)	; &A-cgnU+20B1E;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x20B1E)	; &A-cgnU+20B1E;
+      ))
+    (<-denotational@component
      ((=>ucs@component	  . #x53CE)	; &A-compU+53CE;
       ))
     (ideographic-radical . 29)	; ⼜
@@ -1303,6 +1310,43 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x20B1E)	; &A-cgnU+20B1E;
+      ))
+    (<-denotational@component
+     ((=>ucs@iwds-1	  . #x2BD74)	; &A-IWDSU+2BD74;
+      ))
+    (ideographic-radical . 29)	; ⼜
+    (ideographic-strokes . 3)
+    (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5C6E)	; å±®
+      )
+     ((=ucs		  . #x53C8)	; 又
+      ))
+    (=>ucs-itaiji-002	. #x20B1E)	; &A-U-i002+20B1E;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-002	  . #x20B1E)	; &A-U-i002+20B1E;
+      ))
+    (ideographic-radical . 29)	; ⼜
+    (ideographic-strokes . 3)
+    (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x4DB9)	; 䶹
+      )
+     ((=ucs		  . #x53C8)	; 又
+      ))
+    (=ucs-itaiji-002	. #x20B1E)	; &U-i002+20B1E;
+    ))
+(define-char
   '((<-denotational@usage
      ((==>daijiten	  . 01116)	; &A2-DJT-01116;
       ))
@@ -5351,6 +5395,19 @@
     (ideographic-strokes . 7)
     (total-strokes	 . 9)
     (ideographic-structure
+     ((=ucs-itaiji-001	  . #x2FF1)	; &U-i001+2FF1;
+      )
+     ((=>big5-cdp	  . #x89C4)	; &A-CDP-89C4;
+      )
+     ((=>ucs-itaiji-002	  . #x20B1E)	; &A-U-i002+20B1E;
+      ))
+    (=>big5-cdp		. #x85C8)	; &A-CDP-85C8;
+    ))
+(define-char
+  '((ideographic-radical . 29)	; ⼜
+    (ideographic-strokes . 7)
+    (total-strokes	 . 9)
+    (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
       )
@@ -5436,6 +5493,25 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x85C8)	; &A-CDP-85C8;
+      ))
+    (ideographic-radical . 29)	; ⼜
+    (ideographic-strokes . 7)
+    (total-strokes	 . 9)
+    (ideographic-structure
+     ((=ucs-itaiji-001	  . #x2FF1)	; &U-i001+2FF1;
+      )
+     ((=big5-cdp	  . #x89C4)	; &CDP-89C4;
+      )
+     ((=ucs-itaiji-002	  . #x20B1E)	; &U-i002+20B1E;
+      ))
+    (=big5-cdp		. #x85C8)	; &CDP-85C8;
+    (<-original
+     ((=ucs		  . #x5E9A)	; 庚
+      ))
+    ))
+(define-char
   '((<-denotational@usage
      ((==>daijiten	  . 02427)	; &A2-DJT-02427;
       ))
-- 
1.7.10.4