X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu00020-Basic-Latin.el;h=7e218989713e427b30fe65ecabdbec13dda4b2d6;hb=915ba0cb68194b751c28247abd7f62da5f3f83e6;hp=e76fe9bc94440d9d886dabc7cb0db44dd9a3181d;hpb=713c1775c3350729ae7a9bb864015ed7136cd2d5;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/u00020-Basic-Latin.el b/lisp/utf-2000/u00020-Basic-Latin.el
index e76fe9b..7e21898 100644
--- a/lisp/utf-2000/u00020-Basic-Latin.el
+++ b/lisp/utf-2000/u00020-Basic-Latin.el
@@ -5,6 +5,8 @@
     (bidi-category	. "WS")
     (mirrored		. nil)
     (ascii		#x20)	;  
+    (ipa		#x7F)	; .0N
+    (latin-viscii	#x20)	;  
     ))
 (define-char
   '((name		. "EXCLAMATION MARK")
@@ -13,7 +15,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x21)	; !
-    (latin-jisx0201	#x21)	; !
+    (latin-jisx0201	#x21)	; (J!(B
+    (latin-viscii	#x21)	; !
     ))
 (define-char
   '((name		. "QUOTATION MARK")
@@ -22,7 +25,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x22)	; "
-    (latin-jisx0201	#x22)	; "
+    (latin-jisx0201	#x22)	; (J"(B
+    (latin-viscii	#x22)	; "
     ))
 (define-char
   '((name		. "NUMBER SIGN")
@@ -31,7 +35,8 @@
     (bidi-category	. "ET")
     (mirrored		. nil)
     (ascii		#x23)	; #
-    (latin-jisx0201	#x23)	; #
+    (latin-jisx0201	#x23)	; (J#(B
+    (latin-viscii	#x23)	; #
     ))
 (define-char
   '((name		. "DOLLAR SIGN")
@@ -40,7 +45,8 @@
     (bidi-category	. "ET")
     (mirrored		. nil)
     (ascii		#x24)	; $
-    (latin-jisx0201	#x24)	; $
+    (latin-jisx0201	#x24)	; (J$(B
+    (latin-viscii	#x24)	; $
     ))
 (define-char
   '((name		. "PERCENT SIGN")
@@ -49,7 +55,8 @@
     (bidi-category	. "ET")
     (mirrored		. nil)
     (ascii		#x25)	; %
-    (latin-jisx0201	#x25)	; %
+    (latin-jisx0201	#x25)	; (J%(B
+    (latin-viscii	#x25)	; %
     ))
 (define-char
   '((name		. "AMPERSAND")
@@ -58,7 +65,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x26)	; &
-    (latin-jisx0201	#x26)	; &
+    (latin-jisx0201	#x26)	; (J&(B
+    (latin-viscii	#x26)	; &
     ))
 (define-char
   '((name		. "APOSTROPHE")
@@ -67,7 +75,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x27)	; '
-    (latin-jisx0201	#x27)	; '
+    (latin-jisx0201	#x27)	; (J'(B
+    (latin-viscii	#x27)	; '
     ))
 (define-char
   '((name		. "LEFT PARENTHESIS")
@@ -76,7 +85,8 @@
     (bidi-category	. "ON")
     (mirrored		. t)
     (ascii		#x28)	; (
-    (latin-jisx0201	#x28)	; (
+    (latin-jisx0201	#x28)	; (J((B
+    (latin-viscii	#x28)	; (
     ))
 (define-char
   '((name		. "RIGHT PARENTHESIS")
@@ -85,7 +95,8 @@
     (bidi-category	. "ON")
     (mirrored		. t)
     (ascii		#x29)	; )
-    (latin-jisx0201	#x29)	; )
+    (latin-jisx0201	#x29)	; (J)(B
+    (latin-viscii	#x29)	; )
     ))
 (define-char
   '((name		. "ASTERISK")
@@ -94,7 +105,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x2A)	; *
-    (latin-jisx0201	#x2A)	; *
+    (latin-jisx0201	#x2A)	; (J*(B
+    (latin-viscii	#x2A)	; *
     ))
 (define-char
   '((name		. "PLUS SIGN")
@@ -103,7 +115,8 @@
     (bidi-category	. "ET")
     (mirrored		. nil)
     (ascii		#x2B)	; +
-    (latin-jisx0201	#x2B)	; +
+    (latin-jisx0201	#x2B)	; (J+(B
+    (latin-viscii	#x2B)	; +
     ))
 (define-char
   '((name		. "COMMA")
@@ -112,7 +125,8 @@
     (bidi-category	. "CS")
     (mirrored		. nil)
     (ascii		#x2C)	; ,
-    (latin-jisx0201	#x2C)	; ,
+    (latin-jisx0201	#x2C)	; (J,(B
+    (latin-viscii	#x2C)	; ,
     ))
 (define-char
   '((name		. "HYPHEN-MINUS")
@@ -121,7 +135,8 @@
     (bidi-category	. "ET")
     (mirrored		. nil)
     (ascii		#x2D)	; -
-    (latin-jisx0201	#x2D)	; -
+    (latin-jisx0201	#x2D)	; (J-(B
+    (latin-viscii	#x2D)	; -
     ))
 (define-char
   '((name		. "FULL STOP")
@@ -130,7 +145,8 @@
     (bidi-category	. "CS")
     (mirrored		. nil)
     (ascii		#x2E)	; .
-    (latin-jisx0201	#x2E)	; .
+    (latin-jisx0201	#x2E)	; (J.(B
+    (latin-viscii	#x2E)	; .
     ))
 (define-char
   '((name		. "SOLIDUS")
@@ -139,127 +155,138 @@
     (bidi-category	. "ES")
     (mirrored		. nil)
     (ascii		#x2F)	; /
-    (latin-jisx0201	#x2F)	; /
+    (latin-jisx0201	#x2F)	; (J/(B
+    (latin-viscii	#x2F)	; /
     ))
 (define-char
   '((name		. "DIGIT ZERO")
     (ucs		. #x0030)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 0)
-    (digit-value	. 0)
-    (numeric-value	. 0)
     (mirrored		. nil)
+    (decimal-digit-value . 0)
+    (digit-value	 . 0)
+    (numeric-value	 . 0)
     (ascii		#x30)	; 0
-    (latin-jisx0201	#x30)	; 0
+    (latin-jisx0201	#x30)	; (J0(B
+    (latin-viscii	#x30)	; 0
     ))
 (define-char
   '((name		. "DIGIT ONE")
     (ucs		. #x0031)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 1)
-    (digit-value	. 1)
-    (numeric-value	. 1)
     (mirrored		. nil)
+    (decimal-digit-value . 1)
+    (digit-value	 . 1)
+    (numeric-value	 . 1)
     (ascii		#x31)	; 1
-    (latin-jisx0201	#x31)	; 1
+    (latin-jisx0201	#x31)	; (J1(B
+    (latin-viscii	#x31)	; 1
     ))
 (define-char
   '((name		. "DIGIT TWO")
     (ucs		. #x0032)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 2)
-    (digit-value	. 2)
-    (numeric-value	. 2)
     (mirrored		. nil)
+    (decimal-digit-value . 2)
+    (digit-value	 . 2)
+    (numeric-value	 . 2)
     (ascii		#x32)	; 2
-    (latin-jisx0201	#x32)	; 2
+    (latin-jisx0201	#x32)	; (J2(B
+    (latin-viscii	#x32)	; 2
     ))
 (define-char
   '((name		. "DIGIT THREE")
     (ucs		. #x0033)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 3)
-    (digit-value	. 3)
-    (numeric-value	. 3)
     (mirrored		. nil)
+    (decimal-digit-value . 3)
+    (digit-value	 . 3)
+    (numeric-value	 . 3)
     (ascii		#x33)	; 3
-    (latin-jisx0201	#x33)	; 3
+    (latin-jisx0201	#x33)	; (J3(B
+    (latin-viscii	#x33)	; 3
     ))
 (define-char
   '((name		. "DIGIT FOUR")
     (ucs		. #x0034)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 4)
-    (digit-value	. 4)
-    (numeric-value	. 4)
     (mirrored		. nil)
+    (decimal-digit-value . 4)
+    (digit-value	 . 4)
+    (numeric-value	 . 4)
     (ascii		#x34)	; 4
-    (latin-jisx0201	#x34)	; 4
+    (latin-jisx0201	#x34)	; (J4(B
+    (latin-viscii	#x34)	; 4
     ))
 (define-char
   '((name		. "DIGIT FIVE")
     (ucs		. #x0035)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 5)
-    (digit-value	. 5)
-    (numeric-value	. 5)
     (mirrored		. nil)
+    (decimal-digit-value . 5)
+    (digit-value	 . 5)
+    (numeric-value	 . 5)
     (ascii		#x35)	; 5
-    (latin-jisx0201	#x35)	; 5
+    (latin-jisx0201	#x35)	; (J5(B
+    (latin-viscii	#x35)	; 5
     ))
 (define-char
   '((name		. "DIGIT SIX")
     (ucs		. #x0036)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 6)
-    (digit-value	. 6)
-    (numeric-value	. 6)
     (mirrored		. nil)
+    (decimal-digit-value . 6)
+    (digit-value	 . 6)
+    (numeric-value	 . 6)
     (ascii		#x36)	; 6
-    (latin-jisx0201	#x36)	; 6
+    (latin-jisx0201	#x36)	; (J6(B
+    (latin-viscii	#x36)	; 6
     ))
 (define-char
   '((name		. "DIGIT SEVEN")
     (ucs		. #x0037)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 7)
-    (digit-value	. 7)
-    (numeric-value	. 7)
     (mirrored		. nil)
+    (decimal-digit-value . 7)
+    (digit-value	 . 7)
+    (numeric-value	 . 7)
     (ascii		#x37)	; 7
-    (latin-jisx0201	#x37)	; 7
+    (latin-jisx0201	#x37)	; (J7(B
+    (latin-viscii	#x37)	; 7
     ))
 (define-char
   '((name		. "DIGIT EIGHT")
     (ucs		. #x0038)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 8)
-    (digit-value	. 8)
-    (numeric-value	. 8)
     (mirrored		. nil)
+    (decimal-digit-value . 8)
+    (digit-value	 . 8)
+    (numeric-value	 . 8)
     (ascii		#x38)	; 8
-    (latin-jisx0201	#x38)	; 8
+    (latin-jisx0201	#x38)	; (J8(B
+    (latin-viscii	#x38)	; 8
     ))
 (define-char
   '((name		. "DIGIT NINE")
     (ucs		. #x0039)
     (general-category	number decimal-digit) ; Normative Category
     (bidi-category	. "EN")
-    (decimal-digit-value . 9)
-    (digit-value	. 9)
-    (numeric-value	. 9)
     (mirrored		. nil)
+    (decimal-digit-value . 9)
+    (digit-value	 . 9)
+    (numeric-value	 . 9)
     (ascii		#x39)	; 9
-    (latin-jisx0201	#x39)	; 9
+    (latin-jisx0201	#x39)	; (J9(B
+    (latin-viscii	#x39)	; 9
     ))
 (define-char
   '((name		. "COLON")
@@ -268,7 +295,8 @@
     (bidi-category	. "CS")
     (mirrored		. nil)
     (ascii		#x3A)	; :
-    (latin-jisx0201	#x3A)	; :
+    (latin-jisx0201	#x3A)	; (J:(B
+    (latin-viscii	#x3A)	; :
     ))
 (define-char
   '((name		. "SEMICOLON")
@@ -277,7 +305,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x3B)	; ;
-    (latin-jisx0201	#x3B)	; ;
+    (latin-jisx0201	#x3B)	; (J;(B
+    (latin-viscii	#x3B)	; ;
     ))
 (define-char
   '((name		. "LESS-THAN SIGN")
@@ -286,7 +315,8 @@
     (bidi-category	. "ON")
     (mirrored		. t)
     (ascii		#x3C)	; <
-    (latin-jisx0201	#x3C)	; <
+    (latin-jisx0201	#x3C)	; (J<(B
+    (latin-viscii	#x3C)	; <
     ))
 (define-char
   '((name		. "EQUALS SIGN")
@@ -295,7 +325,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x3D)	; =
-    (latin-jisx0201	#x3D)	; =
+    (latin-jisx0201	#x3D)	; (J=(B
+    (latin-viscii	#x3D)	; =
     ))
 (define-char
   '((name		. "GREATER-THAN SIGN")
@@ -304,7 +335,8 @@
     (bidi-category	. "ON")
     (mirrored		. t)
     (ascii		#x3E)	; >
-    (latin-jisx0201	#x3E)	; >
+    (latin-jisx0201	#x3E)	; (J>(B
+    (latin-viscii	#x3E)	; >
     ))
 (define-char
   '((name		. "QUESTION MARK")
@@ -313,7 +345,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x3F)	; ?
-    (latin-jisx0201	#x3F)	; ?
+    (latin-jisx0201	#x3F)	; (J?(B
+    (latin-viscii	#x3F)	; ?
     ))
 (define-char
   '((name		. "COMMERCIAL AT")
@@ -322,7 +355,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x40)	; @
-    (latin-jisx0201	#x40)	; @
+    (latin-jisx0201	#x40)	; (J@(B
+    (latin-viscii	#x40)	; @
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER A")
@@ -332,7 +366,8 @@
     (mirrored		. nil)
     (->lowercase	#x0061)
     (ascii		#x41)	; A
-    (latin-jisx0201	#x41)	; A
+    (latin-jisx0201	#x41)	; (JA(B
+    (latin-viscii	#x41)	; A
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER B")
@@ -342,7 +377,8 @@
     (mirrored		. nil)
     (->lowercase	#x0062)
     (ascii		#x42)	; B
-    (latin-jisx0201	#x42)	; B
+    (latin-jisx0201	#x42)	; (JB(B
+    (latin-viscii	#x42)	; B
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER C")
@@ -352,7 +388,8 @@
     (mirrored		. nil)
     (->lowercase	#x0063)
     (ascii		#x43)	; C
-    (latin-jisx0201	#x43)	; C
+    (latin-jisx0201	#x43)	; (JC(B
+    (latin-viscii	#x43)	; C
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER D")
@@ -362,7 +399,8 @@
     (mirrored		. nil)
     (->lowercase	#x0064)
     (ascii		#x44)	; D
-    (latin-jisx0201	#x44)	; D
+    (latin-jisx0201	#x44)	; (JD(B
+    (latin-viscii	#x44)	; D
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER E")
@@ -372,7 +410,8 @@
     (mirrored		. nil)
     (->lowercase	#x0065)
     (ascii		#x45)	; E
-    (latin-jisx0201	#x45)	; E
+    (latin-jisx0201	#x45)	; (JE(B
+    (latin-viscii	#x45)	; E
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER F")
@@ -382,7 +421,8 @@
     (mirrored		. nil)
     (->lowercase	#x0066)
     (ascii		#x46)	; F
-    (latin-jisx0201	#x46)	; F
+    (latin-jisx0201	#x46)	; (JF(B
+    (latin-viscii	#x46)	; F
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER G")
@@ -392,7 +432,8 @@
     (mirrored		. nil)
     (->lowercase	#x0067)
     (ascii		#x47)	; G
-    (latin-jisx0201	#x47)	; G
+    (latin-jisx0201	#x47)	; (JG(B
+    (latin-viscii	#x47)	; G
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER H")
@@ -402,7 +443,8 @@
     (mirrored		. nil)
     (->lowercase	#x0068)
     (ascii		#x48)	; H
-    (latin-jisx0201	#x48)	; H
+    (latin-jisx0201	#x48)	; (JH(B
+    (latin-viscii	#x48)	; H
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER I")
@@ -412,7 +454,8 @@
     (mirrored		. nil)
     (->lowercase	#x0069)
     (ascii		#x49)	; I
-    (latin-jisx0201	#x49)	; I
+    (latin-jisx0201	#x49)	; (JI(B
+    (latin-viscii	#x49)	; I
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER J")
@@ -422,7 +465,8 @@
     (mirrored		. nil)
     (->lowercase	#x006A)
     (ascii		#x4A)	; J
-    (latin-jisx0201	#x4A)	; J
+    (latin-jisx0201	#x4A)	; (JJ(B
+    (latin-viscii	#x4A)	; J
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER K")
@@ -432,7 +476,8 @@
     (mirrored		. nil)
     (->lowercase	#x006B)
     (ascii		#x4B)	; K
-    (latin-jisx0201	#x4B)	; K
+    (latin-jisx0201	#x4B)	; (JK(B
+    (latin-viscii	#x4B)	; K
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER L")
@@ -442,7 +487,8 @@
     (mirrored		. nil)
     (->lowercase	#x006C)
     (ascii		#x4C)	; L
-    (latin-jisx0201	#x4C)	; L
+    (latin-jisx0201	#x4C)	; (JL(B
+    (latin-viscii	#x4C)	; L
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER M")
@@ -452,7 +498,8 @@
     (mirrored		. nil)
     (->lowercase	#x006D)
     (ascii		#x4D)	; M
-    (latin-jisx0201	#x4D)	; M
+    (latin-jisx0201	#x4D)	; (JM(B
+    (latin-viscii	#x4D)	; M
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER N")
@@ -462,7 +509,8 @@
     (mirrored		. nil)
     (->lowercase	#x006E)
     (ascii		#x4E)	; N
-    (latin-jisx0201	#x4E)	; N
+    (latin-jisx0201	#x4E)	; (JN(B
+    (latin-viscii	#x4E)	; N
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER O")
@@ -472,7 +520,8 @@
     (mirrored		. nil)
     (->lowercase	#x006F)
     (ascii		#x4F)	; O
-    (latin-jisx0201	#x4F)	; O
+    (latin-jisx0201	#x4F)	; (JO(B
+    (latin-viscii	#x4F)	; O
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER P")
@@ -482,7 +531,8 @@
     (mirrored		. nil)
     (->lowercase	#x0070)
     (ascii		#x50)	; P
-    (latin-jisx0201	#x50)	; P
+    (latin-jisx0201	#x50)	; (JP(B
+    (latin-viscii	#x50)	; P
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Q")
@@ -492,7 +542,8 @@
     (mirrored		. nil)
     (->lowercase	#x0071)
     (ascii		#x51)	; Q
-    (latin-jisx0201	#x51)	; Q
+    (latin-jisx0201	#x51)	; (JQ(B
+    (latin-viscii	#x51)	; Q
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER R")
@@ -502,7 +553,8 @@
     (mirrored		. nil)
     (->lowercase	#x0072)
     (ascii		#x52)	; R
-    (latin-jisx0201	#x52)	; R
+    (latin-jisx0201	#x52)	; (JR(B
+    (latin-viscii	#x52)	; R
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER S")
@@ -512,7 +564,8 @@
     (mirrored		. nil)
     (->lowercase	#x0073)
     (ascii		#x53)	; S
-    (latin-jisx0201	#x53)	; S
+    (latin-jisx0201	#x53)	; (JS(B
+    (latin-viscii	#x53)	; S
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER T")
@@ -522,7 +575,8 @@
     (mirrored		. nil)
     (->lowercase	#x0074)
     (ascii		#x54)	; T
-    (latin-jisx0201	#x54)	; T
+    (latin-jisx0201	#x54)	; (JT(B
+    (latin-viscii	#x54)	; T
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER U")
@@ -532,7 +586,8 @@
     (mirrored		. nil)
     (->lowercase	#x0075)
     (ascii		#x55)	; U
-    (latin-jisx0201	#x55)	; U
+    (latin-jisx0201	#x55)	; (JU(B
+    (latin-viscii	#x55)	; U
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER V")
@@ -542,7 +597,8 @@
     (mirrored		. nil)
     (->lowercase	#x0076)
     (ascii		#x56)	; V
-    (latin-jisx0201	#x56)	; V
+    (latin-jisx0201	#x56)	; (JV(B
+    (latin-viscii	#x56)	; V
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER W")
@@ -552,7 +608,8 @@
     (mirrored		. nil)
     (->lowercase	#x0077)
     (ascii		#x57)	; W
-    (latin-jisx0201	#x57)	; W
+    (latin-jisx0201	#x57)	; (JW(B
+    (latin-viscii	#x57)	; W
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER X")
@@ -562,7 +619,8 @@
     (mirrored		. nil)
     (->lowercase	#x0078)
     (ascii		#x58)	; X
-    (latin-jisx0201	#x58)	; X
+    (latin-jisx0201	#x58)	; (JX(B
+    (latin-viscii	#x58)	; X
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Y")
@@ -572,7 +630,8 @@
     (mirrored		. nil)
     (->lowercase	#x0079)
     (ascii		#x59)	; Y
-    (latin-jisx0201	#x59)	; Y
+    (latin-jisx0201	#x59)	; (JY(B
+    (latin-viscii	#x59)	; Y
     ))
 (define-char
   '((name		. "LATIN CAPITAL LETTER Z")
@@ -582,7 +641,8 @@
     (mirrored		. nil)
     (->lowercase	#x007A)
     (ascii		#x5A)	; Z
-    (latin-jisx0201	#x5A)	; Z
+    (latin-jisx0201	#x5A)	; (JZ(B
+    (latin-viscii	#x5A)	; Z
     ))
 (define-char
   '((name		. "LEFT SQUARE BRACKET")
@@ -591,7 +651,8 @@
     (bidi-category	. "ON")
     (mirrored		. t)
     (ascii		#x5B)	; [
-    (latin-jisx0201	#x5B)	; [
+    (latin-jisx0201	#x5B)	; (J[(B
+    (latin-viscii	#x5B)	; [
     ))
 (define-char
   '((name		. "REVERSE SOLIDUS")
@@ -600,6 +661,7 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x5C)	; \
+    (latin-viscii	#x5C)	; \
     ))
 (define-char
   '((name		. "RIGHT SQUARE BRACKET")
@@ -608,7 +670,8 @@
     (bidi-category	. "ON")
     (mirrored		. t)
     (ascii		#x5D)	; ]
-    (latin-jisx0201	#x5D)	; ]
+    (latin-jisx0201	#x5D)	; (J](B
+    (latin-viscii	#x5D)	; ]
     ))
 (define-char
   '((name		. "CIRCUMFLEX ACCENT")
@@ -617,7 +680,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x5E)	; ^
-    (latin-jisx0201	#x5E)	; ^
+    (latin-jisx0201	#x5E)	; (J^(B
+    (latin-viscii	#x5E)	; ^
     ))
 (define-char
   '((name		. "LOW LINE")
@@ -626,7 +690,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x5F)	; _
-    (latin-jisx0201	#x5F)	; _
+    (latin-jisx0201	#x5F)	; (J_(B
+    (latin-viscii	#x5F)	; _
     ))
 (define-char
   '((name		. "GRAVE ACCENT")
@@ -635,7 +700,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x60)	; `
-    (latin-jisx0201	#x60)	; `
+    (latin-jisx0201	#x60)	; (J`(B
+    (latin-viscii	#x60)	; `
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER A")
@@ -646,8 +712,9 @@
     (->uppercase	#x0041)
     (->titlecase	#x0041)
     (ascii		#x61)	; a
-    (latin-jisx0201	#x61)	; a
-    (ipa	#x25)	; a
+    (latin-jisx0201	#x61)	; (Ja(B
+    (ipa		#x25)	; .0N%
+    (latin-viscii	#x61)	; a
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER B")
@@ -658,8 +725,9 @@
     (->uppercase	#x0042)
     (->titlecase	#x0042)
     (ascii		#x62)	; b
-    (latin-jisx0201	#x62)	; b
-    (ipa		#x41)	; b
+    (latin-jisx0201	#x62)	; (Jb(B
+    (ipa		#x41)	; .0NA
+    (latin-viscii	#x62)	; b
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER C")
@@ -670,7 +738,8 @@
     (->uppercase	#x0043)
     (->titlecase	#x0043)
     (ascii		#x63)	; c
-    (latin-jisx0201	#x63)	; c
+    (latin-jisx0201	#x63)	; (Jc(B
+    (latin-viscii	#x63)	; c
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER D")
@@ -681,8 +750,9 @@
     (->uppercase	#x0044)
     (->titlecase	#x0044)
     (ascii		#x64)	; d
-    (latin-jisx0201	#x64)	; d
-    (ipa	#x43)	; d
+    (latin-jisx0201	#x64)	; (Jd(B
+    (ipa		#x43)	; .0NC
+    (latin-viscii	#x64)	; d
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER E")
@@ -693,8 +763,9 @@
     (->uppercase	#x0045)
     (->titlecase	#x0045)
     (ascii		#x65)	; e
-    (latin-jisx0201	#x65)	; e
-    (ipa	#x22)	; e
+    (latin-jisx0201	#x65)	; (Je(B
+    (ipa		#x22)	; .0N"
+    (latin-viscii	#x65)	; e
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER F")
@@ -705,8 +776,9 @@
     (->uppercase	#x0046)
     (->titlecase	#x0046)
     (ascii		#x66)	; f
-    (latin-jisx0201	#x66)	; f
-    (ipa	#x46)	; f
+    (latin-jisx0201	#x66)	; (Jf(B
+    (ipa		#x46)	; .0NF
+    (latin-viscii	#x66)	; f
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER G")
@@ -717,8 +789,9 @@
     (->uppercase	#x0047)
     (->titlecase	#x0047)
     (ascii		#x67)	; g
-    (latin-jisx0201	#x67)	; g
-    (ipa	#x45)	; g
+    (latin-jisx0201	#x67)	; (Jg(B
+    (ipa		#x45)	; .0NE
+    (latin-viscii	#x67)	; g
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER H")
@@ -729,8 +802,9 @@
     (->uppercase	#x0048)
     (->titlecase	#x0048)
     (ascii		#x68)	; h
-    (latin-jisx0201	#x68)	; h
-    (ipa	#x51)	; h
+    (latin-jisx0201	#x68)	; (Jh(B
+    (ipa		#x51)	; .0NQ
+    (latin-viscii	#x68)	; h
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER I")
@@ -741,8 +815,9 @@
     (->uppercase	#x0049)
     (->titlecase	#x0049)
     (ascii		#x69)	; i
-    (latin-jisx0201	#x69)	; i
-    (ipa	#x20)	; i
+    (latin-jisx0201	#x69)	; (Ji(B
+    (ipa		#x20)	; .0N 
+    (latin-viscii	#x69)	; i
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER J")
@@ -753,8 +828,9 @@
     (->uppercase	#x004A)
     (->titlecase	#x004A)
     (ascii		#x6A)	; j
-    (latin-jisx0201	#x6A)	; j
-    (ipa	#x59)	; j
+    (latin-jisx0201	#x6A)	; (Jj(B
+    (ipa		#x59)	; .0NY
+    (latin-viscii	#x6A)	; j
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER K")
@@ -765,8 +841,9 @@
     (->uppercase	#x004B)
     (->titlecase	#x004B)
     (ascii		#x6B)	; k
-    (latin-jisx0201	#x6B)	; k
-    (ipa	#x44)	; k
+    (latin-jisx0201	#x6B)	; (Jk(B
+    (ipa		#x44)	; .0ND
+    (latin-viscii	#x6B)	; k
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER L")
@@ -777,8 +854,9 @@
     (->uppercase	#x004C)
     (->titlecase	#x004C)
     (ascii		#x6C)	; l
-    (latin-jisx0201	#x6C)	; l
-    (ipa	#x5A)	; l
+    (latin-jisx0201	#x6C)	; (Jl(B
+    (ipa		#x5A)	; .0NZ
+    (latin-viscii	#x6C)	; l
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER M")
@@ -789,8 +867,9 @@
     (->uppercase	#x004D)
     (->titlecase	#x004D)
     (ascii		#x6D)	; m
-    (latin-jisx0201	#x6D)	; m
-    (ipa	#x52)	; m
+    (latin-jisx0201	#x6D)	; (Jm(B
+    (ipa		#x52)	; .0NR
+    (latin-viscii	#x6D)	; m
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER N")
@@ -801,8 +880,9 @@
     (->uppercase	#x004E)
     (->titlecase	#x004E)
     (ascii		#x6E)	; n
-    (latin-jisx0201	#x6E)	; n
-    (ipa	#x53)	; n
+    (latin-jisx0201	#x6E)	; (Jn(B
+    (ipa		#x53)	; .0NS
+    (latin-viscii	#x6E)	; n
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER O")
@@ -813,8 +893,9 @@
     (->uppercase	#x004F)
     (->titlecase	#x004F)
     (ascii		#x6F)	; o
-    (latin-jisx0201	#x6F)	; o
-    (ipa	#x36)	; o
+    (latin-jisx0201	#x6F)	; (Jo(B
+    (ipa		#x36)	; .0N6
+    (latin-viscii	#x6F)	; o
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER P")
@@ -825,8 +906,9 @@
     (->uppercase	#x0050)
     (->titlecase	#x0050)
     (ascii		#x70)	; p
-    (latin-jisx0201	#x70)	; p
-    (ipa	#x40)	; p
+    (latin-jisx0201	#x70)	; (Jp(B
+    (ipa		#x40)	; .0N@
+    (latin-viscii	#x70)	; p
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Q")
@@ -837,7 +919,8 @@
     (->uppercase	#x0051)
     (->titlecase	#x0051)
     (ascii		#x71)	; q
-    (latin-jisx0201	#x71)	; q
+    (latin-jisx0201	#x71)	; (Jq(B
+    (latin-viscii	#x71)	; q
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER R")
@@ -848,8 +931,9 @@
     (->uppercase	#x0052)
     (->titlecase	#x0052)
     (ascii		#x72)	; r
-    (latin-jisx0201	#x72)	; r
-    (ipa	#x56)	; r
+    (latin-jisx0201	#x72)	; (Jr(B
+    (ipa		#x56)	; .0NV
+    (latin-viscii	#x72)	; r
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER S")
@@ -860,8 +944,9 @@
     (->uppercase	#x0053)
     (->titlecase	#x0053)
     (ascii		#x73)	; s
-    (latin-jisx0201	#x73)	; s
-    (ipa	#x4A)	; s
+    (latin-jisx0201	#x73)	; (Js(B
+    (ipa		#x4A)	; .0NJ
+    (latin-viscii	#x73)	; s
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER T")
@@ -872,8 +957,9 @@
     (->uppercase	#x0054)
     (->titlecase	#x0054)
     (ascii		#x74)	; t
-    (latin-jisx0201	#x74)	; t
-    (ipa	#x42)	; t
+    (latin-jisx0201	#x74)	; (Jt(B
+    (ipa		#x42)	; .0NB
+    (latin-viscii	#x74)	; t
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER U")
@@ -884,8 +970,9 @@
     (->uppercase	#x0055)
     (->titlecase	#x0055)
     (ascii		#x75)	; u
-    (latin-jisx0201	#x75)	; u
-    (ipa	#x34)	; u
+    (latin-jisx0201	#x75)	; (Ju(B
+    (ipa		#x34)	; .0N4
+    (latin-viscii	#x75)	; u
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER V")
@@ -896,8 +983,9 @@
     (->uppercase	#x0056)
     (->titlecase	#x0056)
     (ascii		#x76)	; v
-    (latin-jisx0201	#x76)	; v
-    (ipa	#x47)	; v
+    (latin-jisx0201	#x76)	; (Jv(B
+    (ipa		#x47)	; .0NG
+    (latin-viscii	#x76)	; v
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER W")
@@ -908,8 +996,9 @@
     (->uppercase	#x0057)
     (->titlecase	#x0057)
     (ascii		#x77)	; w
-    (latin-jisx0201	#x77)	; w
-    (ipa		#x5E)
+    (latin-jisx0201	#x77)	; (Jw(B
+    (ipa		#x5E)	; .0N^
+    (latin-viscii	#x77)	; w
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER X")
@@ -920,8 +1009,9 @@
     (->uppercase	#x0058)
     (->titlecase	#x0058)
     (ascii		#x78)	; x
-    (latin-jisx0201	#x78)	; x
-    (ipa	#x4F)	; x
+    (latin-jisx0201	#x78)	; (Jx(B
+    (ipa		#x4F)	; .0NO
+    (latin-viscii	#x78)	; x
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Y")
@@ -932,8 +1022,9 @@
     (->uppercase	#x0059)
     (->titlecase	#x0059)
     (ascii		#x79)	; y
-    (latin-jisx0201	#x79)	; y
-    (ipa	#x2D)	; y
+    (latin-jisx0201	#x79)	; (Jy(B
+    (ipa		#x2D)	; .0N-
+    (latin-viscii	#x79)	; y
     ))
 (define-char
   '((name		. "LATIN SMALL LETTER Z")
@@ -944,8 +1035,9 @@
     (->uppercase	#x005A)
     (->titlecase	#x005A)
     (ascii		#x7A)	; z
-    (latin-jisx0201	#x7A)	; z
-    (ipa	#x4B)	; z
+    (latin-jisx0201	#x7A)	; (Jz(B
+    (ipa		#x4B)	; .0NK
+    (latin-viscii	#x7A)	; z
     ))
 (define-char
   '((name		. "LEFT CURLY BRACKET")
@@ -954,7 +1046,8 @@
     (bidi-category	. "ON")
     (mirrored		. t)
     (ascii		#x7B)	; {
-    (latin-jisx0201	#x7B)	; {
+    (latin-jisx0201	#x7B)	; (J{(B
+    (latin-viscii	#x7B)	; {
     ))
 (define-char
   '((name		. "VERTICAL LINE")
@@ -963,7 +1056,8 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x7C)	; |
-    (latin-jisx0201	#x7C)	; |
+    (latin-jisx0201	#x7C)	; (J|(B
+    (latin-viscii	#x7C)	; |
     ))
 (define-char
   '((name		. "RIGHT CURLY BRACKET")
@@ -972,7 +1066,8 @@
     (bidi-category	. "ON")
     (mirrored		. t)
     (ascii		#x7D)	; }
-    (latin-jisx0201	#x7D)	; }
+    (latin-jisx0201	#x7D)	; (J}(B
+    (latin-viscii	#x7D)	; }
     ))
 (define-char
   '((name		. "TILDE")
@@ -981,6 +1076,7 @@
     (bidi-category	. "ON")
     (mirrored		. nil)
     (ascii		#x7E)	; ~
+    (latin-viscii	#x7E)	; ~
     ))
 (define-char
   '((ucs		. #x007F)
@@ -988,4 +1084,5 @@
     (bidi-category	. "BN")
     (mirrored		. nil)
     (ascii		#x7F)
+    (latin-viscii	#x7F)
     ))