From 06d7b41f7b92ac512e495952cb9a8261c81a6b93 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 13 May 2020 23:50:39 +0900
Subject: [PATCH] (A-cgnU+595A): New abstract node. (U+595A): Add
 `<-denotational' for A-cgnU+595A; apply new conventions for
 glyph granularity for components of ideographic-structure.
 (A-GT-K03560): New abstract node; use `<-denotational' for
 A-cgnU+595A. (GT-K03560): New character; use
 `<-denotational' for A-GT-K03560.

---
 lisp/utf-2000/Ideograph-R037-Big.el |   49 ++++++++++++++++++++++++++++++++++-
 1 file changed, 48 insertions(+), 1 deletion(-)

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index b78acee..09004f0 100644
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -5140,6 +5140,13 @@
     ))
 (define-char
   '((ideographic-radical . 37)	; ⼤
+    (=>ucs@cognate	. #x595A)	; &A-cgnU+595A;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x595A)	; &A-cgnU+595A;
+      ))
+    (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 7)
     (total-strokes	 . 10)
     (ideographic-structure
@@ -5148,7 +5155,8 @@
       )
      ((=>big5-cdp	  . #x8CC5)	; &A-GT-K03307;
       )
-     ((=ucs		  . #x5927)	; 大
+     ((=>ucs@component	  . #x72AC)	; &A-compU+72AC;
+      (=>iwds-1		  .  0239)	; &A-compU+72AC;
       ))
     (=ucs		. #x595A)	; 奚
     (=big5		. #xAE4F)	; &I-B-AE4F;
@@ -5242,6 +5250,45 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x595A)	; &A-cgnU+595A;
+      ))
+    (ideographic-radical . 37)	; ⼤
+    (ideographic-strokes . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=gt-k		  . 00873)	; &GT-K00873;
+      )
+     ((=>ucs@component	  . #x72AC)	; &A-compU+72AC;
+      (=>iwds-1		  .  0239)	; &A-compU+72AC;
+      ))
+    (=>gt-k		. 03560)	; &A-GT-K03560;
+    ))
+(define-char
+  '((<-denotational
+     ((=>gt-k		  . 03560)	; &A-GT-K03560;
+      ))
+    (ideographic-radical . 37)	; ⼤
+    (ideographic-strokes . 7)
+    (total-strokes	 . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=gt-k		  . 00873)	; &GT-K00873;
+      )
+     ((=ucs		  . #x5927)	; 大
+      ))
+    (=gt-k		. 03560)	; &GT-K03560;
+    (=gt-pj-k1		. #x4C4F)	; &GT-K03560; [44-47]
+    (->subsumptive
+     ((==gt-k		  . 03560)	; &g2-GT-K03560;
+      (==gt-pj-k1	  . #x4C4F)	; &g2-GT-K03560; [44-47]
+      ))
+    ))
+(define-char
   '((ideographic-radical@ucs . 28)	; ⼛
     (ideographic-strokes@ucs . 8)
     (ideographic-radical@cns . 37)	; ⼤
-- 
1.7.10.4