From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 12 Dec 2015 16:06:36 +0000 (+0900)
Subject: Add glyph-images of HNG-KHI.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f7d41b7ebae8a2d9590dcc47939fe7d0a92eafcf;p=chise%2Fxemacs-chise.git

Add glyph-images of HNG-KHI.
(BUCS+8070): New abstract node.
(U+8061): Add `<-denotational' for BUCS+8070.
(HNG-KHI0148-0): New character; add `<-denotational' for BUCS+8070;
add `<-formed' for U+8061 and U+8070.
(U+806A): Use `->subsumptive'; add `<-denotational' for BUCS+8070.
(U+8070): Add `<-denotational' for BUCS+8070.
(BUCS+8072): New abstract node.
(U+8072): Add `<-denotational' for BUCS+8072.
(HNG-KHI0531-0): New character; add `<-denotational' for BUCS+8072;
add `<-formed' for U+8072.
---

diff --git a/lisp/utf-2000/Ideograph-R128-Ear.el b/lisp/utf-2000/Ideograph-R128-Ear.el
index d1b72d9..0cabadb 100644
--- a/lisp/utf-2000/Ideograph-R128-Ear.el
+++ b/lisp/utf-2000/Ideograph-R128-Ear.el
@@ -307,6 +307,8 @@
 	)
        ((===ucs@unicode	    . #x8036)	; &R-UU+8036;
 	))
+      )
+     ((===hng-khi	  . 01470)	; &HNG010-01470;
       ))
     ))
 (define-char
@@ -2037,6 +2039,8 @@
     (->subsumptive
      ((==daikanwa	  . 29104)	; &g2-M-29104;
       )
+     ((===hng-khi	  . 05300)	; &HNG010-05300;
+      )
      ((==ucs@jis	  . #x805E)	; &g2-GT-37695;
       (==jis-x0208	  . #x4A39)	; &g2-GT-37695; [42-25]
       (==jis-x0213-1	  . #x4A39)	; &g2-GT-37695; [42-25]
@@ -2174,8 +2178,23 @@
     ))
 (define-char
   '((ideographic-radical . 128)	; ⽿
+    (==>ucs@bucs	. #x8070)	; &BUCS+8070;
+    ))
+(define-char
+  '((<-denotational
+     ((==>ucs@bucs	  . #x8070)	; &BUCS+8070;
+      ))
+    (ideographic-radical . 128)	; ⽿
     (ideographic-strokes . 8)
     (total-strokes	 . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x8033)	; 耳
+      )
+     ((=ucs		  . #x5FE9)	; å¿©
+      ))
     (=ucs		. #x8061)	; 聡
     (=jis-x0208		. #x416F)	; &I-J90-416F; [33-79]
     (=cns11643-3	. #x4925)	; &I-C3-4925; [41-05]
@@ -2230,6 +2249,53 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((==>ucs@bucs	  . #x8070)	; &BUCS+8070;
+      ))
+    (ideographic-radical . 128)	; ⽿
+    (ideographic-strokes . 10)
+    (total-strokes	 . 16)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+	(=ucs		    . #x2FF9)	; ⿹
+	)
+       ((=ucs		    . #x8033)	; 耳
+	)
+       ((=ucs		    . #x4E8C)	; 二
+	))
+      )
+     ((=ucs		  . #x5FE9)	; å¿©
+      ))
+    (===hng-khi		. 01480)	; &HNG010-01480;
+    (<-formed
+     ((=ucs		  . #x8061)	; 聡
+      )
+     ((=ucs		  . #x8070)	; 聰
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((==>ucs@bucs	  . #x8070)	; &BUCS+8070;
+      ))
+    (ideographic-radical . 128)	; ⽿
+    (ideographic-strokes . 9)
+    (total-strokes	 . 15)
+    (=ucs		. #x806A)	; 聪
+    (=gb2312		. #x344F)	; &I-G0-344F; [20-47]
+    (=cns11643-3	. #x4E35)	; &I-C3-4E35; [46-21]
+    (->subsumptive
+     ((==ucs@unicode	  . #x806A)	; &g2-UU+806A;
+      (==gb2312		  . #x344F)	; &g2-UU+806A; [20-47]
+      )
+     ((==ucs@cns	  . #x806A)	; &g2-CU+806A;
+      (==cns11643-3	  . #x4E35)	; &g2-CU+806A; [46-21]
+      ))
+    ))
+(define-char
   '((ideographic-radical . 128)	; ⽿
     (ideographic-strokes . 8)
     (total-strokes	 . 14)
@@ -2644,20 +2710,6 @@
   '((ideographic-radical . 128)	; ⽿
     (ideographic-strokes . 9)
     (total-strokes	 . 15)
-    (=ucs		. #x806A)	; 聪
-    (=gb2312		. #x344F)	; &I-G0-344F; [20-47]
-    ))
-(define-char
-  '((=>ucs		. #x806A)	; 聪
-    (ideographic-radical . 128)	; ⽿
-    (ideographic-strokes . 9)
-    (total-strokes	 . 15)
-    (=cns11643-3	. #x4E35)	; &C3-4E35; [46-21]
-    ))
-(define-char
-  '((ideographic-radical . 128)	; ⽿
-    (ideographic-strokes . 9)
-    (total-strokes	 . 15)
     (=ucs		. #x806B)	; 聫
     (->subsumptive
      ((=ucs@unicode	  . #x806B)	; &UU+806B;
@@ -2948,7 +3000,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 128)	; ⽿
+  '((<-denotational
+     ((==>ucs@bucs	  . #x8070)	; &BUCS+8070;
+      ))
+    (ideographic-radical . 128)	; ⽿
     (ideographic-strokes . 11)
     (total-strokes	 . 17)
     (=ucs		. #x8070)	; 聰
@@ -3237,8 +3292,23 @@
     ))
 (define-char
   '((ideographic-radical . 128)	; ⽿
+    (==>ucs@bucs	. #x8072)	; &BUCS+8072;
+    ))
+(define-char
+  '((<-denotational
+     ((==>ucs@bucs	  . #x8072)	; &BUCS+8072;
+      ))
+    (ideographic-radical . 128)	; ⽿
     (ideographic-strokes . 11)
     (total-strokes	 . 17)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x6BB8)	; 殸
+      )
+     ((=ucs		  . #x8033)	; 耳
+      ))
     (=ucs		. #x8072)	; 聲
     (=jis-x0208		. #x6661)	; &I-J90-6661; [70-65]
     (=ks-x1001		. #x6122)	; &I-K0-6122; [65-02]
@@ -3282,6 +3352,33 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((==>ucs@bucs	  . #x8072)	; &BUCS+8072;
+      ))
+    (ideographic-radical . 128)	; ⽿
+    (ideographic-strokes . 11)
+    (total-strokes	 . 17)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+	(=ucs		    . #x2FF0)	; â¿°
+	)
+       ((=ucs		    . #x58F0)	; 声
+	)
+       ((=ucs-itaiji-001    . #x20B1B)	; &U-i001+20B1B;
+	))
+      )
+     ((=ucs		  . #x8033)	; 耳
+      ))
+    (===hng-khi		. 05310)	; &HNG010-05310;
+    (<-formed
+     ((=ucs		  . #x8072)	; 聲
+      ))
+    ))
+(define-char
   '((ideographic-radical . 128)	; ⽿
     (=ucs		. #x8073)	; 聳
     ))