From fede5cdb4710229f8dd2fd99a058b006cf5779c3 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 22 Sep 2018 20:00:46 +0900
Subject: [PATCH] (A-cgnU+7570): Changed from U+7570. (A-J0-305B): Unify
 U+7570 instead of A-IWDSU+7570 and A-UU+7570; use
 A-cgnU+7570 instead of U+7570 as its mother.
 (HNG-KHI0493-0): Use A-cgnU+7570 instead of U+7570 as its
 mother. (HNG-KHM0441-0): Likewise. (U-0002F938): Add
 representative nodes. (U+7573): Fix structure; use
 IWDS1-0083 instead of U+7530 as a component.
 (A-U+66B4-itaiji-005): New abstract node.
 (U+66B4-itaiji-005): New character; use `<-denotational'
 for A-U+66B4-itaiji-005.

---
 lisp/utf-2000/Ideograph-R102-Field.el |   88 +++++++++++++++++++++++++--------
 1 file changed, 68 insertions(+), 20 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R102-Field.el b/lisp/utf-2000/Ideograph-R102-Field.el
index c346c54..7d91466 100644
--- a/lisp/utf-2000/Ideograph-R102-Field.el
+++ b/lisp/utf-2000/Ideograph-R102-Field.el
@@ -4280,31 +4280,29 @@
     ))
 (define-char
   '((ideographic-radical . 102)	; â½¥
-    (=ucs		. #x7570)	; 異
+    (=>ucs@cognate	. #x7570)	; &A-cgnU+7570;
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x7570)	; 異
+     ((=>ucs@cognate	  . #x7570)	; &A-cgnU+7570;
       ))
     (ideographic-radical . 102)	; â½¥
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱
       )
-     ((=ucs		  . #x7530)	; 田
+     ((=>ucs@component	  . #x7530)	; &A-compU+7530;
+      (=>iwds-1		  .  0083)	; &A-compU+7530;
       )
      ((=ucs		  . #x5171)	; 共
       ))
-    (=>ucs@iwds-1	. #x7570)	; &J97-305B;
-    (=>ucs@unicode	. #x7570)	; &J97-305B;
-    (=>jis-x0208	. #x305B)	; &J97-305B; [16-59]
-    (=>jis-x0213-1	. #x305B)	; &J97-305B; [16-59]
+    (=ucs		. #x7570)	; 異
+    (=>jis-x0208	. #x305B)	; 異 [16-59]
+    (=>jis-x0213-1	. #x305B)	; 異 [16-59]
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@iwds-1	  . #x7570)	; &J97-305B;
-      (=>ucs@unicode	  . #x7570)	; &J97-305B;
-      (=>jis-x0208	  . #x305B)	; &J97-305B; [16-59]
+     ((=ucs		  . #x7570)	; 異
       ))
     (ideographic-radical . 102)	; â½¥
     (ideographic-strokes . 6)
@@ -4385,7 +4383,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x7570)	; 異
+     ((=>ucs@cognate	  . #x7570)	; &A-cgnU+7570;
       ))
     (ideographic-radical . 102)	; â½¥
     (ideographic-strokes . 7)
@@ -4402,7 +4400,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x7570)	; 異
+     ((=>ucs@cognate	  . #x7570)	; &A-cgnU+7570;
       ))
     (ideographic-radical . 102)	; â½¥
     (ideographic-strokes . 7)
@@ -4995,9 +4993,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@iwds-1	  . #x7570)	; &J97-305B;
-      (=>ucs@unicode	  . #x7570)	; &J97-305B;
-      (=>jis-x0208	  . #x305B)	; &J97-305B; [16-59]
+     ((=ucs		  . #x7570)	; 異
       ))
     (=>ucs*		. #x7570)	; 異
     (ideographic-radical . 102)	; â½¥
@@ -5018,6 +5014,24 @@
     (=gt-pj-5		. #x3429)	; &I-GT-28054; [20-09]
     (=daikanwa		. 21866)	; &I-M-21866;
     (=shinjigen		.  5055)	; 異
+    (->subsumptive
+     ((==ucs@iso	  . #x2F938)	; &g2-GT-28054;
+      (==cns11643-6	  . #x4B56)	; &g2-GT-28054; [43-54]
+      (==gt		  . 28054)	; &g2-GT-28054;
+      (==gt-k		  . 08992)	; &g2-GT-28054;
+      (==daikanwa	  . 21866)	; &g2-GT-28054;
+      (==shinjigen	  .  5055)	; &g2-GT-28054;
+      (->subsumptive
+       ((===daikanwa	    . 21866)	; &R-M-21866;
+	)
+       ((===cns11643-6	    . #x4B56)	; &R-C6-4B56; [43-54]
+	)
+       ((===gt		    . 28054)	; &R-GT-28054;
+	(===gt-k	    . 08992)	; &R-GT-28054;
+	)
+       ((===ucs@iso	    . #x2F938)	; &R-U-0002F938;
+	))
+      ))
     ))
 (define-char
   '((ideographic-radical . 102)	; â½¥
@@ -5151,10 +5165,11 @@
     (ideographic-strokes . 7)
     (total-strokes	 . 12)
     (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs		  . #x2FF0)	; â¿°
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
       )
-     ((=ucs		  . #x7530)	; 田
+     ((=>ucs@component	  . #x7530)	; &A-compU+7530;
+      (=>iwds-1		  .  0083)	; &A-compU+7530;
       )
      ((=ucs		  . #x519D)	; 冝
       ))
@@ -5168,8 +5183,8 @@
     (ideographic-strokes . 7)
     (total-strokes	 . 12)
     (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs		  . #x2FF0)	; â¿°
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
       )
      ((=ucs		  . #x7530)	; 田
       )
@@ -7029,6 +7044,39 @@
     ))
 (define-char
   '((ideographic-radical . 102)	; â½¥
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
+      (=ucs		  . #x2FF5)	; ⿵
+      )
+     ((=ucs		  . #x7570)	; 異
+      )
+     ((=ucs		  . #x6C3A)	; æ°º
+      ))
+    (=>ucs-itaiji-005	. #x66B4)	; &A-U-i005+66B4;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-005	  . #x66B4)	; &A-U-i005+66B4;
+      ))
+    (ideographic-radical . 102)	; â½¥
+    (ideographic-strokes . 11)
+    (total-strokes	 . 16)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
+      (=ucs		  . #x2FF5)	; ⿵
+      )
+     ((=ucs@unicode	  . #x7570)	; &MJ017706;
+      (=mj		  . 017706)	; &MJ017706;
+      )
+     ((=ucs		  . #x6C3A)	; æ°º
+      ))
+    (=ucs-itaiji-005	. #x66B4)	; &U-i005+66B4;
+    (->subsumptive
+     ((==ucs-itaiji-005	  . #x66B4)	; &g2-U-i005+66B4;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 102)	; â½¥
     (ideographic-strokes . 12)
     (total-strokes	 . 17)
     (=ucs		. #x7583)	; 疃
-- 
1.7.10.4