(J83-5D62): Delete S2-4040.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R083-Clan.el

diff --git a/lisp/utf-2000/Ideograph-R083-Clan.el b/lisp/utf-2000/Ideograph-R083-Clan.el
index 9a0107b..9a41160 100644 (file)
--- a/lisp/utf-2000/Ideograph-R083-Clan.el
+++ b/lisp/utf-2000/Ideograph-R083-Clan.el
@@ -3,6 +3,7 @@
   '((ideographic-radical . 83) ; ⽒
     (ideographic-strokes . 0)
     (total-strokes      . 4)
+    (shinjigen-1       . 4037)
     (shinjigen-2       . 4037)
     (=ucs              . #x6C0F)       ; 氏
     (=jis-x0208                . #x3B61)       ; &I-J90-3B61; [27-65]
@@ -50,6 +51,19 @@
     (=daikanwa         . 17028)        ; &I-M-17028;
     ))
 (define-char
+  '((<-denotational
+     ((=ucs              . #x6C11)     ; 民
+      ))
+    (name              . "CJK RADICAL CIVILIAN")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (=ucs              . #x2EA0)       ; ⺠
+    (<-identical@component
+     ((=ucs              . #x6C11)     ; 民
+      ))
+    ))
+(define-char
   '((ideographic-radical . 83) ; ⽒
     (ideographic-strokes . 2)
     (total-strokes      . 6)
@@ -65,13 +79,13 @@
     (=ucs              . #x6C13)       ; 氓
     (=big5             . #xAA5D)       ; &I-B-AA5D;
     (->subsumptive
-     ((shinjigen-2       . 4040)
-      (=jis-x0208@1978   . #x5D62)     ; &M-17030; [61-66]
+     ((=jis-x0208@1978   . #x5D62)     ; &M-17030; [61-66]
       (=jis-x0208@1983   . #x5D62)     ; &I-J83-5D62; [61-66]
       (=ks-x1001         . #x586C)     ; &I-K0-586C; [56-76]
       (=daikanwa         . 17030)      ; &I-M-17030;
       )
-     ((shinjigen-2       . 4040)
+     ((shinjigen-1       . 4040)
+      (shinjigen-2       . 4040)
       (=jis-x0208@1990   . #x5D62)     ; &J90-5D62; [61-66]
       (=ucs@jis                  . #x6C13)     ; &J90-5D62;
       )
@@ -94,7 +108,7 @@
       )
      ((=cns11643-6       . #x2C48)     ; &C6-2C48; [12-40]
       )
-     ((=ucs@iso                  . #x23C45)    ; &UU+23C45;
+     ((=ucs@iso                  . #x23C45)    ; &U-00023C45;
       ))
     ))
 (define-char
@@ -175,7 +189,7 @@
     (->subsumptive
      ((=daikanwa         . 17041)      ; &M-17041;
       )
-     ((=ucs@iso                  . #x23C51)    ; &UU+23C51;
+     ((=ucs@iso                  . #x23C51)    ; &U-00023C51;
       )
      ((=cns11643-7       . #x2F2D)     ; &C7-2F2D; [15-13]
       ))