From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 8 Oct 2016 06:39:30 +0000 (+0900)
Subject: Add glyph-images of HNG-KAR.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b0cb67bc6b5c371345b25339f2395d5c12cb8cea;p=chise%2Fxemacs-chise.git-

Add glyph-images of HNG-KAR.
(A-CU+805A): New abstract node; use `<-denotational' for U+805A.
(CU+805A): Use A-CU+805A instead of U+805A as the mother.
(HNG-KAR0319-0): New character; use `<-denotational' for A-CU+805A.
---

diff --git a/lisp/utf-2000/Ideograph-R128-Ear.el b/lisp/utf-2000/Ideograph-R128-Ear.el
index c953d58..ae93687 100644
--- a/lisp/utf-2000/Ideograph-R128-Ear.el
+++ b/lisp/utf-2000/Ideograph-R128-Ear.el
@@ -20,6 +20,8 @@
       (->subsumptive
        ((===daikanwa	    . 28999)	; &R-M-28999;
 	)
+       ((===hng-kar	    . 11910)	; &HNG018-11910;
+	)
        ((===hng-khm	    . 04890)	; &HNG011-04890;
 	))
       )
@@ -1501,6 +1503,8 @@
 	)
        ((===gt		    . 37654)	; &R-GT-37654;
 	(===gt-k	    . 10230)	; &R-GT-37654;
+	)
+       ((===hng-kar	    . 11920)	; &HNG018-11920;
 	))
       )
      ((==jef-china3	  . #x60CB)	; &g2-JC3-60CB;
@@ -1828,6 +1832,14 @@
     (ideographic-radical . 128)	; ⽿
     (ideographic-strokes . 8)
     (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x53D6)	; 取
+      )
+     ((=ucs		  . #x4E51)	; 乑
+      ))
     (=ucs@unicode	. #x805A)	; &GT-37679;
     (=jis-x0208		. #x665C)	; &GT-37679; [70-60]
     (=gb2312		. #x3E5B)	; &I-G0-3E5B; [30-59]
@@ -1882,6 +1894,31 @@
     (ideographic-radical . 128)	; ⽿
     (ideographic-strokes . 8)
     (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x53D6)	; 取
+      )
+     ((=ucs		  . #x343A)	; 㐺
+      ))
+    (=>ucs@cns		. #x805A)	; &A-CU+805A;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x805A)	; 聚
+      ))
+    (ideographic-radical . 128)	; ⽿
+    (ideographic-strokes . 8)
+    (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x53D6)	; 取
+      )
+     ((=big5-cdp	  . #x8C76)	; &CDP-8C76;
+      ))
     (=ucs@cns		. #x805A)	; &C1-6A4D;
     (=cns11643-1	. #x6A4D)	; &C1-6A4D; [74-45]
     (->subsumptive
@@ -1890,6 +1927,23 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs@cns	  . #x805A)	; &A-CU+805A;
+      ))
+    (ideographic-radical . 128)	; ⽿
+    (ideographic-strokes . 8)
+    (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x53D6)	; 取
+      )
+     ((=ucs-itaiji-001	  . #x343A)	; &U-i001+343A;
+      ))
+    (===hng-kar		. 03190)	; &HNG018-03190;
+    ))
+(define-char
   '((ideographic-radical . 128)	; ⽿
     (ideographic-strokes . 8)
     (total-strokes	 . 14)
@@ -2062,6 +2116,8 @@
 	(===gt-k	    . 11171)	; &R-GT-37695;
 	)
        ((===hng-khm	    . 04920)	; &HNG011-04920;
+	)
+       ((===hng-kar	    . 11930)	; &HNG018-11930;
 	))
       )
      ((==ucs@ks		  . #x805E)	; &g2-K0-5A24;
@@ -2529,6 +2585,14 @@
   '((ideographic-radical . 128)	; ⽿
     (ideographic-strokes . 9)
     (total-strokes	 . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x8033)	; 耳
+      )
+     ((=ucs		  . #x6031)	; 怱
+      ))
     (=ucs		. #x8066)	; 聦
     (=jis-x0212		. #x5566)	; &I-JSP-5566; [53-70]
     (=cns11643-3	. #x4E36)	; &I-C3-4E36; [46-22]
@@ -2552,6 +2616,11 @@
        ((===cns11643-3	    . #x4E36)	; &R-C3-4E36; [46-22]
 	)
        ((===jef-china3	    . #x60D0)	; &R-JC3-60D0;
+	)
+       ((===hng-kar	    . 03180)	; &HNG018-03180;
+	(<-formed
+	 ((=ucs		      . #x8070)	; 聰
+	  ))
 	))
       )
      ((==ucs@unicode	  . #x8066)	; &g2-UU+8066;
@@ -3362,6 +3431,8 @@
       )
      ((==ucs@cns	  . #x8072)	; &g2-CU+8072;
       (==cns11643-1	  . #x7478)	; &g2-CU+8072; [84-88]
+      )
+     ((===hng-kar	  . 11900)	; &HNG018-11900;
       ))
     ))
 (define-char
@@ -4335,6 +4406,8 @@
     (->subsumptive
      ((==ucs@cns	  . #x807D)	; &g2-CU+807D;
       (==cns11643-1	  . #x7B6F)	; &g2-CU+807D; [91-79]
+      )
+     ((===hng-kar	  . 11940)	; &HNG018-11940;
       ))
     ))
 (define-char