From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 9 Jun 2017 13:31:26 +0000 (+0900)
Subject: (U-000227FD): Use `->denotational' and `->subsumptive'.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6a40a07e33aef86ef7931fdce2a4cdbfa7810cf1;p=chise%2Fxemacs-chise.git.1

(U-000227FD): Use `->denotational' and `->subsumptive'.
(U+6155): Add `ideographic-structure'.
(MJ011822): Likewise; add `<-interchangeable' for CU+6F20; add
`->original' for M-11087.
(UU+6155): Add `ideographic-structure'.
(U-00022827): New character.
---

diff --git a/lisp/utf-2000/Ideograph-R061-Heart.el b/lisp/utf-2000/Ideograph-R061-Heart.el
index acd6da9..ed415cd 100644
--- a/lisp/utf-2000/Ideograph-R061-Heart.el
+++ b/lisp/utf-2000/Ideograph-R061-Heart.el
@@ -23860,29 +23860,101 @@
     (=ucs@unicode	. #x6154)	; &UU+6154;
     ))
 (define-char
-  '((=>ucs		. #x227FD)	; 𢟽
+  '((ideographic-radical . 61)	; â¼¼
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x83AB)	; 莫
+      )
+     ((=ucs		  . #x5FC3)	; 心
+      ))
+    (=ucs		. #x227FD)	; 𢟽
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x227FD)	; 𢟽
+      ))
     (ideographic-radical . 61)	; â¼¼
     (ideographic-strokes . 11)
     (total-strokes	 . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@cns		  . #x83AB)	; &C1-5C7B;
+      (=cns11643-1	  . #x5C7B)	; &C1-5C7B; [60-91]
+      (=daikanwa	  . 31078)	; &I-M-31078;
+      )
+     ((=ucs		  . #x5FC3)	; 心
+      ))
     (=daikanwa		. 11087)	; &M-11087;
+    (<-ancient
+     ((=mj		  . 011822)	; &MJ011822;
+      (=daikanwa	  . 11088)	; &I-M-11088;
+      ))
+    (<-ancient*sources
+     zihui-bu daikanwa)
+    (<-original
+     ((=mj		  . 011822)	; &MJ011822;
+      ))
+    (->subsumptive
+     ((==daikanwa	  . 11087)	; &g2-M-11087;
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	11087 0 1)
-    (ideographic-radical . 61)	; â¼¼
-    (ideographic-strokes . 10)
-    (total-strokes	 . 14)
-    (=ucs		. #x227FD)	; 𢟽
-    ))
-(define-char
-  '((=>ucs		. #x227FD)	; 𢟽
-    (morohashi-daikanwa	11087 0 2)
+  '((<-denotational
+     ((=ucs		  . #x227FD)	; 𢟽
+      ))
     (ideographic-radical . 61)	; â¼¼
     (ideographic-strokes . 11)
     (total-strokes	 . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs-var-002	  . #x83AB)	; &U-v002+83AB;
+      )
+     ((=ucs		  . #x5FC3)	; 心
+      ))
+    (=ucs@cns		. #x227FD)	; &C7-2277;
     (=cns11643-7	. #x2277)	; &C7-2277; [02-87]
+    (->subsumptive
+     ((==ucs@cns	  . #x227FD)	; &g2-CU+227FD;
+      (==cns11643-7	  . #x2277)	; &g2-CU+227FD; [02-87]
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x227FD)	; 𢟽
+      ))
+    (ideographic-radical . 61)	; â¼¼
+    (ideographic-strokes . 10)
+    (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@unicode	  . #x83AB)	; &MJ022034;
+      (=mj		  . 022034)	; &MJ022034;
+      )
+     ((=ucs		  . #x5FC3)	; 心
+      ))
+    (=ucs@iso		. #x227FD)	; &U-000227FD;
+    (->subsumptive
+     ((==ucs@iso	  . #x227FD)	; &g2-IU-000227FD;
+      ))
     ))
 (define-char
   '((ideographic-radical . 61)	; â¼¼
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x83AB)	; 莫
+      )
+     ((=ucs		  . #x38FA)	; 㣺
+      ))
     (=ucs		. #x6155)	; 慕
     (=big5		. #xBC7D)	; &I-B-BC7D;
     ))
@@ -23893,10 +23965,30 @@
     (ideographic-radical . 61)	; â¼¼
     (ideographic-strokes . 11)
     (total-strokes	 . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@cns		  . #x83AB)	; &C1-5C7B;
+      (=cns11643-1	  . #x5C7B)	; &C1-5C7B; [60-91]
+      (=daikanwa	  . 31078)	; &I-M-31078;
+      )
+     ((=ucs@jis		  . #x38FA)	; &AJ1-13852;
+      (=adobe-japan1-4	  . 13852)	; &AJ1-13852;
+      ))
     (=mj		. 011822)	; &MJ011822;
     (=cns11643-1	. #x6C67)	; &I-C1-6C67; [76-71]
     (=hanyo-denshi/ks	. 125690)	; &MJ011822;
     (=daikanwa		. 11088)	; &I-M-11088;
+    (<-interchangeable
+     ((=ucs@cns		  . #x6F20)	; &MJ015839;
+      (=mj		  . 015839)	; &MJ015839;
+      ))
+    (->original
+     ((=daikanwa	  . 11087)	; &M-11087;
+      ))
+    (->original*sources
+     daikanwa)
     (->subsumptive
      ((=decomposition@hanyo-denshi
        ((=ucs		    . #x6155)	; 慕
@@ -23936,6 +24028,16 @@
     (ideographic-radical . 61)	; â¼¼
     (ideographic-strokes . 10)
     (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@unicode	  . #x83AB)	; &MJ022034;
+      (=mj		  . 022034)	; &MJ022034;
+      )
+     ((=ucs@jis		  . #x38FA)	; &AJ1-13852;
+      (=adobe-japan1-4	  . 13852)	; &AJ1-13852;
+      ))
     (=ucs@unicode	. #x6155)	; &MJ011821;
     (=mj		. 011821)	; &MJ011821;
     (=adobe-japan1-0	. 03641)	; &I-AJ1-03641;
@@ -28172,6 +28274,40 @@
     ))
 (define-char
   '((ideographic-radical . 61)	; â¼¼
+    (ideographic-strokes . 11)
+    (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5FC4)	; 忄
+      )
+     ((=ucs		  . #x21569)	; 𡕩
+      ))
+    (=ucs		. #x22827)	; 𢠧
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x22827)	; 𢠧
+      ))
+    (ideographic-radical . 61)	; â¼¼
+    (ideographic-strokes . 11)
+    (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5FC4)	; 忄
+      )
+     ((=ucs@JP/hanazono	  . #x21569)	; &hanaJU+21569;
+      ))
+    (=ucs@iso		. #x22827)	; &U-00022827;
+    (->subsumptive
+     ((==ucs@iso	  . #x22827)	; &g2-IU-00022827;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 61)	; â¼¼
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°