From acb9d8c4e661d8718526a161cfd8c9b88caa6f84 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 1 Feb 2023 16:37:03 +0900
Subject: [PATCH] (U+5B93-itaiji-005): New character. (A-U+5BBB-itaiji-001):
 New abstract node. (U+5BBB-itaiji-001): New character; use
 `<-denotational' for A-U+5BBB-itaiji-001.

---
 lisp/utf-2000/Ideograph-R040-Roof.el |   57 ++++++++++++++++++++++++++++++++++
 1 file changed, 57 insertions(+)

diff --git a/lisp/utf-2000/Ideograph-R040-Roof.el b/lisp/utf-2000/Ideograph-R040-Roof.el
index d815279..5c92066 100644
--- a/lisp/utf-2000/Ideograph-R040-Roof.el
+++ b/lisp/utf-2000/Ideograph-R040-Roof.el
@@ -2632,6 +2632,20 @@
       )
      ((=ucs		  . #x5B80)	; 宀
       )
+     ((=ucs		  . #x7236)	; 父
+      ))
+    (=ucs-itaiji-005	. #x5B93)	; &U-i005+5B93;
+    ))
+(define-char
+  '((ideographic-radical . 40)	; ⼧
+    (ideographic-strokes . 4)
+    (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5B80)	; 宀
+      )
      ((=ucs-itaiji-001	  . #x5928)	; &U-i001+5928;
       ))
     (=gt-k		. 03157)	; &GT-K03157;
@@ -8238,6 +8252,32 @@
   '((<-denotational
      ((=>ucs@cognate	  . #x5BBB)	; &A-cgnU+5BBB;
       ))
+    (ideographic-radical . 40)	; ⼧
+    (ideographic-strokes . 7)
+    (total-strokes	 . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs-itaiji-005	  . #x5B93)	; &U-i005+5B93;
+      )
+     ((=>ucs@component	  . #x5C6E)	; &A-compU+5C6E;
+      (=>iwds-1		  .  0096)	; &A-compU+5C6E;
+      ))
+    (ideographic-structure@apparent
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5B80)	; 宀
+      )
+     ((=ucs		  . #x2454F)	; 𤕏
+      ))
+    (=>ucs-itaiji-001	. #x5BBB)	; &A-U-i001+5BBB;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x5BBB)	; &A-cgnU+5BBB;
+      ))
     (<-denotational@usage
      ((==>ucs@bucs	  . #x5BC6)	; &BUCS+5BC6;
       ))
@@ -8275,6 +8315,23 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs-itaiji-001	  . #x5BBB)	; &A-U-i001+5BBB;
+      ))
+    (ideographic-radical . 40)	; ⼧
+    (ideographic-strokes . 7)
+    (total-strokes	 . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs-itaiji-005	  . #x5B93)	; &U-i005+5B93;
+      )
+     ((=ucs		  . #x5C71)	; å±±
+      ))
+    (=ucs-itaiji-001	. #x5BBB)	; &U-i001+5BBB;
+    ))
+(define-char
   '((ideographic-radical . 40)	; ⼧
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
-- 
1.7.10.4