(U-00020020): Add `<-ancient' for U+7B95 and UU+7B95.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R005-Second.el

diff --git a/lisp/utf-2000/Ideograph-R005-Second.el b/lisp/utf-2000/Ideograph-R005-Second.el
index 516778e..dc0cf2e 100644 (file)
--- a/lisp/utf-2000/Ideograph-R005-Second.el
+++ b/lisp/utf-2000/Ideograph-R005-Second.el
@@ -370,12 +370,32 @@
 (define-char
   '((ideographic-radical . 5)  ; ⼄
     (ideographic-strokes . 0)
+    (=ucs              . #x200CA)      ; 𠃊
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x200CA)    ; 𠃊
+      ))
+    (ideographic-radical . 5)  ; ⼄
+    (ideographic-strokes . 0)
+    (total-strokes      . 2)
+    (=ucs-itaiji-001   . #x200CA)      ; &U-i001+200CA;
+    (->subsumptive
+     ((==ucs-itaiji-001          . #x200CA)    ; &g2-U-i001+200CA;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x200CA)    ; 𠃊
+      ))
+    (ideographic-radical . 5)  ; ⼄
+    (ideographic-strokes . 0)
     (total-strokes      . 1)
     (hanyu-dazidian    1 47 5)
-    (=ucs              . #x200CA)      ; 𠃊
-    (=big5-cdp         . #x8C7B)       ; &I-CDP-8C7B;
+    (=ucs@iso          . #x200CA)      ; &CDP-8C7B;
+    (=big5-cdp         . #x8C7B)       ; &CDP-8C7B;
     (=gt-k             . 00029)        ; &I-GT-K00029;
-    (=gt-pj-k1         . #x303A)       ; 𠃊 [16-26]
+    (=gt-pj-k1         . #x303A)       ; &CDP-8C7B; [16-26]
     (->subsumptive
      ((=>>ucs@iso        . #x200CA)    ; &G-CDP-8C7B;
       (=>>big5-cdp       . #x8C7B)     ; &G-CDP-8C7B;
@@ -384,6 +404,7 @@
        ((==ucs@iso         . #x200CA)  ; &g2-CDP-8C7B;
        (==big5-cdp         . #x8C7B)   ; &g2-CDP-8C7B;
        (==gt-k             . 00029)    ; &g2-CDP-8C7B;
+       (==gt-pj-k1         . #x303A)   ; &g2-CDP-8C7B; [16-26]
        (->subsumptive
         ((===big5-cdp        . #x8C7B) ; &R-CDP-8C7B;
          )
@@ -1041,8 +1062,20 @@
     (=ucs              . #x4E61)       ; 乡
     (=gb2312           . #x4F67)       ; &I-G0-4F67; [47-71]
     (=big5-cdp         . #x8C51)       ; &I-CDP-8C51;
+    (<-original@component
+     ((=ucs              . #x28668)    ; 𨙨
+      ))
     (<-simplified@CN
-     ((=gb12345                  . #x4F67)     ; 鄉 [47-71]
+     ((=ucs@unicode      . #x9109)     ; &C1-6254;
+      (=cns11643-1       . #x6254)     ; &C1-6254; [66-52]
+      (=gb12345                  . #x4F67)     ; &C1-6254; [47-71]
+      ))
+    (->subsumptive
+     ((==big5-cdp        . #x8C51)     ; &g2-CDP-8C51;
+      )
+     ((==ucs@unicode     . #x4E61)     ; &g2-UU+4E61;
+      (==ucs@JP/hanazono  . nil)
+      (==gb2312                  . #x4F67)     ; &g2-UU+4E61; [47-71]
       ))
     ))
 (define-char
@@ -1092,6 +1125,14 @@
     (ideographic-radical . 5)  ; ⼄
     (ideographic-strokes . 2)
     (total-strokes      . 3)
+    (ideographic-structure@apparent
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
+      (=ucs              . #x2FFA)     ; ⿺
+      )
+     ((=ucs@iso                  . #x200CA)    ; &CDP-8C7B;
+      )
+     ((=ucs              . #x4E8C)     ; 二
+      ))
     (=koseki           . 002080)       ; &KOSEKI-002080;
     (=ucs-itaiji-001   . #x2CF16)      ; &KOSEKI-002080;
     (<-formed
@@ -1100,7 +1141,7 @@
     (<-formed*sources
      koseki)
     (<-formed@koseki
-     ((=ucs@iso                  . #x2CF16)    ; &MJ056865;
+     ((=ucs@JP/hanazono          . #x2CF16)    ; &MJ056865;
       (=mj               . 056865)     ; &MJ056865;
       ))
     (->subsumptive
@@ -1131,7 +1172,7 @@
     (ideographic-radical . 5)  ; ⼄
     (ideographic-strokes . 2)
     (total-strokes      . 3)
-    (=ucs@iso          . #x2CF16)      ; &MJ056865;
+    (=ucs@JP/hanazono  . #x2CF16)      ; &MJ056865;
     (=mj               . 056865)       ; &MJ056865;
     (<-formed
      ((=mj               . 006462)     ; &MJ006462;
@@ -1141,14 +1182,15 @@
     (<-formed@component
      ((=ucs              . #x722A)     ; 爪
       ))
+    (<-formed@sideways
+     ((=ucs              . #x722A)     ; 爪
+      ))
     (->subsumptive
-     ((==ucs@iso         . #x2CF16)    ; &g2-MJ056865;
+     ((==ucs@JP/hanazono  . #x2CF16)   ; &g2-MJ056865;
       (==mj              . 056865)     ; &g2-MJ056865;
       (->subsumptive
        ((===mj             . 056865)   ; &R-MJ056865;
        )
-       ((===ucs@iso        . #x2CF16)  ; &R-U-0002CF16;
-       )
        ((===hng-nkk        . 03300)    ; &HNG039-03300;
        ))
       ))
@@ -2502,6 +2544,22 @@
     ))
 (define-char
   '((ideographic-radical . 5)  ; ⼄
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs              . #x2FF9)     ; ⿹
+      )
+     ((name              . "CJK RADICAL SECOND THREE")
+      (=ucs              . #x2E84)     ; ⺄
+      )
+     ((=>ucs@iwds-1      . #x51FA)     ; &A-IWDSU+51FA;
+      ))
+    (=ucs              . #x200E8)      ; 𠃨
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x200E8)    ; 𠃨
+      ))
+    (ideographic-radical . 5)  ; ⼄
     (ideographic-strokes . 5)
     (total-strokes      . 6)
     (hanyu-dazidian    1 53 11)
@@ -2514,8 +2572,48 @@
       )
      ((=big5-cdp         . #x88C6)     ; &CDP-88C6;
       ))
-    (=ucs              . #x200E8)      ; 𠃨
-    (=hanziku-1                . #xAEEA)       ; &I-HZK01-AEEA;
+    (=ucs@iso          . #x200E8)      ; &U-000200E8;
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+       (=ucs               . #x2FF9)   ; ⿹
+       )
+       ((name              . "CJK RADICAL SECOND THREE")
+       (=ucs               . #x2E84)   ; ⺄
+       )
+       ((=big5-cdp-var-001  . #x88C6)  ; &CDP-v001-88C6;
+       ))
+      (=>>ucs@iso        . #x200E8)    ; &G-IU+200E8;
+      (->subsumptive
+       ((==ucs@iso         . #x200E8)  ; &g2-IU-000200E8;
+       (->subsumptive
+        ((===ucs@iso         . #x200E8)        ; &R-U-000200E8;
+         )
+        ((=hanziku-1         . #xAEEA) ; &HZK01-AEEA;
+         ))
+       ))
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x200E8)    ; 𠃨
+      ))
+    (ideographic-radical . 5)  ; ⼄
+    (ideographic-strokes . 5)
+    (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs              . #x2FF9)     ; ⿹
+      )
+     ((name              . "CJK RADICAL SECOND THREE")
+      (=ucs              . #x2E84)     ; ⺄
+      )
+     ((=ucs              . #x51FA)     ; 出
+      ))
+    (=ucs-itaiji-001   . #x200E8)      ; &U-i001+200E8;
+    (->subsumptive
+     ((==ucs-itaiji-001          . #x200E8)    ; &g2-U-i001+200E8;
+      ))
     ))
 (define-char
   '((ideographic-radical . 5)  ; ⼄