(A-cgnU+5919): New abstract node.

[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 20032b9..80194d9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R005-Second.el
+++ b/lisp/utf-2000/Ideograph-R005-Second.el
@@ -1225,6 +1225,41 @@
   '((ideographic-radical . 5)  ; ⼄
     (ideographic-strokes . 3)
     (total-strokes      . 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x4E8E)     ; 于
+      )
+     ((=>ucs@component   . #x4E59)     ; &A-compU+4E59;
+      (=>iwds-1                  .  0340)      ; &A-compU+4E59;
+      ))
+    (=ucs              . #x200D7)      ; 𠃗
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x200D7)    ; 𠃗
+      ))
+    (ideographic-radical . 5)  ; ⼄
+    (ideographic-strokes . 3)
+    (total-strokes      . 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x4E8E)     ; 于
+      )
+     ((=ucs              . #x4E59)     ; 乙
+      ))
+    (=ucs@iso          . #x200D7)      ; &U-000200D7;
+    (->subsumptive
+     ((==ucs@iso         . #x200D7)    ; &g2-IU-000200D7;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 5)  ; ⼄
+    (ideographic-strokes . 3)
+    (total-strokes      . 4)
     (hanyu-dazidian    1 51 14)
     (=ucs              . #x200DB)      ; 𠃛
     (=big5-cdp         . #x88CE)       ; &I-CDP-88CE;
@@ -1289,6 +1324,9 @@
      ((==ucs@JP/hanazono  . #x2CF18)   ; &g2-MJ057888;
       (==mj              . 057888)     ; &g2-MJ057888;
       (==koseki                  . 184530)     ; &g2-MJ057888;
+      (->subsumptive
+       ((===mj             . 057888)   ; &R-MJ057888;
+       ))
       )
      ((===hng-khm        . 03990)      ; &HNG011-03990;
       )