From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 21 Apr 2016 00:16:03 +0000 (+0900)
Subject: (BUCS+7522): New abstract node.
X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=commitdiff_plain;h=7b5d94592eae8db5d2b60e25c96dec264bca84ab

(BUCS+7522): New abstract node.
(A-J0-305B): Add `<-denotational' for BUCS+7522.
(U+7523-itaiji-002): New character; add `<-denotational' for
BUCS+7522; add `<-formed' for U+7523 and U+7522.
---

diff --git a/lisp/utf-2000/Ideograph-R100-Life.el b/lisp/utf-2000/Ideograph-R100-Life.el
index 07d235e..5cfedeb 100644
--- 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)	; â½£