From c350d59f57173442c736657501740768e15acfa5 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 1 Mar 2022 00:12:55 +0900
Subject: [PATCH] (U-00021630): Apply new conventions for glyph granularity.

---
 lisp/utf-2000/Ideograph-R037-Big.el |   47 ++++++++++++++++++++++++++++++++---
 1 file changed, 44 insertions(+), 3 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index e7016db..3642f38 100644
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -6538,11 +6538,52 @@
   '((ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
-    (hanyu-dazidian	1 541 2)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=>ucs@component	  . #x72AC)	; &A-compU+72AC;
+      (=>iwds-1		  .  0239)	; &A-compU+72AC;
+      )
+     ((=ucs		  . #x8C46)	; 豆
+      ))
+    (sound@ja/on/go	"gWaN")
+    (sound@ja/on/kan	"kWaN")
     (=ucs		. #x21630)	; 𡘰
-    (=cns11643-5	. #x2C6B)	; &I-C5-2C6B; [12-75]
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x21630)	; 𡘰
+      ))
+    (ideographic-radical . 37)	; ⼤
+    (ideographic-strokes . 7)
+    (total-strokes	 . 10)
+    (hanyu-dazidian	1 541 2)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5927)	; 大
+      )
+     ((=ucs		  . #x8C46)	; 豆
+      ))
+    (=ucs@iso		. #x21630)	; &C5-2C6B;
+    (=cns11643-5	. #x2C6B)	; &C5-2C6B; [12-75]
     (=daikanwa		. 05935)	; &I-M-05935;
-    (=hanziku-2		. #xBF55)	; &I-HZK02-BF55;
+    (->subsumptive
+     ((==ucs@iso	  . #x21630)	; &g2-M-05935;
+      (==cns11643-5	  . #x2C6B)	; &g2-M-05935; [12-75]
+      (==daikanwa	  . 05935)	; &g2-M-05935;
+      (->subsumptive
+       ((===daikanwa	    . 05935)	; &R-M-05935;
+	)
+       ((===cns11643-5	    . #x2C6B)	; &R-C5-2C6B; [12-75]
+	)
+       ((===ucs@iso	    . #x21630)	; &R-U-00021630;
+	)
+       ((=hanziku-2	    . #xBF55)	; &HZK02-BF55;
+	))
+      ))
     ))
 (define-char
   '((ideographic-radical . 37)	; ⼤
-- 
1.7.10.4