From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 17 Apr 2018 03:31:04 +0000 (+0900)
Subject: (A-BC-88B7): New abstract node.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ceaf08ab05056797c807381378a2b2beb2ed2196;p=chise%2Fxemacs-chise.git

(A-BC-88B7): New abstract node.
(A-BC-88B7-itaiji-001): New abstract node; use `<-denotational' for
A-BC-88B7.
(BC-88B7-itaiji-001): New character; use `<-denotational' for
A-BC-88B7-itaiji-001.
(BC-88B7-itaiji-002): Likewise.
(BC-88B7): New character; use `<-denotational' for A-BC-88B7.
---

diff --git a/lisp/utf-2000/Ideograph-R002-Line.el b/lisp/utf-2000/Ideograph-R002-Line.el
index abeba22..b542c1b 100644
--- a/lisp/utf-2000/Ideograph-R002-Line.el
+++ b/lisp/utf-2000/Ideograph-R002-Line.el
@@ -1115,6 +1115,62 @@
     (=big5-cdp-var-005	. #x89C5)	; &CDP-v005-89C5;
     ))
 (define-char
+  '((ideographic-radical . 2)	; ⼁
+    (ideographic-strokes . 7)
+    (total-strokes	 . 8)
+    (=>big5-cdp		. #x88B7)	; &A-CDP-88B7;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x88B7)	; &A-CDP-88B7;
+      ))
+    (ideographic-radical . 2)	; ⼁
+    (ideographic-strokes . 7)
+    (total-strokes	 . 8)
+    (=>big5-cdp-itaiji-001 . #x88B7)	; &A-CDP-i001-88B7;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp-itaiji-001 . #x88B7)	; &A-CDP-i001-88B7;
+      ))
+    (ideographic-radical . 2)	; ⼁
+    (ideographic-strokes . 7)
+    (total-strokes	 . 8)
+    (=big5-cdp-itaiji-001 . #x88B7)	; &CDP-i001-88B7;
+    (->subsumptive
+     ((==big5-cdp-itaiji-001 . #x88B7)	; &g2-CDP-i001-88B7;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp-itaiji-001 . #x88B7)	; &A-CDP-i001-88B7;
+      ))
+    (ideographic-radical . 2)	; ⼁
+    (ideographic-strokes . 7)
+    (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x20010)	; 𠀐
+      )
+     ((=ucs		  . #x53E3)	; 口
+      ))
+    (=big5-cdp-itaiji-002 . #x88B7)	; &CDP-i002-88B7;
+    ))
+(define-char
+  '((<-denotational
+     ((=>big5-cdp	  . #x88B7)	; &A-CDP-88B7;
+      ))
+    (ideographic-radical . 2)	; ⼁
+    (ideographic-strokes . 7)
+    (total-strokes	 . 8)
+    (=big5-cdp		. #x88B7)	; &CDP-88B7;
+    (->subsumptive
+     ((==big5-cdp	  . #x88B7)	; &g2-CDP-88B7;
+      ))
+    ))
+(define-char
   '((<-denotational
      ((=>big5-cdp	  . #x89C5)	; &A-CDP-89C5;
       ))