Sync up with r21-4-14-chise-0_21-3.

[chise/xemacs-chise.git] / lisp / utf-2000 / u03000-CJK-Symbols-and-Punctuation.el

diff --git a/lisp/utf-2000/u03000-CJK-Symbols-and-Punctuation.el b/lisp/utf-2000/u03000-CJK-Symbols-and-Punctuation.el
index 0d53285..746ed10 100644 (file)
--- a/lisp/utf-2000/u03000-CJK-Symbols-and-Punctuation.el
+++ b/lisp/utf-2000/u03000-CJK-Symbols-and-Punctuation.el
@@ -1,555 +1,600 @@
+;; -*- coding: utf-8-mcs -*-
 (define-char
   '((name              . "IDEOGRAPHIC SPACE")
-    (ucs               . #x3000)
     (general-category  separator space) ; Normative Category
     (bidi-category     . "WS")
     (mirrored          . nil)
-    (->decomposition   wide #x0020)
-    (japanese-jisx0208-1978    #x21 #x21)      ; \e$(@!!\e(B
-    (chinese-gb2312            #x21 #x21)      ; \e$(A!!\e(B
-    (japanese-jisx0208         #x21 #x21)      ; \e$(B!!\e(B
-    (korean-ksc5601            #x21 #x21)      ; \e$(C!!\e(B
-    (chinese-cns11643-1                #x21 #x21)      ; \e$(G!!\e(B
+    (<-ideographic
+     ((name              . "SPACE")
+      (=ucs              . #x0020)     ;
+      ))
+    (=ucs              . #x3000)       ; 　
+    (=cns11643-1       . #x2121)       ; �����
+    (=ks-x1001         . #x2121)       ; �����
+    (=gb2312           . #x2121)       ; �����
+    (=jis-x0208                . #x2121)       ; �����
+    (=big5             . #xA140)       ; ������
     ))
 (define-char
   '((name              . "IDEOGRAPHIC COMMA")
-    (ucs               . #x3001)
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (japanese-jisx0208-1978    #x21 #x22)      ; \e$(@!"\e(B
-    (chinese-gb2312            #x21 #x22)      ; \e$(A!"\e(B
-    (japanese-jisx0208         #x21 #x22)      ; \e$(B!"\e(B
-    (korean-ksc5601            #x21 #x22)      ; \e$(C!"\e(B
-    (chinese-cns11643-1                #x21 #x23)      ; \e$(G!#\e(B
+    (=ucs              . #x3001)       ; 、
+    (=cns11643-1       . #x2123)       ; �����
+    (=ks-x1001         . #x2122)       ; �����
+    (=gb2312           . #x2122)       ; �����
+    (=jis-x0208                . #x2122)       ; �����
+    (=big5             . #xA142)       ; ������
     ))
 (define-char
   '((name              . "IDEOGRAPHIC FULL STOP")
-    (ucs               . #x3002)
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (japanese-jisx0208-1978    #x21 #x23)      ; \e$(@!#\e(B
-    (chinese-gb2312            #x21 #x23)      ; \e$(A!#\e(B
-    (japanese-jisx0208         #x21 #x23)      ; \e$(B!#\e(B
-    (korean-ksc5601            #x21 #x23)      ; \e$(C!#\e(B
-    (chinese-cns11643-1                #x21 #x24)      ; \e$(G!$\e(B
+    (=ucs              . #x3002)       ; 。
+    (=cns11643-1       . #x2124)       ; �����
+    (=ks-x1001         . #x2123)       ; �����
+    (=gb2312           . #x2123)       ; �����
+    (=jis-x0208                . #x2123)       ; �����
+    (=big5             . #xA143)       ; ������
     ))
 (define-char
   '((name              . "DITTO MARK")
-    (ucs               . #x3003)
     (general-category  punctuation other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (japanese-jisx0208-1978    #x21 #x37)      ; \e$(@!7\e(B
-    (chinese-gb2312            #x21 #x28)      ; \e$(A!(\e(B
-    (japanese-jisx0208         #x21 #x37)      ; \e$(B!7\e(B
-    (korean-ksc5601            #x21 #x28)      ; \e$(C!(\e(B
-    (chinese-cns11643-1                #x21 #x71)      ; \e$(G!q\e(B
+    (=ucs              . #x3003)       ; 〃
+    (=cns11643-1       . #x2171)       ; �����
+    (=ks-x1001         . #x2128)       ; �����
+    (=gb2312           . #x2128)       ; �����
+    (=jis-x0208                . #x2137)       ; �����
+    (=big5             . #xA1B2)       ; ������
     ))
 (define-char
   '((name              . "JAPANESE INDUSTRIAL STANDARD SYMBOL")
-    (ucs               . #x3004)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (=ucs              . #x3004)       ; 〄
     ))
 (define-char
   '((name              . "IDEOGRAPHIC ITERATION MARK")
-    (ucs               . #x3005)
+    (script            Ideographic symbol)
     (general-category  letter modifier) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (japanese-jisx0208-1978    #x21 #x39)      ; \e$(@!9\e(B
-    (chinese-gb2312            #x21 #x29)      ; \e$(A!)\e(B
-    (japanese-jisx0208         #x21 #x39)      ; \e$(B!9\e(B
+    (morohashi-daikanwa        97)
+    (=ucs              . #x3005)       ; 々
+    (=gb2312           . #x2129)       ; �����
+    (=jis-x0208                . #x2139)       ; �����
+    (=big5-eten                . #xC6E0)       ; ������
     ))
 (define-char
   '((name              . "IDEOGRAPHIC CLOSING MARK")
-    (ucs               . #x3006)
     (general-category  letter other) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (japanese-jisx0208-1978    #x21 #x3A)      ; \e$(@!:\e(B
-    (japanese-jisx0208         #x21 #x3A)      ; \e$(B!:\e(B
+    (=ucs              . #x3006)       ; 〆
+    (=jis-x0208                . #x213A)       ; �����
+    (=big5-eten                . #xC6E1)       ; ������
     ))
 (define-char
   '((name              . "IDEOGRAPHIC NUMBER ZERO")
-    (ucs               . #x3007)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 0)
-    (japanese-jisx0208-1978    #x21 #x3B)      ; \e$(@!;\e(B
-    (japanese-jisx0208         #x21 #x3B)      ; \e$(B!;\e(B
+    (=ucs              . #x3007)       ; 〇
+    (=jis-x0208                . #x213B)       ; �����
+    (=big5-eten                . #xC6E2)       ; ������
     ))
 (define-char
   '((name              . "LEFT ANGLE BRACKET")
-    (ucs               . #x3008)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x52)      ; \e$(@!R\e(B
-    (chinese-gb2312            #x21 #x34)      ; \e$(A!4\e(B
-    (japanese-jisx0208         #x21 #x52)      ; \e$(B!R\e(B
-    (korean-ksc5601            #x21 #x34)      ; \e$(C!4\e(B
-    (chinese-cns11643-1                #x21 #x52)      ; \e$(G!R\e(B
+    (=ucs              . #x3008)       ; 〈
+    (=cns11643-1       . #x2152)       ; �����
+    (=ks-x1001         . #x2134)       ; �����
+    (=gb2312           . #x2134)       ; �����
+    (=jis-x0208                . #x2152)       ; �����
+    (=big5             . #xA171)       ; ������
     ))
 (define-char
   '((name              . "RIGHT ANGLE BRACKET")
-    (ucs               . #x3009)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x53)      ; \e$(@!S\e(B
-    (chinese-gb2312            #x21 #x35)      ; \e$(A!5\e(B
-    (japanese-jisx0208         #x21 #x53)      ; \e$(B!S\e(B
-    (korean-ksc5601            #x21 #x35)      ; \e$(C!5\e(B
-    (chinese-cns11643-1                #x21 #x53)      ; \e$(G!S\e(B
+    (=ucs              . #x3009)       ; 〉
+    (=cns11643-1       . #x2153)       ; �����
+    (=ks-x1001         . #x2135)       ; �����
+    (=gb2312           . #x2135)       ; �����
+    (=jis-x0208                . #x2153)       ; �����
+    (=big5             . #xA172)       ; ������
     ))
 (define-char
   '((name              . "LEFT DOUBLE ANGLE BRACKET")
-    (ucs               . #x300A)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x54)      ; \e$(@!T\e(B
-    (chinese-gb2312            #x21 #x36)      ; \e$(A!6\e(B
-    (japanese-jisx0208         #x21 #x54)      ; \e$(B!T\e(B
-    (korean-ksc5601            #x21 #x36)      ; \e$(C!6\e(B
-    (chinese-cns11643-1                #x21 #x4E)      ; \e$(G!N\e(B
+    (=ucs              . #x300A)       ; 《
+    (=cns11643-1       . #x214E)       ; �����
+    (=ks-x1001         . #x2136)       ; �����
+    (=gb2312           . #x2136)       ; �����
+    (=jis-x0208                . #x2154)       ; �����
+    (=big5             . #xA16D)       ; ������
     ))
 (define-char
   '((name              . "RIGHT DOUBLE ANGLE BRACKET")
-    (ucs               . #x300B)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x55)      ; \e$(@!U\e(B
-    (chinese-gb2312            #x21 #x37)      ; \e$(A!7\e(B
-    (japanese-jisx0208         #x21 #x55)      ; \e$(B!U\e(B
-    (korean-ksc5601            #x21 #x37)      ; \e$(C!7\e(B
-    (chinese-cns11643-1                #x21 #x4F)      ; \e$(G!O\e(B
+    (=ucs              . #x300B)       ; 》
+    (=cns11643-1       . #x214F)       ; �����
+    (=ks-x1001         . #x2137)       ; �����
+    (=gb2312           . #x2137)       ; �����
+    (=jis-x0208                . #x2155)       ; �����
+    (=big5             . #xA16E)       ; ������
     ))
 (define-char
   '((name              . "LEFT CORNER BRACKET")
-    (ucs               . #x300C)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x56)      ; \e$(@!V\e(B
-    (chinese-gb2312            #x21 #x38)      ; \e$(A!8\e(B
-    (japanese-jisx0208         #x21 #x56)      ; \e$(B!V\e(B
-    (korean-ksc5601            #x21 #x38)      ; \e$(C!8\e(B
-    (chinese-cns11643-1                #x21 #x56)      ; \e$(G!V\e(B
+    (=ucs              . #x300C)       ; 「
+    (=cns11643-1       . #x2156)       ; �����
+    (=ks-x1001         . #x2138)       ; �����
+    (=gb2312           . #x2138)       ; �����
+    (=jis-x0208                . #x2156)       ; �����
+    (=big5             . #xA175)       ; ������
     ))
 (define-char
   '((name              . "RIGHT CORNER BRACKET")
-    (ucs               . #x300D)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x57)      ; \e$(@!W\e(B
-    (chinese-gb2312            #x21 #x39)      ; \e$(A!9\e(B
-    (japanese-jisx0208         #x21 #x57)      ; \e$(B!W\e(B
-    (korean-ksc5601            #x21 #x39)      ; \e$(C!9\e(B
-    (chinese-cns11643-1                #x21 #x57)      ; \e$(G!W\e(B
+    (=ucs              . #x300D)       ; 」
+    (=cns11643-1       . #x2157)       ; �����
+    (=ks-x1001         . #x2139)       ; �����
+    (=gb2312           . #x2139)       ; �����
+    (=jis-x0208                . #x2157)       ; �����
+    (=big5             . #xA176)       ; ������
     ))
 (define-char
   '((name              . "LEFT WHITE CORNER BRACKET")
-    (ucs               . #x300E)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x58)      ; \e$(@!X\e(B
-    (chinese-gb2312            #x21 #x3A)      ; \e$(A!:\e(B
-    (japanese-jisx0208         #x21 #x58)      ; \e$(B!X\e(B
-    (korean-ksc5601            #x21 #x3A)      ; \e$(C!:\e(B
-    (chinese-cns11643-1                #x21 #x5A)      ; \e$(G!Z\e(B
+    (=ucs              . #x300E)       ; 『
+    (=cns11643-1       . #x215A)       ; �����
+    (=ks-x1001         . #x213A)       ; �����
+    (=gb2312           . #x213A)       ; �����
+    (=jis-x0208                . #x2158)       ; �����
+    (=big5             . #xA179)       ; ������
     ))
 (define-char
   '((name              . "RIGHT WHITE CORNER BRACKET")
-    (ucs               . #x300F)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x59)      ; \e$(@!Y\e(B
-    (chinese-gb2312            #x21 #x3B)      ; \e$(A!;\e(B
-    (japanese-jisx0208         #x21 #x59)      ; \e$(B!Y\e(B
-    (korean-ksc5601            #x21 #x3B)      ; \e$(C!;\e(B
-    (chinese-cns11643-1                #x21 #x5B)      ; \e$(G![\e(B
+    (=ucs              . #x300F)       ; 』
+    (=cns11643-1       . #x215B)       ; �����
+    (=ks-x1001         . #x213B)       ; �����
+    (=gb2312           . #x213B)       ; �����
+    (=jis-x0208                . #x2159)       ; �����
+    (=big5             . #xA17A)       ; ������
     ))
 (define-char
   '((name              . "LEFT BLACK LENTICULAR BRACKET")
-    (ucs               . #x3010)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x5A)      ; \e$(@!Z\e(B
-    (chinese-gb2312            #x21 #x3E)      ; \e$(A!>\e(B
-    (japanese-jisx0208         #x21 #x5A)      ; \e$(B!Z\e(B
-    (korean-ksc5601            #x21 #x3C)      ; \e$(C!<\e(B
-    (chinese-cns11643-1                #x21 #x4A)      ; \e$(G!J\e(B
+    (=ucs              . #x3010)       ; 【
+    (=cns11643-1       . #x214A)       ; �����
+    (=ks-x1001         . #x213C)       ; �����
+    (=gb2312           . #x213E)       ; �����
+    (=jis-x0208                . #x215A)       ; �����
+    (=big5             . #xA169)       ; ������
     ))
 (define-char
   '((name              . "RIGHT BLACK LENTICULAR BRACKET")
-    (ucs               . #x3011)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x5B)      ; \e$(@![\e(B
-    (chinese-gb2312            #x21 #x3F)      ; \e$(A!?\e(B
-    (japanese-jisx0208         #x21 #x5B)      ; \e$(B![\e(B
-    (korean-ksc5601            #x21 #x3D)      ; \e$(C!=\e(B
-    (chinese-cns11643-1                #x21 #x4B)      ; \e$(G!K\e(B
+    (=ucs              . #x3011)       ; 】
+    (=cns11643-1       . #x214B)       ; �����
+    (=ks-x1001         . #x213D)       ; �����
+    (=gb2312           . #x213F)       ; �����
+    (=jis-x0208                . #x215B)       ; �����
+    (=big5             . #xA16A)       ; ������
     ))
 (define-char
   '((name              . "POSTAL MARK")
-    (ucs               . #x3012)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (japanese-jisx0208-1978    #x22 #x29)      ; \e$(@")\e(B
-    (japanese-jisx0208         #x22 #x29)      ; \e$(B")\e(B
-    (chinese-cns11643-1                #x22 #x65)      ; \e$(G"e\e(B
+    (=ucs              . #x3012)       ; 〒
+    (=cns11643-1       . #x2265)       ; �����
+    (=jis-x0208                . #x2229)       ; �����
+    (=big5             . #xA245)       ; ������
     ))
 (define-char
   '((name              . "GETA MARK")
-    (ucs               . #x3013)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (japanese-jisx0208-1978    #x22 #x2E)      ; \e$(@".\e(B
-    (chinese-gb2312            #x21 #x7E)      ; \e$(A!~\e(B
-    (japanese-jisx0208         #x22 #x2E)      ; \e$(B".\e(B
-    (korean-ksc5601            #x21 #x6B)      ; \e$(C!k\e(B
+    (=ucs              . #x3013)       ; 〓
+    (=ks-x1001         . #x216B)       ; �����
+    (=gb2312           . #x217E)       ; �����
+    (=jis-x0208                . #x222E)       ; �����
     ))
 (define-char
   '((name              . "LEFT TORTOISE SHELL BRACKET")
-    (ucs               . #x3014)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x4C)      ; \e$(@!L\e(B
-    (chinese-gb2312            #x21 #x32)      ; \e$(A!2\e(B
-    (japanese-jisx0208         #x21 #x4C)      ; \e$(B!L\e(B
-    (korean-ksc5601            #x21 #x32)      ; \e$(C!2\e(B
-    (chinese-cns11643-1                #x21 #x46)      ; \e$(G!F\e(B
+    (=ucs              . #x3014)       ; 〔
+    (=cns11643-1       . #x2146)       ; �����
+    (=ks-x1001         . #x2132)       ; �����
+    (=gb2312           . #x2132)       ; �����
+    (=jis-x0208                . #x214C)       ; �����
+    (=big5             . #xA165)       ; ������
     ))
 (define-char
   '((name              . "RIGHT TORTOISE SHELL BRACKET")
-    (ucs               . #x3015)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (japanese-jisx0208-1978    #x21 #x4D)      ; \e$(@!M\e(B
-    (chinese-gb2312            #x21 #x33)      ; \e$(A!3\e(B
-    (japanese-jisx0208         #x21 #x4D)      ; \e$(B!M\e(B
-    (korean-ksc5601            #x21 #x33)      ; \e$(C!3\e(B
-    (chinese-cns11643-1                #x21 #x47)      ; \e$(G!G\e(B
+    (=ucs              . #x3015)       ; 〕
+    (=cns11643-1       . #x2147)       ; �����
+    (=ks-x1001         . #x2133)       ; �����
+    (=gb2312           . #x2133)       ; �����
+    (=jis-x0208                . #x214D)       ; �����
+    (=big5             . #xA166)       ; ������
     ))
 (define-char
   '((name              . "LEFT WHITE LENTICULAR BRACKET")
-    (ucs               . #x3016)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (chinese-gb2312    #x21 #x3C)      ; \e$(A!<\e(B
+    (=ucs              . #x3016)       ; 〖
+    (=jis-x0213-1-2000 . #x225A)       ; �����
+    (=gb2312           . #x213C)       ; �����
     ))
 (define-char
   '((name              . "RIGHT WHITE LENTICULAR BRACKET")
-    (ucs               . #x3017)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
-    (chinese-gb2312    #x21 #x3D)      ; \e$(A!=\e(B
+    (=ucs              . #x3017)       ; 〗
+    (=jis-x0213-1-2000 . #x225B)       ; �����
+    (=gb2312           . #x213D)       ; �����
     ))
 (define-char
   '((name              . "LEFT WHITE TORTOISE SHELL BRACKET")
-    (ucs               . #x3018)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
+    (=ucs              . #x3018)       ; 〘
+    (=jis-x0213-1-2000 . #x2258)       ; �����
     ))
 (define-char
   '((name              . "RIGHT WHITE TORTOISE SHELL BRACKET")
-    (ucs               . #x3019)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
+    (=ucs              . #x3019)       ; 〙
+    (=jis-x0213-1-2000 . #x2259)       ; �����
     ))
 (define-char
   '((name              . "LEFT WHITE SQUARE BRACKET")
-    (ucs               . #x301A)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
+    (=ucs              . #x301A)       ; 〚
     ))
 (define-char
   '((name              . "RIGHT WHITE SQUARE BRACKET")
-    (ucs               . #x301B)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . t)
+    (=ucs              . #x301B)       ; 〛
     ))
 (define-char
   '((name              . "WAVE DASH")
-    (ucs               . #x301C)
     (general-category  punctuation dash) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (japanese-jisx0208-1978    #x21 #x41)      ; \e$(@!A\e(B
-    (japanese-jisx0208         #x21 #x41)      ; \e$(B!A\e(B
-    (chinese-cns11643-1                #x22 #x44)      ; \e$(G"D\e(B
+    (=ucs              . #x301C)       ; 〜
+    (=jis-x0208                . #x2141)       ; �����
     ))
 (define-char
   '((name              . "REVERSED DOUBLE PRIME QUOTATION MARK")
-    (ucs               . #x301D)
     (general-category  punctuation open) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x21 #x68)     ; \e$(G!h\e(B
+    (=ucs              . #x301D)       ; 〝
+    (=jis-x0213-1-2000 . #x2D60)       ; �����
+    (=cns11643-1       . #x2168)       ; �����
+    (=big5             . #xA1A9)       ; ������
     ))
 (define-char
   '((name              . "DOUBLE PRIME QUOTATION MARK")
-    (ucs               . #x301E)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
-    (chinese-cns11643-1 #x21 #x69)     ; \e$(G!i\e(B
+    (=ucs              . #x301E)       ; 〞
+    (=cns11643-1       . #x2169)       ; �����
+    (=big5             . #xA1AA)       ; ������
     ))
 (define-char
   '((name              . "LOW DOUBLE PRIME QUOTATION MARK")
-    (ucs               . #x301F)
     (general-category  punctuation close) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (=ucs              . #x301F)       ; 〟
+    (=jis-x0213-1-2000 . #x2D61)       ; �����
     ))
 (define-char
   '((name              . "POSTAL MARK FACE")
-    (ucs               . #x3020)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (=ucs              . #x3020)       ; 〠
+    (=jis-x0213-1-2000 . #x2666)       ; �����
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL ONE")
-    (ucs               . #x3021)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 1)
-    (chinese-cns11643-1 #x24 #x35)     ; \e$(G$5\e(B
+    (=ucs              . #x3021)       ; 〡
+    (=cns11643-1       . #x2435)       ; �����
+    (=big5             . #xA2C3)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL TWO")
-    (ucs               . #x3022)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 2)
-    (chinese-cns11643-1 #x24 #x36)     ; \e$(G$6\e(B
+    (=ucs              . #x3022)       ; 〢
+    (=cns11643-1       . #x2436)       ; �����
+    (=big5             . #xA2C4)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL THREE")
-    (ucs               . #x3023)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 3)
-    (chinese-cns11643-1 #x24 #x37)     ; \e$(G$7\e(B
+    (=ucs              . #x3023)       ; 〣
+    (=cns11643-1       . #x2437)       ; �����
+    (=big5             . #xA2C5)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL FOUR")
-    (ucs               . #x3024)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 4)
-    (chinese-cns11643-1 #x24 #x38)     ; \e$(G$8\e(B
+    (=ucs              . #x3024)       ; 〤
+    (=cns11643-1       . #x2438)       ; �����
+    (=big5             . #xA2C6)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL FIVE")
-    (ucs               . #x3025)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 5)
-    (chinese-cns11643-1 #x24 #x39)     ; \e$(G$9\e(B
+    (=ucs              . #x3025)       ; 〥
+    (=cns11643-1       . #x2439)       ; �����
+    (=big5             . #xA2C7)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL SIX")
-    (ucs               . #x3026)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 6)
-    (chinese-cns11643-1 #x24 #x3A)     ; \e$(G$:\e(B
+    (=ucs              . #x3026)       ; 〦
+    (=cns11643-1       . #x243A)       ; �����
+    (=big5             . #xA2C8)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL SEVEN")
-    (ucs               . #x3027)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 7)
-    (chinese-cns11643-1 #x24 #x3B)     ; \e$(G$;\e(B
+    (=ucs              . #x3027)       ; 〧
+    (=cns11643-1       . #x243B)       ; �����
+    (=big5             . #xA2C9)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL EIGHT")
-    (ucs               . #x3028)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 8)
-    (chinese-cns11643-1 #x24 #x3C)     ; \e$(G$<\e(B
+    (=ucs              . #x3028)       ; 〨
+    (=cns11643-1       . #x243C)       ; �����
+    (=big5             . #xA2CA)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL NINE")
-    (ucs               . #x3029)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 9)
-    (chinese-cns11643-1 #x24 #x3D)     ; \e$(G$=\e(B
+    (=ucs              . #x3029)       ; 〩
+    (=cns11643-1       . #x243D)       ; �����
+    (=big5             . #xA2CB)       ; ������
     ))
 (define-char
   '((name              . "IDEOGRAPHIC LEVEL TONE MARK")
-    (ucs               . #x302A)
     (general-category  mark non-spacing) ; Normative Category
     (bidi-category     . "NSM")
     (mirrored          . nil)
+    (=ucs              . #x302A)       ; 〪
     ))
 (define-char
   '((name              . "IDEOGRAPHIC RISING TONE MARK")
-    (ucs               . #x302B)
     (general-category  mark non-spacing) ; Normative Category
     (bidi-category     . "NSM")
     (mirrored          . nil)
+    (=ucs              . #x302B)       ; 〫
     ))
 (define-char
   '((name              . "IDEOGRAPHIC DEPARTING TONE MARK")
-    (ucs               . #x302C)
     (general-category  mark non-spacing) ; Normative Category
     (bidi-category     . "NSM")
     (mirrored          . nil)
+    (=ucs              . #x302C)       ; 〬
     ))
 (define-char
   '((name              . "IDEOGRAPHIC ENTERING TONE MARK")
-    (ucs               . #x302D)
     (general-category  mark non-spacing) ; Normative Category
     (bidi-category     . "NSM")
     (mirrored          . nil)
+    (=ucs              . #x302D)       ; 〭
     ))
 (define-char
   '((name              . "HANGUL SINGLE DOT TONE MARK")
-    (ucs               . #x302E)
     (general-category  mark non-spacing) ; Normative Category
     (bidi-category     . "NSM")
     (mirrored          . nil)
+    (=ucs              . #x302E)       ; 〮
     ))
 (define-char
   '((name              . "HANGUL DOUBLE DOT TONE MARK")
-    (ucs               . #x302F)
     (general-category  mark non-spacing) ; Normative Category
     (bidi-category     . "NSM")
     (mirrored          . nil)
+    (=ucs              . #x302F)       ; 〯
     ))
 (define-char
   '((name              . "WAVY DASH")
-    (ucs               . #x3030)
     (general-category  punctuation dash) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (=ucs              . #x3030)       ; 〰
     ))
 (define-char
   '((name              . "VERTICAL KANA REPEAT MARK")
-    (ucs               . #x3031)
     (general-category  letter modifier) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
+    (=ucs              . #x3031)       ; 〱
     ))
 (define-char
   '((name              . "VERTICAL KANA REPEAT WITH VOICED SOUND MARK")
-    (ucs               . #x3032)
     (general-category  letter modifier) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
+    (=ucs              . #x3032)       ; 〲
     ))
 (define-char
   '((name              . "VERTICAL KANA REPEAT MARK UPPER HALF")
-    (ucs               . #x3033)
     (general-category  letter modifier) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
+    (=ucs              . #x3033)       ; 〳
+    (=jis-x0213-1-2000 . #x2233)       ; �����
     ))
 (define-char
   '((name . "VERTICAL KANA REPEAT WITH VOICED SOUND MARK UPPER HALF")
-    (ucs               . #x3034)
     (general-category  letter modifier) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
+    (=ucs              . #x3034)       ; 〴
+    (=jis-x0213-1-2000 . #x2234)       ; �����
     ))
 (define-char
   '((name              . "VERTICAL KANA REPEAT MARK LOWER HALF")
-    (ucs               . #x3035)
     (general-category  letter modifier) ; Informative Category
     (bidi-category     . "L")
     (mirrored          . nil)
+    (=ucs              . #x3035)       ; 〵
+    (=jis-x0213-1-2000 . #x2235)       ; �����
     ))
 (define-char
   '((name              . "CIRCLED POSTAL MARK")
-    (ucs               . #x3036)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
     (->decomposition   compat #x3012)
+    (=ucs              . #x3036)       ; 〶
     ))
 (define-char
   '((name . "IDEOGRAPHIC TELEGRAPH LINE FEED SEPARATOR SYMBOL")
-    (ucs               . #x3037)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (=ucs              . #x3037)       ; 〷
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL TEN")
-    (ucs               . #x3038)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 10)
     (->decomposition   compat #x5341)
+    (=ucs              . #x3038)       ; 〸
+    (=cns11643-1       . #x243E)       ; �����
+    (=big5             . #xA2CC)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL TWENTY")
-    (ucs               . #x3039)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 20)
     (->decomposition   compat #x5344)
+    (=ucs              . #x3039)       ; 〹
+    (=cns11643-1       . #x243F)       ; �����
+    (=big5             . #xA2CD)       ; ������
     ))
 (define-char
   '((name              . "HANGZHOU NUMERAL THIRTY")
-    (ucs               . #x303A)
     (general-category  number letter) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
     (numeric-value     . 30)
     (->decomposition   compat #x5345)
+    (=ucs              . #x303A)       ; 〺
+    (=cns11643-1       . #x2440)       ; �����
+    (=big5             . #xA2CE)       ; ������
+    ))
+(define-char
+  '((name              . "VERTICAL IDEOGRAPHIC ITERATION MARK")
+    (=ucs              . #x303B)       ; 〻
+    (=jis-x0213-1-2000 . #x2236)       ; �����
+    ))
+(define-char
+  '((name              . "MASU MARK")
+    (=ucs              . #x303C)       ; 〼
+    (=jis-x0213-1-2000 . #x2237)       ; �����
+    ))
+(define-char
+  '((name              . "PART ALTERNATION MARK")
+    (=ucs              . #x303D)       ; 〽
+    (=jis-x0213-1-2000 . #x233C)       ; �����
     ))
 (define-char
   '((name              . "IDEOGRAPHIC VARIATION INDICATOR")
-    (ucs               . #x303E)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (=ucs              . #x303E)       ; 〾
     ))
 (define-char
   '((name              . "IDEOGRAPHIC HALF FILL SPACE")
-    (ucs               . #x303F)
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (=ucs              . #x303F)       ; 〿
     ))