From 314793aea12cf5dbcbcd4bf5a4a49732439a2a5e Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 16 Jul 2017 15:37:34 +0900
Subject: [PATCH] (U+669C): Add `ideographic-structure'.

---
 lisp/utf-2000/Ideograph-R073-Say.el |   10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/lisp/utf-2000/Ideograph-R073-Say.el b/lisp/utf-2000/Ideograph-R073-Say.el
index f4d5ac1..bbbbb57 100644
--- a/lisp/utf-2000/Ideograph-R073-Say.el
+++ b/lisp/utf-2000/Ideograph-R073-Say.el
@@ -2100,6 +2100,15 @@
     (ideographic-radical@ucs/compat . 73)	; ⽈
     (ideographic-strokes@ucs/compat . 10)
     (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x7ADD)	; 竝
+      )
+     ((=>ucs@component	  . #x65E5)	; &A-compU+65E5;
+      (=>iwds-1		  .  0118)	; &A-compU+65E5;
+      ))
     (=ucs		. #x669C)	; 暜
     ))
 (define-char
@@ -2139,6 +2148,7 @@
       ))
     (->subsumptive
      ((==ucs@iso	  . #x2F8D5)	; &g2-M-14312;
+      (==ucs@JP/hanazono  . nil)
       (==cns11643-6	  . #x5D5B)	; &g2-M-14312; [61-59]
       (==daikanwa	  . 14312)	; &g2-M-14312;
       (->subsumptive
-- 
1.7.10.4