From 1c944a173165ef98d51177edffea8c10758f56c6 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 20 Sep 2024 20:24:46 +0900
Subject: [PATCH] (U+592B-itaiji-002): New character; use
 `<-denotational@component' for A-IWDSU+592B. (U-0002161C):
 Fix ideographic-structure. (U-00020057): Apply new
 conventions for glyph granularity.

---
 lisp/utf-2000/Ideograph-R037-Big.el |   66 +++++++++++++++++++++++++++++++----
 1 file changed, 59 insertions(+), 7 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index 27ba7c0..b1a2457 100644
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -904,6 +904,23 @@
     (=ucs-itaiji-001	. #x5934)	; &U-i001+5934;
     ))
 (define-char
+  '((<-denotational@component
+     ((=>ucs@iwds-1	  . #x592B)	; &A-IWDSU+592B;
+      ))
+    (ideographic-radical . 37)	; ⼤
+    (ideographic-strokes . 2)
+    (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5341)	; 十
+      )
+     ((=ucs		  . #x5927)	; 大
+      ))
+    (=ucs-itaiji-002	. #x592B)	; &U-i002+592B;
+    ))
+(define-char
   '((ideographic-radical . 37)	; ⼤
     (sound@ja/on/go	"Au" "yAu")
     (sound@ja/on/kan	"yAu" "ei")
@@ -6950,11 +6967,11 @@
     (ideographic-structure
      ((=ucs-itaiji-002	  . #x2FF1)	; &U-i002+2FF1;
       )
-     ((=>ucs@component	  . #x72AC)	; &A-compU+72AC;
-      (=>iwds-1		  .  0239)	; &A-compU+72AC;
-      )
      ((=>ucs@iwds-1	  . #x5405)	; &A-IWDSU+5405;
       (=>iwds-1		  .  0398)	; &A-IWDSU+5405;
+      )
+     ((=>ucs@component	  . #x72AC)	; &A-compU+72AC;
+      (=>iwds-1		  .  0239)	; &A-compU+72AC;
       ))
     (=ucs		. #x2161C)	; 𡘜
     ))
@@ -6968,9 +6985,9 @@
     (ideographic-structure
      ((=ucs-itaiji-002	  . #x2FF1)	; &U-i002+2FF1;
       )
-     ((=ucs		  . #x5927)	; 大
-      )
      ((=ucs		  . #x5405)	; 吅
+      )
+     ((=ucs		  . #x5927)	; 大
       ))
     (=ucs@iso		. #x2161C)	; &CDP-8577;
     (=big5-cdp		. #x8577)	; &CDP-8577;
@@ -13715,15 +13732,50 @@
     ))
 (define-char
   '((ideographic-radical@ucs . 1)	; ⼀
+    (ideographic-radical@cns . 37)	; ⼤
+    (ideographic-structure
+     ((=ucs-itaiji-001	  . #x2FFB)	; &U-i001+2FFB;
+      )
+     ((=>ucs@iwds-1	  . #x592B)	; &A-IWDSU+592B;
+      )
+     ((=ucs		  . #x7695)	; 皕
+      ))
+    (=ucs		. #x20057)	; 𠁗
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x20057)	; 𠁗
+      ))
+    (ideographic-radical@ucs . 1)	; ⼀
     (ideographic-strokes@ucs . 15)
     (ideographic-radical@cns . 37)	; ⼤
     (ideographic-strokes@cns . 13)
     (total-strokes	 . 16)
     (hanyu-dazidian	1 27 3)
-    (=ucs		. #x20057)	; 𠁗
-    (=cns11643-4	. #x4F7C)	; &I-C4-4F7C; [47-92]
+    (ideographic-structure
+     ((=ucs-itaiji-001	  . #x2FFB)	; &U-i001+2FFB;
+      )
+     ((=ucs		  . #x592B)	; 夫
+      )
+     ((=ucs		  . #x7695)	; 皕
+      ))
+    (=ucs@cns		. #x20057)	; &C4-4F7C;
+    (=cns11643-4	. #x4F7C)	; &C4-4F7C; [47-92]
     (=big5-cdp		. #x85A3)	; &I-CDP-85A3;
     (=daikanwa		. 49012)	; &I-M-49012;
+    (->subsumptive
+     ((==ucs@cns	  . #x20057)	; &g2-CDP-85A3;
+      (==cns11643-4	  . #x4F7C)	; &g2-CDP-85A3; [47-92]
+      (==big5-cdp	  . #x85A3)	; &g2-CDP-85A3;
+      (==daikanwa	  . 49012)	; &g2-CDP-85A3;
+      (->subsumptive
+       ((===daikanwa	    . 49012)	; &R-M-49012;
+	)
+       ((===big5-cdp	    . #x85A3)	; &R-CDP-85A3;
+	)
+       ((===cns11643-4	    . #x4F7C)	; &R-C4-4F7C; [47-92]
+	))
+      ))
     ))
 (define-char
   '((ideographic-radical . 37)	; ⼤
-- 
1.7.10.4