From 31546ad7fd7fc67c0a3d086cec4cda369d7a0731 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 28 Apr 2024 13:18:38 +0900
Subject: [PATCH] (U-0002D19C): Apply new conventions for glyph granularity.
 (A-U+20DAC-itaiji-002): New abstract node.
 (U+20DAC-itaiji-002): New character; use `<-denotational'
 for A-U+20DAC-itaiji-002.

---
 lisp/utf-2000/Ideograph-R028-Private.el |   67 ++++++++++++++++++++++++++++++-
 1 file changed, 66 insertions(+), 1 deletion(-)

diff --git a/lisp/utf-2000/Ideograph-R028-Private.el b/lisp/utf-2000/Ideograph-R028-Private.el
index d284282..402cbad 100644
--- a/lisp/utf-2000/Ideograph-R028-Private.el
+++ b/lisp/utf-2000/Ideograph-R028-Private.el
@@ -2222,8 +2222,73 @@
 (define-char
   '((ideographic-radical . 28)	; ⼛
     (ideographic-strokes . 7)
+    (total-strokes	 . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=>ucs@component	  . #x593E)	; &A-compU+593E;
+      (=>iwds-1		  .  0147)	; &A-compU+593E;
+      )
+     ((=ucs		  . #x53B6)	; 厶
+      ))
     (=ucs		. #x2D19C)	; 𭆜
-    (=cbeta		. 07259)	; &I-CB07259;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x2D19C)	; 𭆜
+      ))
+    (ideographic-radical . 28)	; ⼛
+    (ideographic-strokes . 7)
+    (total-strokes	 . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x593E)	; 夾
+      )
+     ((=ucs		  . #x53B6)	; 厶
+      ))
+    (=ucs@JP/hanazono	. #x2D19C)	; &CB07259;
+    (=cbeta		. 07259)	; &CB07259;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x2D19C)	; &g2-CB07259;
+      (==cbeta		  . 07259)	; &g2-CB07259;
+      (->subsumptive
+       ((===cbeta	    . 07259)	; &R-CB07259;
+	))
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 28)	; ⼛
+    (ideographic-strokes . 7)
+    (total-strokes	 . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x53B8)	; 厸
+      )
+     ((=>ucs@component	  . #x2000E)	; &A-compU+2000E;
+      ))
+    (=>ucs-itaiji-002	. #x20DAC)	; &A-U-i002+20DAC;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-002	  . #x20DAC)	; &A-U-i002+20DAC;
+      ))
+    (ideographic-radical . 28)	; ⼛
+    (ideographic-strokes . 7)
+    (total-strokes	 . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x53B8)	; 厸
+      )
+     ((=ucs		  . #x2000E)	; 𠀎
+      ))
+    (=ucs-itaiji-002	. #x20DAC)	; &U-i002+20DAC;
     ))
 (define-char
   '((<-denotational
-- 
1.7.10.4