From 17f795e8218928d2e83af3d7747faf88ed34a28e Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 21 May 2020 19:29:59 +0900
Subject: [PATCH] (U-00021D00): Add `<-denotational@component' for
 A-IWDSU+21D00; add `sound@ja/on'; add `<-Small-Seal' for
 UU+4E30. (IU+24BD3): Copied from Ideograph-R100-Life.el;
 use `ideographic-{radical|strokes}@ucs' instead of
 `ideographic-{radical|strokes}'; add
 `ideographic-{radical|strokes}@r045'; add M-07832.
 (A-IWDSU+21D00): New abstract node; use
 `<-denotational@component' for A-IWDSU+21D44.

---
 lisp/utf-2000/Ideograph-R045-Sprout.el |   71 +++++++++++++++++++++++++++++++-
 1 file changed, 70 insertions(+), 1 deletion(-)

diff --git a/lisp/utf-2000/Ideograph-R045-Sprout.el b/lisp/utf-2000/Ideograph-R045-Sprout.el
index 383353c..9cb39bd 100644
--- a/lisp/utf-2000/Ideograph-R045-Sprout.el
+++ b/lisp/utf-2000/Ideograph-R045-Sprout.el
@@ -389,12 +389,35 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 45)	; ⼬
+  '((<-denotational@component
+     ((=>ucs@iwds-1	  . #x21D00)	; &A-IWDSU+21D00;
+      ))
+    (ideographic-radical . 45)	; ⼬
     (ideographic-strokes . 2)
     (total-strokes	 . 5)
+    (sound@ja/on	"hou")
     (=ucs		. #x21D00)	; 𡴀
     (=cns11643-6	. #x226D)	; &I-C6-226D; [02-77]
     (=daikanwa		. 07831)	; &I-M-07831;
+    (<-Small-Seal
+     ((=ucs@unicode	  . #x4E30)	; &MJ006350;
+      (=mj		  . 006350)	; &MJ006350;
+      (=daikanwa	  . 00076)	; &I-M-00076;
+      ))
+    (<-Small-Seal*sources
+     zhengzitong daikanwa)
+    (->subsumptive
+     ((==ucs@iso	  . #x21D00)	; &g2-M-07831;
+      (==cns11643-6	  . #x226D)	; &g2-M-07831; [02-77]
+      (==daikanwa	  . 07831)	; &g2-M-07831;
+      (->subsumptive
+       ((===daikanwa	    . 07831)	; &R-M-07831;
+	)
+       ((===cns11643-6	    . #x226D)	; &R-C6-226D; [02-77]
+	)
+       ((===ucs@iso	    . #x21D00)	; &R-U-00021D00;
+	))
+      ))
     ))
 (define-char
   '((<-denotational@component
@@ -412,6 +435,45 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x24BD3)	; 𤯓
+      ))
+    (ideographic-radical@ucs . 100)	; â½£
+    (ideographic-strokes@ucs . 0)
+    (ideographic-radical@ucs*sources
+     daikanwa=21671 cns)
+    (ideographic-strokes@ucs*sources
+     daikanwa=21671)
+    (ideographic-radical@r045 . 45)	; ⼬
+    (ideographic-strokes@r045 . 2)
+    (ideographic-radical@r045*sources
+     daikanwa=7832)
+    (ideographic-strokes@r045*sources
+     daikanwa=7832)
+    (total-strokes	 . 5)
+    (=ucs@iso		. #x24BD3)	; &C6-2335;
+    (=cns11643-6	. #x2335)	; &C6-2335; [03-21]
+    (=daikanwa		. 21671)	; &I-M-21671;
+    (->subsumptive
+     ((==ucs@iso	  . #x24BD3)	; &g2-M-21671;
+      (==cns11643-6	  . #x2335)	; &g2-M-21671; [03-21]
+      (==daikanwa	  . 21671)	; &g2-M-21671;
+      (->subsumptive
+       ((ideographic-radical . 45)	; ⼬
+	(ideographic-strokes . 2)
+	(=daikanwa	    . 07832)	; &M-07832;
+	)
+       ((ideographic-radical . 100)	; â½£
+	(ideographic-strokes . 0)
+	(===daikanwa	    . 21671)	; &R-M-21671;
+	)
+       ((===cns11643-6	    . #x2335)	; &R-C6-2335; [03-21]
+	)
+       ((===ucs@iso	    . #x24BD3)	; &R-U-00024BD3;
+	))
+      ))
+    ))
+(define-char
   '((ideographic-radical . 45)	; ⼬
     (ideographic-strokes . 3)
     (total-strokes	 . 6)
@@ -1837,6 +1899,13 @@
     (=ucs		. #x21D2C)	; ð¡´¬
     ))
 (define-char
+  '((<-denotational@component
+     ((=>ucs@iwds-1	  . #x21D44)	; &A-IWDSU+21D44;
+      ))
+    (ideographic-radical . 45)	; ⼬
+    (=>ucs@iwds-1	. #x21D00)	; &A-IWDSU+21D00;
+    ))
+(define-char
   '((ideographic-radical . 45)	; ⼬
     (=>big5-cdp		. #x8875)	; &A-GT-K01900;
     (=>gt-k		. 01900)	; &A-GT-K01900;
-- 
1.7.10.4