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

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R016-Table.el

diff --git a/lisp/utf-2000/Ideograph-R016-Table.el b/lisp/utf-2000/Ideograph-R016-Table.el
index a1901a7..8cb144e 100644 (file)
--- a/lisp/utf-2000/Ideograph-R016-Table.el
+++ b/lisp/utf-2000/Ideograph-R016-Table.el
@@ -1128,12 +1128,50 @@
       )
      ((=ucs              . #x51E0)     ; 几
       )
+     ((=>ucs@iwds-1      . #x51AB)     ; &A-IWDSU+51AB;
+      (=>iwds-1                  .  47219)     ; &A-IWDSU+51AB;
+      ))
+    (=ucs              . #x2D0AC)      ; 𭂬
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x2D0AC)    ; 𭂬
+      ))
+    (ideographic-radical . 16) ; ⼏
+    (ideographic-strokes . 2)
+    (total-strokes      . 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
+      (=ucs              . #x2FF5)     ; ⿵
+      )
+     ((=ucs              . #x51E0)     ; 几
+      )
+     ((=ucs              . #x51AB)     ; 冫
+      ))
+    (=ucs-var-001      . #x2D0AC)      ; &U-v001+2D0AC;
+    (->subsumptive
+     ((==ucs-var-001     . #x2D0AC)    ; &g2-U-v001+2D0AC;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x2D0AC)    ; 𭂬
+      ))
+    (ideographic-radical . 16) ; ⼏
+    (ideographic-strokes . 2)
+    (total-strokes      . 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
+      (=ucs              . #x2FF5)     ; ⿵
+      )
+     ((=ucs              . #x51E0)     ; 几
+      )
      ((name              . "CJK RADICAL REPEAT")
       (=ucs              . #x2E80)     ; ⺀
       ))
-    (=ucs              . #x2D0AC)      ; 𭂬
-    (=mj               . 058055)       ; &I-MJ058055;
-    (=koseki           . 240370)       ; 𭂬
+    (=ucs@JP/hanazono  . #x2D0AC)      ; &MJ058055;
+    (=mj               . 058055)       ; &MJ058055;
+    (=koseki           . 240370)       ; &MJ058055;
     (<-formed
      ((=ucs              . #x74E6)     ; 瓦
       (=mj               . 017540)     ; &I-MJ017540;
@@ -2722,16 +2760,36 @@
       )
      ((=ucs              . #x2D544)    ; 𭕄
       )
-     ((=gt-k             . 01457)      ; &GT-K01457;
+     ((=ucs              . #x200A1)    ; 𠂡
       ))
     (=ucs              . #x9F21)       ; 鼡
-    (=adobe-japan1-0   . 07454)        ; &I-AJ1-07454;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x9F21)     ; 鼡
+      ))
+    (ideographic-radical@ucs . 208)    ; ⿏
+    (ideographic-strokes@ucs . 0)
+    (ideographic-radical@daikanwa . 16)        ; ⼏
+    (ideographic-strokes@daikanwa . 6)
+    (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x2D544)    ; 𭕄
+      )
+     ((=ucs@iso                  . #x200A1)    ; &GT-K01457;
+      (=gt-k             . 01457)      ; &GT-K01457;
+      ))
+    (=ucs@unicode      . #x9F21)       ; &AJ1-07454;
+    (=adobe-japan1-0   . 07454)        ; &AJ1-07454;
     (=jis-x0208                . #x736B)       ; &I-J90-736B; [83-75]
     (=jis-x0213-1      . #x736B)       ; &I-JX1-736B; [83-75]
     (=gt               . 12984)        ; &I-GT-12984;
     (=gt-k             . 03927)        ; &I-GT-K03927;
     (=gt-pj-1          . #x736B)       ; &I-GT-12984; [83-75]
-    (=daikanwa/ho      .  0047)        ; 鼡
+    (=daikanwa/ho      .  0047)        ; &AJ1-07454;
     (=daijiten         . 07474)        ; &I-DJT-07474;
     (<-vulgar
      ((=ucs@unicode      . #x9F20)     ; &AJ1-02767;