(BUCS+7522): New abstract node.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R100-Life.el

diff --git a/lisp/utf-2000/Ideograph-R100-Life.el b/lisp/utf-2000/Ideograph-R100-Life.el
index 07d235e..5cfedeb 100644 (file)
--- a/lisp/utf-2000/Ideograph-R100-Life.el
+++ b/lisp/utf-2000/Ideograph-R100-Life.el
@@ -222,6 +222,15 @@
   '((ideographic-radical . 100)        ; ⽣
     (ideographic-strokes . 6)
     (total-strokes      . 11)
+    (==>ucs@bucs       . #x7522)       ; &BUCS+7522;
+    ))
+(define-char
+  '((<-denotational
+     ((==>ucs@bucs       . #x7522)     ; &BUCS+7522;
+      ))
+    (ideographic-radical . 100)        ; ⽣
+    (ideographic-strokes . 6)
+    (total-strokes      . 11)
     (=>jis-x0208       . #x3B3A)       ; &J97-3B3A; [27-26]
     (=>jis-x0213-1     . #x3B3A)       ; &J97-3B3A; [27-26]
     ))
@@ -258,6 +267,28 @@
     ))
 (define-char
   '((<-denotational
+     ((==>ucs@bucs       . #x7522)     ; &BUCS+7522;
+      ))
+    (ideographic-radical . 100)        ; ⽣
+    (ideographic-strokes . 5)
+    (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x7ACB)     ; 立
+      )
+     ((=ucs              . #x9FB6)     ; 龶
+      ))
+    (=ucs-itaiji-002   . #x7523)       ; &U-i002+7523;
+    (<-formed
+     ((=ucs              . #x7523)     ; 産
+      )
+     ((=ucs              . #x7522)     ; 產
+      ))
+    ))
+(define-char
+  '((<-denotational
      ((=>jis-x0208       . #x3B3A)     ; &J97-3B3A; [27-26]
       ))
     (ideographic-radical . 100)        ; ⽣