X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu02100-Letterlike-Symbols.el;h=1f5d5f7fd7c94c2e307678ee6e0b293e4f4dab67;hb=02c1f8afce1dd984d838b2ebd706841ca4428cf0;hp=1b71d68d4981283f05f99c78e56f70c356de10f5;hpb=e28621ac9a241b82bddf8fc6480a4df7ef8b8ab9;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/utf-2000/u02100-Letterlike-Symbols.el b/lisp/utf-2000/u02100-Letterlike-Symbols.el
index 1b71d68..1f5d5f7 100644
--- a/lisp/utf-2000/u02100-Letterlike-Symbols.el
+++ b/lisp/utf-2000/u02100-Letterlike-Symbols.el
@@ -1,488 +1,498 @@
 (define-char
   '((name		. "ACCOUNT OF")
-    (ucs		. #x2100)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	compat #x0061 #x002F #x0063)
+    (ucs		. #x2100)	; ℀
     ))
 (define-char
   '((name		. "ADDRESSED TO THE SUBJECT")
-    (ucs		. #x2101)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	compat #x0061 #x002F #x0073)
+    (ucs		. #x2101)	; ℁
     ))
 (define-char
   '((name		. "DOUBLE-STRUCK CAPITAL C")
-    (ucs		. #x2102)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0043)
+    (ucs		. #x2102)	; ℂ
     ))
 (define-char
   '((name		. "DEGREE CELSIUS")
-    (ucs		. #x2103)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	compat #x00B0 #x0043)
-    (japanese-jisx0208-1978	#x21 #x6E)	; $(@!n(B
-    (chinese-gb2312		#x21 #x66)	; $(A!f(B
-    (japanese-jisx0208		#x21 #x6E)	; $(B!n(B
-    (korean-ksc5601		#x21 #x49)	; $(C!I(B
-    (chinese-cns11643-1		#x22 #x6A)	; $(G"j(B
+    (japanese-jisx0208-1978	. #x216E)	; ø»½
+    (chinese-gb2312		. #x2166)	; ø»„‡‰
+    (japanese-jisx0208		. #x216E)	; ø»†‘•
+    (korean-ksc5601		. #x2149)	; ø»ˆš´
+    (chinese-cns11643-1		. #x226A)	; ø»‘…ƒ
+    (japanese-jisx0208-1990	. #x216E)	; ø½‰·‰
+    (chinese-big5		. #xA24A)	; øºŸ§
+    (ucs			. #x2103)	; ℃
     ))
 (define-char
   '((name		. "CENTRE LINE SYMBOL")
-    (ucs		. #x2104)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x2104)	; ℄
     ))
 (define-char
   '((name		. "CARE OF")
-    (ucs		. #x2105)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	compat #x0063 #x002F #x006F)
-    (chinese-cns11643-1 #x22 #x22)	; $(G""(B
+    (chinese-cns11643-1 . #x2222)	; ø»‘ƒ»
+    (chinese-big5	. #xA1C1)	; øºŸœŸ
+    (ucs		. #x2105)	; ℅
     ))
 (define-char
   '((name		. "CADA UNA")
-    (ucs		. #x2106)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	compat #x0063 #x002F #x0075)
+    (ucs		. #x2106)	; ℆
     ))
 (define-char
   '((name		. "EULER CONSTANT")
-    (ucs		. #x2107)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	compat #x0190)
+    (ucs		. #x2107)	; ℇ
     ))
 (define-char
   '((name		. "SCRUPLE")
-    (ucs		. #x2108)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x2108)	; ℈
     ))
 (define-char
   '((name		. "DEGREE FAHRENHEIT")
-    (ucs		. #x2109)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	compat #x00B0 #x0046)
-    (korean-ksc5601	#x22 #x35)	; $(C"5(B
-    (chinese-cns11643-1 #x22 #x6B)	; $(G"k(B
+    (korean-ksc5601	. #x2235)	; ø»ˆ›¾
+    (chinese-cns11643-1 . #x226B)	; ø»‘…„
+    (chinese-big5	. #xA24B)	; øºŸ¨
+    (ucs		. #x2109)	; ℉
     ))
 (define-char
   '((name		. "SCRIPT SMALL G")
-    (ucs		. #x210A)
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0067)
+    (ucs		. #x210A)	; ℊ
     ))
 (define-char
   '((name		. "SCRIPT CAPITAL H")
-    (ucs		. #x210B)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0048)
+    (ucs		. #x210B)	; ℋ
     ))
 (define-char
   '((name		. "BLACK-LETTER CAPITAL H")
-    (ucs		. #x210C)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0048)
+    (ucs		. #x210C)	; ℌ
     ))
 (define-char
   '((name		. "DOUBLE-STRUCK CAPITAL H")
-    (ucs		. #x210D)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0048)
+    (ucs		. #x210D)	; ℍ
     ))
 (define-char
   '((name		. "PLANCK CONSTANT")
-    (ucs		. #x210E)
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0068)
+    (ucs		. #x210E)	; ℎ
     ))
 (define-char
   '((name		. "PLANCK CONSTANT OVER TWO PI")
-    (ucs		. #x210F)
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0127)
+    (japanese-jisx0213-1	. #x235D)	; ø»¢–´
+    (ucs			. #x210F)	; ℏ
     ))
 (define-char
   '((name		. "SCRIPT CAPITAL I")
-    (ucs		. #x2110)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0049)
+    (ucs		. #x2110)	; ℐ
     ))
 (define-char
   '((name		. "BLACK-LETTER CAPITAL I")
-    (ucs		. #x2111)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0049)
+    (ucs		. #x2111)	; ℑ
     ))
 (define-char
   '((name		. "SCRIPT CAPITAL L")
-    (ucs		. #x2112)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x004C)
+    (ucs		. #x2112)	; ℒ
     ))
 (define-char
   '((name		. "SCRIPT SMALL L")
-    (ucs		. #x2113)
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x006C)
-    (korean-ksc5601	#x27 #x24)	; $(C'$(B
+    (korean-ksc5601		. #x2724)	; ø»ˆ£ƒ
+    (japanese-jisx0213-1	. #x235F)	; ø»¢–¶
+    (ucs			. #x2113)	; ℓ
     ))
 (define-char
   '((name		. "L B BAR SYMBOL")
-    (ucs		. #x2114)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x2114)	; ℔
     ))
 (define-char
   '((name		. "DOUBLE-STRUCK CAPITAL N")
-    (ucs		. #x2115)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x004E)
+    (ucs		. #x2115)	; ℕ
     ))
 (define-char
   '((name		. "NUMERO SIGN")
-    (ucs		. #x2116)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	compat #x004E #x006F)
-    (chinese-gb2312	#x21 #x6D)	; $(A!m(B
-    (korean-ksc5601	#x22 #x60)	; $(C"`(B
-    (japanese-jisx0212	#x22 #x71)	; $(D"q(B
+    (chinese-gb2312		. #x216D)	; ø»„‡
+    (korean-ksc5601		. #x2260)	; ø»ˆœ©
+    (japanese-jisx0212		. #x2271)	; ø»Š¦¾
+    (japanese-jisx0213-1	. #x2D62)	; ø»¢¥¥
+    (chinese-big5		. #xC8D2)	; øº ¼›
+    (ucs			. #x2116)	; №
     ))
 (define-char
-  '((name		. "HALFWIDTH NUMERO SIGN")
-    (->ucs		. #x2116)
+  '((name		. "halfwidth numero sign")
+    (=>ucs		. #x2116)	; №
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	narrow #x2116)
-    (cyrillic-iso8859-5 #xF0)	; -Lð-A
+    (cyrillic-iso8859-5 . #xF0)	; øº“…°
     ))
 (define-char
   '((name		. "SOUND RECORDING COPYRIGHT")
-    (ucs		. #x2117)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x2117)	; ℗
     ))
 (define-char
   '((name		. "SCRIPT CAPITAL P")
-    (ucs		. #x2118)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x2118)	; ℘
     ))
 (define-char
   '((name		. "DOUBLE-STRUCK CAPITAL P")
-    (ucs		. #x2119)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0050)
+    (ucs		. #x2119)	; ℙ
     ))
 (define-char
   '((name		. "DOUBLE-STRUCK CAPITAL Q")
-    (ucs		. #x211A)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0051)
+    (ucs		. #x211A)	; ℚ
     ))
 (define-char
   '((name		. "SCRIPT CAPITAL R")
-    (ucs		. #x211B)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0052)
+    (ucs		. #x211B)	; ℛ
     ))
 (define-char
   '((name		. "BLACK-LETTER CAPITAL R")
-    (ucs		. #x211C)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0052)
+    (ucs		. #x211C)	; ℜ
     ))
 (define-char
   '((name		. "DOUBLE-STRUCK CAPITAL R")
-    (ucs		. #x211D)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0052)
+    (ucs		. #x211D)	; ℝ
     ))
 (define-char
   '((name		. "PRESCRIPTION TAKE")
-    (ucs		. #x211E)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x211E)	; ℞
     ))
 (define-char
   '((name		. "RESPONSE")
-    (ucs		. #x211F)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x211F)	; ℟
     ))
 (define-char
   '((name		. "SERVICE MARK")
-    (ucs		. #x2120)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	super #x0053 #x004D)
+    (ucs		. #x2120)	; ℠
     ))
 (define-char
   '((name		. "TELEPHONE SIGN")
-    (ucs		. #x2121)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	compat #x0054 #x0045 #x004C)
-    (korean-ksc5601	#x22 #x65)	; $(C"e(B
+    (korean-ksc5601		. #x2265)	; ø»ˆœ®
+    (japanese-jisx0213-1	. #x2D64)	; ø»¢¥§
+    (chinese-big5		. #xC8D3)	; øº ¼œ
+    (ucs			. #x2121)	; ℡
     ))
 (define-char
   '((name		. "TRADE MARK SIGN")
-    (ucs		. #x2122)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
     (->decomposition	super #x0054 #x004D)
-    (korean-ksc5601	#x22 #x62)	; $(C"b(B
-    (japanese-jisx0212	#x22 #x6F)	; $(D"o(B
+    (korean-ksc5601	. #x2262)	; ø»ˆœ«
+    (japanese-jisx0212	. #x226F)	; ø»Š¦¼
+    (ucs		. #x2122)	; ™
     ))
 (define-char
   '((name		. "VERSICLE")
-    (ucs		. #x2123)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x2123)	; ℣
     ))
 (define-char
   '((name		. "DOUBLE-STRUCK CAPITAL Z")
-    (ucs		. #x2124)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x005A)
+    (ucs		. #x2124)	; ℤ
     ))
 (define-char
   '((name		. "OUNCE SIGN")
-    (ucs		. #x2125)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x2125)	; ℥
     ))
 (define-char
   '((name		. "OHM SIGN")
-    (ucs		. #x2126)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	#x03A9)
-    (->lowercase	#x03C9)
-    (korean-ksc5601	#x27 #x59)	; $(C'Y(B
+    (korean-ksc5601	. #x2759)	; ø»ˆ£¸
+    (ucs		. #x2126)	; Ω
     ))
 (define-char
   '((name		. "INVERTED OHM SIGN")
-    (ucs		. #x2127)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (japanese-jisx0213-1	. #x2360)	; ø»¢–·
+    (ucs			. #x2127)	; ℧
     ))
 (define-char
   '((name		. "BLACK-LETTER CAPITAL Z")
-    (ucs		. #x2128)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x005A)
+    (ucs		. #x2128)	; ℨ
     ))
 (define-char
   '((name		. "TURNED GREEK SMALL LETTER IOTA")
-    (ucs		. #x2129)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x2129)	; ℩
     ))
 (define-char
   '((name		. "KELVIN SIGN")
-    (ucs		. #x212A)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	#x004B)
-    (->lowercase	#x006B)
+    (ucs		. #x212A)	; K
     ))
 (define-char
   '((name		. "ANGSTROM SIGN")
-    (ucs		. #x212B)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	#x00C5)
-    (->lowercase	#x00E5)
-    (japanese-jisx0208	#x22 #x72)	; $(B"r(B
-    (korean-ksc5601	#x21 #x4A)	; $(C!J(B
+    (japanese-jisx0208		. #x2272)	; ø»†’·
+    (korean-ksc5601		. #x214A)	; ø»ˆšµ
+    (japanese-jisx0208-1990	. #x2272)	; ø½‰¸«
+    (ucs			. #x212B)	; Å
     ))
 (define-char
   '((name		. "SCRIPT CAPITAL B")
-    (ucs		. #x212C)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0042)
+    (ucs		. #x212C)	; ℬ
     ))
 (define-char
   '((name		. "BLACK-LETTER CAPITAL C")
-    (ucs		. #x212D)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0043)
+    (ucs		. #x212D)	; ℭ
     ))
 (define-char
   '((name		. "ESTIMATED SYMBOL")
-    (ucs		. #x212E)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ET")
     (mirrored		. nil)
+    (ucs		. #x212E)	; ℮
     ))
 (define-char
   '((name		. "SCRIPT SMALL E")
-    (ucs		. #x212F)
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0065)
+    (ucs		. #x212F)	; ℯ
     ))
 (define-char
   '((name		. "SCRIPT CAPITAL E")
-    (ucs		. #x2130)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0045)
+    (ucs		. #x2130)	; ℰ
     ))
 (define-char
   '((name		. "SCRIPT CAPITAL F")
-    (ucs		. #x2131)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0046)
+    (ucs		. #x2131)	; ℱ
     ))
 (define-char
   '((name		. "TURNED CAPITAL F")
-    (ucs		. #x2132)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x2132)	; Ⅎ
     ))
 (define-char
   '((name		. "SCRIPT CAPITAL M")
-    (ucs		. #x2133)
     (general-category	letter uppercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x004D)
+    (ucs		. #x2133)	; ℳ
     ))
 (define-char
   '((name		. "SCRIPT SMALL O")
-    (ucs		. #x2134)
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x006F)
+    (ucs		. #x2134)	; ℴ
     ))
 (define-char
   '((name		. "ALEF SYMBOL")
-    (ucs		. #x2135)
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	compat #x05D0)
+    (japanese-jisx0213-1	. #x235C)	; ø»¢–³
+    (ucs			. #x2135)	; ℵ
     ))
 (define-char
   '((name		. "BET SYMBOL")
-    (ucs		. #x2136)
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	compat #x05D1)
+    (ucs		. #x2136)	; ℶ
     ))
 (define-char
   '((name		. "GIMEL SYMBOL")
-    (ucs		. #x2137)
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	compat #x05D2)
+    (ucs		. #x2137)	; ℷ
     ))
 (define-char
   '((name		. "DALET SYMBOL")
-    (ucs		. #x2138)
     (general-category	letter other) ; Informative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	compat #x05D3)
+    (ucs		. #x2138)	; ℸ
     ))
 (define-char
   '((name		. "INFORMATION SOURCE")
-    (ucs		. #x2139)
     (general-category	letter lowercase) ; Normative Category
     (bidi-category	. "L")
     (mirrored		. nil)
     (->decomposition	font #x0069)
+    (ucs		. #x2139)	; ℹ
     ))
 (define-char
   '((name		. "ROTATED CAPITAL Q")
-    (ucs		. #x213A)
     (general-category	symbol other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
+    (ucs		. #x213A)	; ℺
     ))