From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 9 Sep 2017 06:49:53 +0000 (+0900)
Subject: (U-00023DA2): Add `ideographic-structure'; add `<-same' for U+6EC2.
X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=commitdiff_plain;h=61776de62fc107818a1f273fcd344140fdea863a

(U-00023DA2): Add `ideographic-structure'; add `<-same' for U+6EC2.
---

diff --git a/lisp/utf-2000/Ideograph-R085-Water.el b/lisp/utf-2000/Ideograph-R085-Water.el
index 817962c..a580694 100644
--- a/lisp/utf-2000/Ideograph-R085-Water.el
+++ b/lisp/utf-2000/Ideograph-R085-Water.el
@@ -16259,20 +16259,63 @@
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 8)
     (total-strokes	 . 11)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x6C35)	; æ°µ
+      )
+     ((=ucs		  . #x3AC4)	; 㫄
+      ))
     (=ucs		. #x23DA2)	; 𣶢
     (=cns11643-6	. #x412F)	; &I-C6-412F; [33-15]
     (=daikanwa		. 17727)	; &I-M-17727;
+    (<-same
+     ((=ucs		  . #x6EC2)	; 滂
+      (=daikanwa	  . 18003)	; &I-M-18003;
+      ))
+    (<-same*sources
+     zihui-bu daikanwa)
     (->subsumptive
-     ((==ucs@cns	  . #x23DA2)	; &g2-M-17727;
-      (==cns11643-6	  . #x412F)	; &g2-M-17727; [33-15]
-      (==daikanwa	  . 17727)	; &g2-M-17727;
-      (->subsumptive
-       ((===daikanwa	    . 17727)	; &R-M-17727;
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs		    . #x6C35)	; æ°µ
 	)
-       ((===cns11643-6	    . #x412F)	; &R-C6-412F; [33-15]
+       ((=ucs@unicode	    . #x3AC4)	; &AJ1-20135;
+	(=adobe-japan1-5    . 20135)	; &AJ1-20135;
+	))
+      (=>>ucs@cns	  . #x23DA2)	; &G-CU+23DA2;
+      (=>>daikanwa	  . 17727)	; &G-CU+23DA2;
+      (->subsumptive
+       ((==ucs@cns	    . #x23DA2)	; &g2-M-17727;
+	(==cns11643-6	    . #x412F)	; &g2-M-17727; [33-15]
+	(==daikanwa	    . 17727)	; &g2-M-17727;
+	(->subsumptive
+	 ((===daikanwa	      . 17727)	; &R-M-17727;
+	  )
+	 ((===cns11643-6      . #x412F)	; &R-C6-412F; [33-15]
+	  ))
 	))
       )
-     ((==ucs@iso	  . #x23DA2)	; &g2-IU-00023DA2;
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs		    . #x6C35)	; æ°µ
+	)
+       ((=ucs-var-002	    . #x3AC4)	; &U-v002+3AC4;
+	))
+      (=>>ucs@iso	  . #x23DA2)	; &G-IU+23DA2;
+      (->subsumptive
+       ((==ucs@iso	    . #x23DA2)	; &g2-IU-00023DA2;
+	(->subsumptive
+	 ((===ucs@iso	      . #x23DA2)	; &R-U-00023DA2;
+	  )
+	 ((=hanziku-5	      . #xA9C1)	; &HZK05-A9C1;
+	  ))
+	))
       ))
     ))
 (define-char