Sync up with r21-4-15-chise-0_21-32.

[chise/xemacs-chise.git-] / lisp / utf-2000 / u02080-Subscripts.el

diff --git a/lisp/utf-2000/u02080-Subscripts.el b/lisp/utf-2000/u02080-Subscripts.el
index 73ba7bd..d407d64 100644 (file)
--- a/lisp/utf-2000/u02080-Subscripts.el
+++ b/lisp/utf-2000/u02080-Subscripts.el
@@ -1,4 +1,4 @@
-;; -*- coding: utf-8-mcs -*-
+;; -*- coding: utf-8-mcs-er -*-
 (define-char
   '((name              . "SUBSCRIPT ZERO")
     (general-category  number other) ; Normative Category
@@ -19,27 +19,18 @@
     (digit-value        . 1)
     (numeric-value      . 1)
     (->decomposition   sub #x0031)
-    (->fullwidth
-     ((name              . "FULLWIDTH SUBSCRIPT ONE")
-      (=ks-x1001         . #x297B)     ; �����
-      ))
     (=ucs              . #x2081)       ; ₁
     ))
 (define-char
-  '((name              . "FULLWIDTH SUBSCRIPT ONE")
-    (=>ucs             . #x2081)       ; ₁
-    (general-category  number other) ; Normative Category
-    (bidi-category     . "EN")
-    (mirrored          . nil)
-    (decimal-digit-value . 1)
-    (digit-value        . 1)
-    (numeric-value      . 1)
-    (->decomposition   wide #x2081)
+  '((<-denotational
+     ((name              . "SUBSCRIPT ONE")
+      (=ucs              . #x2081)     ; ₁
+      ))
     (<-fullwidth
      ((name              . "SUBSCRIPT ONE")
       (=ucs              . #x2081)     ; ₁
       ))
-    (=ks-x1001         . #x297B)       ; �����
+    (=ks-x1001         . #x297B)       ; &K0-297B; [09-91]
     ))
 (define-char
   '((name              . "SUBSCRIPT TWO")
@@ -50,27 +41,18 @@
     (digit-value        . 2)
     (numeric-value      . 2)
     (->decomposition   sub #x0032)
-    (->fullwidth
-     ((name              . "FULLWIDTH SUBSCRIPT TWO")
-      (=ks-x1001         . #x297C)     ; �����
-      ))
     (=ucs              . #x2082)       ; ₂
     ))
 (define-char
-  '((name              . "FULLWIDTH SUBSCRIPT TWO")
-    (=>ucs             . #x2082)       ; ₂
-    (general-category  number other) ; Normative Category
-    (bidi-category     . "EN")
-    (mirrored          . nil)
-    (decimal-digit-value . 2)
-    (digit-value        . 2)
-    (numeric-value      . 2)
-    (->decomposition   wide #x2082)
+  '((<-denotational
+     ((name              . "SUBSCRIPT TWO")
+      (=ucs              . #x2082)     ; ₂
+      ))
     (<-fullwidth
      ((name              . "SUBSCRIPT TWO")
       (=ucs              . #x2082)     ; ₂
       ))
-    (=ks-x1001         . #x297C)       ; �����
+    (=ks-x1001         . #x297C)       ; &K0-297C; [09-92]
     ))
 (define-char
   '((name              . "SUBSCRIPT THREE")
@@ -81,27 +63,18 @@
     (digit-value        . 3)
     (numeric-value      . 3)
     (->decomposition   sub #x0033)
-    (->fullwidth
-     ((name              . "FULLWIDTH SUBSCRIPT THREE")
-      (=ks-x1001         . #x297D)     ; �����
-      ))
     (=ucs              . #x2083)       ; ₃
     ))
 (define-char
-  '((name              . "FULLWIDTH SUBSCRIPT THREE")
-    (=>ucs             . #x2083)       ; ₃
-    (general-category  number other) ; Normative Category
-    (bidi-category     . "EN")
-    (mirrored          . nil)
-    (decimal-digit-value . 3)
-    (digit-value        . 3)
-    (numeric-value      . 3)
-    (->decomposition   wide #x2083)
+  '((<-denotational
+     ((name              . "SUBSCRIPT THREE")
+      (=ucs              . #x2083)     ; ₃
+      ))
     (<-fullwidth
      ((name              . "SUBSCRIPT THREE")
       (=ucs              . #x2083)     ; ₃
       ))
-    (=ks-x1001         . #x297D)       ; �����
+    (=ks-x1001         . #x297D)       ; &K0-297D; [09-93]
     ))
 (define-char
   '((name              . "SUBSCRIPT FOUR")
@@ -112,27 +85,18 @@
     (digit-value        . 4)
     (numeric-value      . 4)
     (->decomposition   sub #x0034)
-    (->fullwidth
-     ((name              . "FULLWIDTH SUBSCRIPT FOUR")
-      (=ks-x1001         . #x297E)     ; �����
-      ))
     (=ucs              . #x2084)       ; ₄
     ))
 (define-char
-  '((name              . "FULLWIDTH SUBSCRIPT FOUR")
-    (=>ucs             . #x2084)       ; ₄
-    (general-category  number other) ; Normative Category
-    (bidi-category     . "EN")
-    (mirrored          . nil)
-    (decimal-digit-value . 4)
-    (digit-value        . 4)
-    (numeric-value      . 4)
-    (->decomposition   wide #x2084)
+  '((<-denotational
+     ((name              . "SUBSCRIPT FOUR")
+      (=ucs              . #x2084)     ; ₄
+      ))
     (<-fullwidth
      ((name              . "SUBSCRIPT FOUR")
       (=ucs              . #x2084)     ; ₄
       ))
-    (=ks-x1001         . #x297E)       ; �����
+    (=ks-x1001         . #x297E)       ; &K0-297E; [09-94]
     ))
 (define-char
   '((name              . "SUBSCRIPT FIVE")