(MJ003595): Add `ideographic-structure'.

[chise/xemacs-chise.git-] / 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 ec4be1d..4f37fb9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R009-Man.el
+++ b/lisp/utf-2000/Ideograph-R009-Man.el
@@ -4281,12 +4281,23 @@
   '((ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 4)
     (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x4EBB)     ; 亻
+      )
+     ((=>ucs@component   . #x58EC)     ; &A-compU+58EC;
+      (=>iwds-1                  .  0001)      ; &A-compU+58EC;
+      ))
+    (=>ucs@iwds-1      . #x4EFB)       ; &J97-4724;
     (=>jis-x0208       . #x4724)       ; &J97-4724; [39-04]
     (=>jis-x0213-1     . #x4724)       ; &J97-4724; [39-04]
     ))
 (define-char
   '((<-denotational
-     ((=>jis-x0208       . #x4724)     ; &J97-4724; [39-04]
+     ((=>ucs@iwds-1      . #x4EFB)     ; &J97-4724;
+      (=>jis-x0208       . #x4724)     ; &J97-4724; [39-04]
       ))
     (ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 4)
@@ -4414,7 +4425,8 @@
     ))
 (define-char
   '((<-denotational
-     ((=>jis-x0208       . #x4724)     ; &J97-4724; [39-04]
+     ((=>ucs@iwds-1      . #x4EFB)     ; &J97-4724;
+      (=>jis-x0208       . #x4724)     ; &J97-4724; [39-04]
       ))
     (ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 4)
@@ -4671,8 +4683,8 @@
        ((name              . "CJK RADICAL PERSON")
        (=ucs               . #x2E85)   ; ⺅
        )
-       ((==ucs@ks          . #x516C)   ; &MJ007276;
-       (=mj                . 007276)   ; &MJ007276;
+       ((==ucs@ks          . #x516C)   ; &g2-MJ007276;
+       (==mj               . 007276)   ; &g2-MJ007276;
        ))
       (==ucs@jis         . #x4F00)     ; &g2-MJ006558;
       (==mj              . 006558)     ; &g2-MJ006558;
@@ -4709,31 +4721,45 @@
       (==ucs@cns         . #x4F00)     ; &g2-CU+4F00;
       (==cns11643-2      . #x2170)     ; &g2-CU+4F00; [01-80]
       )
-     ((=decomposition@hanyo-denshi
-       ((=ucs              . #x4F00)   ; 伀
-       )
-       ((=ucs              . #xE0102)  ; 󠄂
-       ))
-      (ideographic-structure
+     ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
        (=ucs               . #x2FF0)   ; ⿰
        )
-       ((name              . "CJK RADICAL PERSON")
-       (=ucs               . #x2E85)   ; ⺅
+       ((=ucs              . #x4EBB)   ; 亻
        )
-       ((==ucs@unicode     . #x516C)   ; &g2-MJ007275;
-       (==mj               . 007275)   ; &g2-MJ007275;
+       ((=>>ucs@unicode            . #x516C)   ; &G-MJ007275;
+       (=>>adobe-japan1-0  . 01964)    ; &G-MJ007275;
        ))
-      (==ucs@unicode     . #x4F00)     ; &MJ006559;
-      (==ucs@JP/hanazono  . nil)
+      (=>>ucs@unicode    . #x4F00)     ; &MJ006559;
       (=mj               . 006559)     ; &MJ006559;
-      (==hanyo-denshi/ib  . #x2D40)    ; &MJ006559; [13-32]
+      (=>>hanyo-denshi/ib . #x2D40)    ; &MJ006559; [13-32]
       (->subsumptive
-       ((===ucs@unicode            . #x4F00)   ; &R-UU+4F00;
-       )
-       ((===hanyo-denshi/ib . #x2D40)  ; &R-HD-IB-2D40; [13-32]
-       )
-       ((===mj             . 006559)   ; &R-MJ006559;
+       ((=decomposition@hanyo-denshi
+        ((=ucs               . #x4F00) ; 伀
+         )
+        ((=ucs               . #xE0102)        ; 󠄂
+         ))
+       (ideographic-structure
+        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+         (=ucs               . #x2FF0) ; ⿰
+         )
+        ((name               . "CJK RADICAL PERSON")
+         (=ucs               . #x2E85) ; ⺅
+         )
+        ((==ucs@unicode      . #x516C) ; &g2-MJ007275;
+         (==mj               . 007275) ; &g2-MJ007275;
+         ))
+       (==ucs@unicode      . #x4F00)   ; &g2-MJ006559;
+       (==ucs@JP/hanazono  . nil)
+       (==mj               . 006559)   ; &g2-MJ006559;
+       (==hanyo-denshi/ib  . #x2D40)   ; &g2-MJ006559; [13-32]
+       (->subsumptive
+        ((===ucs@unicode     . #x4F00) ; &R-UU+4F00;
+         )
+        ((===hanyo-denshi/ib . #x2D40) ; &R-HD-IB-2D40; [13-32]
+         )
+        ((===mj              . 006559) ; &R-MJ006559;
+         ))
        ))
       ))
     ))