From 1d369ae7c5ee97a614274f23e5e1c185786294a1 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 9 Oct 2017 22:00:51 +0900
Subject: [PATCH] (U-000215EE): New character. (IWDS1-0281): Unify
 A-IWDSU+5967 instead of A-compU+5967.

---
 lisp/utf-2000/Ideograph-R037-Big.el |   72 ++++++++++++++++++++++++++++++++---
 1 file changed, 66 insertions(+), 6 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index 4849480..18c2ac8 100644
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -1617,6 +1617,66 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs		  . #x2FF1)	; ⿱
       )
+     ((=ucs		  . #x722B)	; 爫
+      )
+     ((=ucs		  . #x5927)	; 大
+      ))
+    (=ucs		. #x215EE)	; 𡗮
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x215EE)	; 𡗮
+      ))
+    (ideographic-radical . 37)	; ⼤
+    (ideographic-strokes . 4)
+    (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((name		  . "CJK RADICAL PAW ONE")
+      (=ucs		  . #x2EA4)	; ⺤
+      )
+     ((=ucs		  . #x5927)	; 大
+      ))
+    (=ucs@iso		. #x215EE)	; &U-000215EE;
+    (->subsumptive
+     ((==ucs@iso	  . #x215EE)	; &g2-IU-000215EE;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x215EE)	; 𡗮
+      ))
+    (ideographic-radical . 37)	; ⼤
+    (ideographic-strokes . 4)
+    (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@cns		  . #x722B)	; &GT-25225;
+      (=ucs@jis		  . #x722B)	; &GT-25225;
+      (=jis-x0212	  . #x4A48)	; &GT-25225; [42-40]
+      (=cns11643-4	  . #x2151)	; &I-C4-2151; [01-49]
+      (=jis-x0213-2	  . #x702A)	; &I-JX2-702A; [80-10]
+      (=daikanwa	  . 19655)	; &I-M-19655;
+      )
+     ((=ucs		  . #x5927)	; 大
+      ))
+    (=ucs@JP/hanazono	. #x215EE)	; &hanaJU+215EE;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x215EE)	; &g2-hanaJU+215EE;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 37)	; ⼤
+    (ideographic-strokes . 4)
+    (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
      ((=ucs		  . #x4E0A)	; 上
       )
      ((=ucs		  . #x5929)	; 天
@@ -4906,13 +4966,13 @@
       )
      ((=ucs		  . #x5927)	; 大
       ))
-    (=>ucs@component	. #x5967)	; &A-compU+5967;
-    (=>iwds-1		.  0281)	; &A-compU+5967;
+    (=>ucs@iwds-1	. #x5967)	; &A-IWDSU+5967;
+    (=>iwds-1		.  0281)	; &A-IWDSU+5967;
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@component	  . #x5967)	; &A-compU+5967;
-      (=>iwds-1		  .  0281)	; &A-compU+5967;
+     ((=>ucs@iwds-1	  . #x5967)	; &A-IWDSU+5967;
+      (=>iwds-1		  .  0281)	; &A-IWDSU+5967;
       ))
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 9)
@@ -5101,8 +5161,8 @@
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@component	  . #x5967)	; &A-compU+5967;
-      (=>iwds-1		  .  0281)	; &A-compU+5967;
+     ((=>ucs@iwds-1	  . #x5967)	; &A-IWDSU+5967;
+      (=>iwds-1		  .  0281)	; &A-IWDSU+5967;
       ))
     (ideographic-radical . 37)	; ⼤
     (ideographic-strokes . 10)
-- 
1.7.10.4