(C3-2148): Use `->identical' instead of `->same' for M-01512; use

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R009-Man.el

diff --git a/lisp/utf-2000/Ideograph-R009-Man.el b/lisp/utf-2000/Ideograph-R009-Man.el
index e74a10c..0805661 100644 (file)
--- a/lisp/utf-2000/Ideograph-R009-Man.el
+++ b/lisp/utf-2000/Ideograph-R009-Man.el
@@ -565,7 +565,7 @@
   '((ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 2)
     (total-strokes      . 4)
-    (->same-ideograph
+    (->same
      ((ideographic-radical . 15)       ; ⼎
       ))
     (<-original-ideograph
@@ -758,17 +758,15 @@
     (ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 2)
     (total-strokes      . 4)
-    (->same-ideograph
-     (:sources (morohashi-daikanwa)
-      :char    ((=>ucs              . #x5167)  ; 內
-                (ideographic-radical . 11)     ; ⼊
-                (ideographic-strokes . 2)
-                (total-strokes       . 4)
-                (=daikanwa          . 01418)   ; �����
-                )
-      )
-     ((=daikanwa         . 01512)      ; �����
+    (->identical
+     ((=cns11643-6       . #x2150)     ; �����
+      (=daikanwa         . 01512)      ; �����
       ))
+    (->same
+     ((=daikanwa         . 01418)      ; �����
+      ))
+    (->same*sources
+     daikanwa)
     (=cns11643-3       . #x2148)       ; �����
     ))
 (define-char
@@ -3150,7 +3148,7 @@
        )
        ((=ucs              . #x5185)   ; 内
        ))
-      (=ucs@unicode      . #x343B)     ; 󰀃
+      (=ucs@unicode      . #x343B)     ; 󰀄
       ))
     ))
 (define-char
@@ -8912,14 +8910,14 @@
   '((ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 7)
     (total-strokes      . 9)
-    (->same-ideograph
+    (<-denotational
      ((=daikanwa         . 23937)      ; �����
       ))
     (<-original-ideograph
-     (:sources (morohashi-daikanwa)
-      :char    ((=daikanwa          . 00633)   ; �����
-                )
+     ((=daikanwa         . 00633)      ; �����
       ))
+    (<-original-ideograph*sources
+     daikanwa)
     (=daikanwa         . 00634)        ; �����
     ))
 (define-char
@@ -18358,12 +18356,15 @@
   '((ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 10)
     (total-strokes      . 12)
-    (->same-ideograph
+    (->identical
      ((=daikanwa         . 02134)      ; �����
-      )
-     (:char    ((=daikanwa          . 00768)   ; �����
-                )
-      :sources (shuowen morohashi-daikanwa)))
+      ))
+    (->same
+     ((=ucs              . #x5013)     ; 倓
+      (=daikanwa         . 00768)      ; �����
+      ))
+    (->same*sources
+     shuowen daikanwa)
     (hanyu-dazidian    1 206 1)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -20547,8 +20548,9 @@
   '((ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 10)
     (total-strokes      . 12)
-    (->same-ideograph
-     ((=daikanwa         . 23328)      ; �����
+    (->same
+     ((=cns11643-5       . #x3421)     ; �����
+      (=daikanwa         . 23328)      ; �����
       ))
     (=ucs              . #x2032A)      ; 𠌪
     ))
@@ -22025,94 +22027,87 @@
     (=hanziku-1                . #xD1C3)       ; ������
     ))
 (define-char
-  '((=>ucs             . #x50C7)       ; 僇
+  '((=>daikanwa                . 01051)        ; �����
     (ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 11)
     (total-strokes      . 13)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=ucs              . #x4EBB)     ; 亻
-      )
-     ((=jis-x0212        . #x553A)     ; �����
-      (=jis-x0213-2-2000  . #x747B)    ; �����
-      (=daikanwa         . 28665)      ; �����
-      ))
-    (shinjigen-2       . 2789)
-    (=jis-x0212                . #x3235)       ; �����
-    (=jis-x0213-2-2000 . #x2175)       ; �����
-    (=daikanwa         . 01051)        ; �����
-    (=jef-china3       . #x43AC)       ; �����
-    (=ucs@jis          . #x50C7)       ; �����
-    ))
-(define-char
-  '((morohashi-daikanwa        1051 0 1)
-    (ideographic-radical . 9)  ; ⼈
-    (ideographic-strokes . 11)
-    (total-strokes      . 13)
-    (hanyu-dazidian    1 215 8)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=ucs              . #x4EBB)     ; 亻
-      )
-     ((=ucs              . #x7FCF)     ; 翏
-      ))
-    (shinjigen-2       . 2789)
     (=ucs              . #x50C7)       ; 僇
-    (=iso-ir165                . #x2C25)       ; �����
-    (=cns11643-1       . #x6335)       ; �����
-    (=big5             . #xB6CE)       ; ������
-    ))
-(define-char
-  '((=>ucs             . #x50C8)       ; 僈
-    (ideographic-radical . 9)  ; ⼈
-    (ideographic-strokes . 11)
-    (total-strokes      . 13)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=ucs              . #x4EBB)     ; 亻
-      )
-     ((=daikanwa         . 14298)      ; �����
-      ))
-    (=daikanwa         . 01052)        ; �����
-    ))
-(define-char
-  '((=>ucs             . #x50C8)       ; 僈
-    (morohashi-daikanwa        1052 0 0)
-    (ideographic-radical . 9)  ; ⼈
-    (ideographic-strokes . 11)
-    (total-strokes      . 13)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=ucs              . #x4EBB)     ; 亻
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs              . #x4EBB)   ; 亻
+       )
+       ((=jis-x0212        . #x553A)   ; �����
+       (=jis-x0213-2-2000  . #x747B)   ; �����
+       (=daikanwa          . 28665)    ; �����
+       ))
+      (shinjigen-2       . 2789)
+      (=jis-x0212        . #x3235)     ; �����
+      (=jis-x0213-2-2000  . #x2175)    ; �����
+      (=big5             . #xB6CE)     ; ������
+      (=daikanwa         . 01051)      ; �����
+      (=jef-china3       . #x43AC)     ; �����
+      (=ucs@jis                  . #x50C7)     ; �����
+      )
+     ((hanyu-dazidian    1 215 8)
+      (ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs              . #x4EBB)   ; 亻
+       )
+       ((=ucs              . #x7FCF)   ; 翏
+       ))
+      (=iso-ir165        . #x2C25)     ; �����
+      (=ucs@unicode      . #x50C7)     ; �����
       )
-     ((=cns11643-1       . #x5937)     ; �����
+     ((hanyu-dazidian    1 215 8)
+      (ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs              . #x4EBB)   ; 亻
+       )
+       ((=cns11643-2       . #x3841)   ; �����
+       ))
+      (shinjigen-2       . 2789)
+      (=cns11643-1       . #x6335)     ; �����
+      (=ucs@cns                  . #x50C7)     ; �����
       ))
-    (=cns11643-2       . #x4160)       ; �����
     ))
 (define-char
-  '((morohashi-daikanwa        1052 0 1)
+  '((=>daikanwa                . 01052)        ; �����
     (ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 11)
     (total-strokes      . 13)
-    (hanyu-dazidian    1 211 1)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=ucs              . #x4EBB)     ; 亻
+    (=ucs              . #x50C8)       ; 僈
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs              . #x4EBB)   ; 亻
+       )
+       ((=cns11643-1       . #x5937)   ; �����
+       (=daikanwa          . 14298)    ; �����
+       ))
+      (=cns11643-2       . #x4160)     ; �����
+      (=daikanwa         . 01052)      ; �����
       )
-     ((=ucs              . #x66FC)     ; 曼
+     ((hanyu-dazidian    1 211 1)
+      (ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+       (=ucs               . #x2FF0)   ; ⿰
+       )
+       ((=ucs              . #x4EBB)   ; 亻
+       )
+       ((=ucs              . #x66FC)   ; 曼
+       ))
+      (=big5             . #xDCBB)     ; ������
+      (=ucs@unicode      . #x50C8)     ; ������
       ))
-    (=ucs              . #x50C8)       ; 僈
-    (=big5             . #xDCBB)       ; ������
     ))
 (define-char
   '((ideographic-radical . 9)  ; ⼈
@@ -22813,7 +22808,7 @@
                         :strokes       11
                         :sources       (ucs)))
     (total-strokes      . 13)
-    (->same-ideograph
+    (->same
      ((=daikanwa         . 49471)      ; �����
       ))
     (hanyu-dazidian    1 210 15)
@@ -23931,7 +23926,7 @@
        )
        ((=ucs              . #x6562)   ; 敢
        ))
-      (=ucs@unicode      . #x3488)     ; 󰀇
+      (=ucs@unicode      . #x3488)     ; 󰀈
       ))
     ))
 (define-char
@@ -25027,7 +25022,7 @@
         ((=ucs               . #x975E) ; 非
          ))
        ))
-      (=ucs@unicode      . #x348E)     ; 󰀉
+      (=ucs@unicode      . #x348E)     ; 󰀊
       ))
     ))
 (define-char
@@ -26860,7 +26855,7 @@
        )
        ((=ucs              . #x842C)   ; 萬
        ))
-      (=ucs@unicode      . #x3496)     ; 󰀊
+      (=ucs@unicode      . #x3496)     ; 󰀋
       ))
     ))
 (define-char
@@ -27343,7 +27338,7 @@
       (=cns11643-4       . #x4F5D)     ; �����
       (=ucs@cns                  . #x349A)     ; �����
       )
-     ((=ucs@unicode      . #x349A)     ; 󰀋
+     ((=ucs@unicode      . #x349A)     ; 󰀌
       ))
     ))
 (define-char
@@ -27431,7 +27426,7 @@
        )
        ((=ucs              . #x7FDF)   ; 翟
        ))
-      (=ucs@unicode      . #x349B)     ; 󰀌
+      (=ucs@unicode      . #x349B)     ; 󰀍
       )
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -30062,7 +30057,7 @@
        )
        ((=ucs              . #x7E47)   ; 繇
        ))
-      (=ucs@unicode      . #x34A1)     ; 󰀎
+      (=ucs@unicode      . #x34A1)     ; 󰀏
       ))
     ))
 (define-char
@@ -32630,20 +32625,6 @@
     ))
 (define-char
   '((ideographic-radical . 9)  ; ⼈
-    (hanyu-dazidian    1 202 11)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs              . #x2FF0)     ; ⿰
-      )
-     ((=big5-cdp         . #x8B7A)     ; ������
-      )
-     ((=ucs              . #x91CD)     ; 重
-      ))
-    (=ucs              . #x28928)      ; 𨤨
-    (=hanziku-1                . #xCFE5)       ; ������
-    ))
-(define-char
-  '((ideographic-radical . 9)  ; ⼈
     (hanyu-dazidian    1 169 10)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")