From a33790f4298540b8bf86e9a5a934ac7321abb2b0 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 27 Jul 2017 02:49:08 +0900
Subject: [PATCH] (U+6625): Add ideographic-structure.

---
 lisp/utf-2000/Ideograph-R072-Sun.el |   29 +++++++++++++++++++++++++++--
 1 file changed, 27 insertions(+), 2 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R072-Sun.el b/lisp/utf-2000/Ideograph-R072-Sun.el
index 58a2413..a6b8b09 100644
--- a/lisp/utf-2000/Ideograph-R072-Sun.el
+++ b/lisp/utf-2000/Ideograph-R072-Sun.el
@@ -3937,10 +3937,27 @@
   '((ideographic-radical . 72)	; ⽇
     (ideographic-strokes . 5)
     (total-strokes	 . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x215D7)	; 𡗗
+      )
+     ((=ucs		  . #x65E5)	; 日
+      ))
     (=ucs		. #x6625)	; 春
     (=big5		. #xAC4B)	; &I-B-AC4B;
     (->subsumptive
-     ((=ucs@jis		  . #x6625)	; &AJ1-02399;
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=ucs@iso	    . #x215D7)	; &AJ1-17472;
+	(=adobe-japan1-5    . 17472)	; &AJ1-17472;
+	)
+       ((=ucs		    . #x65E5)	; 日
+	))
+      (=ucs@jis		  . #x6625)	; &AJ1-02399;
       (=adobe-japan1-0	  . 02399)	; &AJ1-02399;
       (=jis-x0208	  . #x3D55)	; &I-J90-3D55; [29-53]
       (=ks-x1001	  . #x7570)	; &I-K0-7570; [85-80]
@@ -3982,7 +3999,15 @@
 	  ))
 	))
       )
-     ((=ucs@unicode	  . #x6625)	; &C1-514E;
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+	(=ucs		    . #x2FF1)	; ⿱
+	)
+       ((=big5-cdp	    . #x8BE9)	; &CDP-8BE9;
+	)
+       ((=ucs		    . #x65E5)	; 日
+	))
+      (=ucs@unicode	  . #x6625)	; &C1-514E;
       (=ucs@JP/hanazono	  . nil)
       (=gb2312		  . #x343A)	; &C1-514E; [20-26]
       (=cns11643-1	  . #x514E)	; &I-C1-514E; [49-46]
-- 
1.7.10.4