From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 23 Oct 2016 08:08:21 +0000 (+0900)
Subject: (U+7075): Omit `ideographic-strokes' and `total-strokes'.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7ffbf2163f00b10458864c70da8d8e7b5e9f3c8a;p=chise%2Fxemacs-chise.git-

(U+7075): Omit `ideographic-strokes' and `total-strokes'.
(A-UU+7075): New abstract node; use `<-denotational' for U+7075.
(JU+7075): Use A-UU+7075 instead of U+7075 as the mother.
(U+7075-itaiji-001): New character; use `<-denotational' for
A-UU+7075.
(UU+7075): Use A-UU+7075 instead of U+7075 as the mother.
(U+7075-var-001): New character; use `<-denotational' for U+7075.
---

diff --git a/lisp/utf-2000/Ideograph-R086-Fire.el b/lisp/utf-2000/Ideograph-R086-Fire.el
index 08bf58c..d9f58fa 100644
--- a/lisp/utf-2000/Ideograph-R086-Fire.el
+++ b/lisp/utf-2000/Ideograph-R086-Fire.el
@@ -638,8 +638,6 @@
     ))
 (define-char
   '((ideographic-radical . 86)	; ⽕
-    (ideographic-strokes . 3)
-    (total-strokes	 . 7)
     (=ucs		. #x7075)	; 灵
     ))
 (define-char
@@ -649,6 +647,31 @@
     (ideographic-radical . 86)	; ⽕
     (ideographic-strokes . 3)
     (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5F50)	; 彐
+      )
+     ((=ucs		  . #x706B)	; 火
+      ))
+    (=>ucs@unicode	. #x7075)	; &A-UU+7075;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@unicode	  . #x7075)	; &A-UU+7075;
+      ))
+    (ideographic-radical . 86)	; ⽕
+    (ideographic-strokes . 3)
+    (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=adobe-japan1-4	  . 15391)	; &AJ1-15391;
+      )
+     ((=ucs		  . #x706B)	; 火
+      ))
     (=ucs@cns		. #x7075)	; &JX1-7744;
     (=ucs@jis		. #x7075)	; &JX1-7744;
     (=jis-x0212		. #x4946)	; &JX1-7744; [41-38]
@@ -683,11 +706,38 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs		  . #x7075)	; 灵
+     ((=>ucs@unicode	  . #x7075)	; &A-UU+7075;
+      ))
+    (ideographic-radical . 86)	; ⽕
+    (ideographic-strokes . 3)
+    (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@jis		  . #x5F50)	; &AJ1-14521;
+      (=adobe-japan1-4	  . 14521)	; &AJ1-14521;
+      )
+     ((=ucs		  . #x706B)	; 火
+      ))
+    (=ucs-itaiji-001	. #x7075)	; &U-i001+7075;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@unicode	  . #x7075)	; &A-UU+7075;
       ))
     (ideographic-radical . 86)	; ⽕
     (ideographic-strokes . 3)
     (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((name		  . "CJK RADICAL SNOUT TWO")
+      (=ucs		  . #x2E95)	; ⺕
+      )
+     ((=ucs		  . #x706B)	; 火
+      ))
     (=ucs@unicode	. #x7075)	; &G0-4169;
     (=ucs@JP/hanazono	. nil)
     (=gb2312		. #x4169)	; &G0-4169; [33-73]
@@ -698,6 +748,23 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x7075)	; 灵
+      ))
+    (ideographic-radical . 86)	; ⽕
+    (ideographic-strokes . 3)
+    (total-strokes	 . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5F51)	; 彑
+      )
+     ((=ucs		  . #x706B)	; 火
+      ))
+    (=ucs-var-001	. #x7075)	; &U-v001+7075;
+    ))
+(define-char
   '((ideographic-radical . 86)	; ⽕
     (ideographic-strokes . 3)
     (total-strokes	 . 7)