From 36601ff8bc27eb083a08147c8a00dc3212438a6e Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 28 Jun 2018 12:30:46 +0900
Subject: [PATCH] (A-cgnU+223A5): New abstract node. (U-000223A5): Add
 `<-denotational' for A-cgnU+223A5; add
 `ideographic-structure'. (U+223A5-var-002): New character;
 use `<-denotational' for U-000223A5. (BC-8CC4): Use
 `<-denotational' for U-000223A5 instead of `<-subsumptive'
 for A-BC-8CC4; add `<-denotational@component' for
 A-BC-8CC4. (U+223A5-var-001): Use `<-denotational' for
 A-cgnU+223A5 instead of `<-subsumptive' for A-BC-8CC4; add
 `<-denotational@component' for A-BC-8CC4. (A-BC-8CC4): Use
 `<-denotational@component' for A-cgnU+223A5 instead of
 `<-denotational' for U-000223A5.

---
 lisp/utf-2000/Ideograph-R057-Bow.el |   98 ++++++++++++++++++++++++++++++++---
 1 file changed, 92 insertions(+), 6 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R057-Bow.el b/lisp/utf-2000/Ideograph-R057-Bow.el
index 07a62a3..4421dc3 100644
--- a/lisp/utf-2000/Ideograph-R057-Bow.el
+++ b/lisp/utf-2000/Ideograph-R057-Bow.el
@@ -666,6 +666,33 @@
   '((ideographic-radical . 57)	; ⼸
     (ideographic-strokes . 2)
     (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
+      )
+     ((=>ucs@cognate	  . #x5F13)	; &A-cgnU+5F13;
+      )
+     ((=>ucs@iwds-1	  . #x4E8C)	; &A-IWDSU+4E8C;
+      (=>iwds-1		  .  0047)	; &A-IWDSU+4E8C;
+      ))
+    (=>ucs@cognate	. #x223A5)	; &A-cgnU+223A5;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x223A5)	; &A-cgnU+223A5;
+      ))
+    (ideographic-radical . 57)	; ⼸
+    (ideographic-strokes . 2)
+    (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
+      )
+     ((=ucs		  . #x5F13)	; 弓
+      )
+     ((=>ucs@iwds-1	  . #x4E8C)	; &A-IWDSU+4E8C;
+      (=>iwds-1		  .  0047)	; &A-IWDSU+4E8C;
+      ))
     (=ucs		. #x223A5)	; 𢎥
     ))
 (define-char
@@ -715,14 +742,72 @@
       )
      ((=ucs		  . #x5F13)	; 弓
       )
+     ((=gt-k		  . 00146)	; &GT-K00146;
+      ))
+    (=ucs-var-002	. #x223A5)	; &U-v002+223A5;
+    (->subsumptive
+     ((==ucs-var-002	  . #x223A5)	; &g2-U-v002+223A5;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x223A5)	; 𢎥
+      ))
+    (<-denotational@component
+     ((=>big5-cdp	  . #x8CC4)	; &A-CDP-8CC4;
+      ))
+    (ideographic-radical . 57)	; ⼸
+    (ideographic-strokes . 2)
+    (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
+      )
+     ((=ucs		  . #x5F13)	; 弓
+      )
      ((=ucs		  . #x51AB)	; 冫
       ))
-    (=>big5-cdp		. #x8CC4)	; &A-CDP-8CC4;
+    (=big5-cdp		. #x8CC4)	; &CDP-8CC4;
     (->subsumptive
-     ((=big5-cdp	  . #x8CC4)	; &CDP-8CC4;
+     ((==big5-cdp	  . #x8CC4)	; &g2-CDP-8CC4;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x223A5)	; &A-cgnU+223A5;
+      ))
+    (<-denotational@component
+     ((=>big5-cdp	  . #x8CC4)	; &A-CDP-8CC4;
+      ))
+    (ideographic-radical . 57)	; ⼸
+    (ideographic-strokes . 2)
+    (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
       )
-     ((=ucs-var-001	  . #x223A5)	; &U-v001+223A5;
+     ((=ucs-var-002	  . #x5F13)	; &U-v002+5F13;
+      )
+     ((=ucs		  . #x51AB)	; 冫
+      ))
+    (=ucs-var-001	. #x223A5)	; &U-v001+223A5;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=>ucs@cognate	  . #x223A5)	; &A-cgnU+223A5;
+      ))
+    (ideographic-radical . 57)	; ⼸
+    (ideographic-strokes . 2)
+    (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
+      )
+     ((=>ucs@cognate	  . #x5F13)	; &A-cgnU+5F13;
+      )
+     ((=ucs		  . #x51AB)	; 冫
       ))
+    (=>big5-cdp		. #x8CC4)	; &A-CDP-8CC4;
     ))
 (define-char
   '((ideographic-radical . 57)	; ⼸
@@ -6460,8 +6545,8 @@
 	)
        ((=ucs		    . #x5F13)	; 弓
 	)
-       ((=ucs@unicode	    . #x431B)	; &M-35851;
-	(=daikanwa	    . 35851)	; &M-35851;
+       ((=ucs@unicode	    . #x431B)	; &MJ003597;
+	(=mj		    . 003597)	; &MJ003597;
 	))
       (=ucs@iso		  . #x22448)	; &M-09902;
       (=daikanwa	  . 09902)	; &M-09902;
@@ -6482,7 +6567,8 @@
 	)
        ((=ucs		    . #x5F13)	; 弓
 	)
-       ((=cns11643-3	    . #x5929)	; &C3-5929; [57-09]
+       ((=ucs@cns	    . #x431B)	; &C3-5929;
+	(=cns11643-3	    . #x5929)	; &C3-5929; [57-09]
 	))
       (=ucs@cns		  . #x22448)	; &C4-663D;
       (=cns11643-4	  . #x663D)	; &C4-663D; [70-29]
-- 
1.7.10.4