From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 6 Oct 2022 14:48:59 +0000 (+0900)
Subject: (A-RUI6-E13B): New abstract node.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=db0bc645160afd503d4a1373d53d77a622a10591;p=chise%2Fxemacs-chise.git

(A-RUI6-E13B): New abstract node.
(RUI6-E13B): Copied from ruimoku6.el; add `<-denotational' for
A-RUI6-E13B.
(IU+22843): Add `ideographic-structure@apparent'.
---

diff --git a/lisp/utf-2000/Ideograph-R061-Heart.el b/lisp/utf-2000/Ideograph-R061-Heart.el
index 0800eda..69264e8 100644
--- a/lisp/utf-2000/Ideograph-R061-Heart.el
+++ b/lisp/utf-2000/Ideograph-R061-Heart.el
@@ -27630,6 +27630,38 @@
     ))
 (define-char
   '((ideographic-radical . 61)	; â¼¼
+    (ideographic-strokes . 9)
+    (total-strokes	 . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5FC4)	; 忄
+      )
+     ((=ucs		  . #x9996)	; 首
+      ))
+    (=>ruimoku-v6	. #xE13B)	; &A-RUI6-E13B;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ruimoku-v6	  . #xE13B)	; &A-RUI6-E13B;
+      ))
+    (ideographic-radical . 61)	; â¼¼
+    (ideographic-strokes . 9)
+    (total-strokes	 . 12)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x5FC4)	; 忄
+      )
+     ((=ucs@unicode	  . #x9996)	; &AJ1-02335;
+      (=adobe-japan1-0	  . 02335)	; &AJ1-02335;
+      ))
+    (=ruimoku-v6	. #xE13B)	; &RUI6-E13B;
+    ))
+(define-char
+  '((ideographic-radical . 61)	; â¼¼
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
       (=ucs		  . #x2FF0)	; â¿°
@@ -41329,6 +41361,14 @@
       )
      ((=ucs		  . #x5FC3)	; 心
       ))
+    (ideographic-structure@apparent
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x7ACB)	; 立
+      )
+     ((=ucs		  . #x60A3)	; 患
+      ))
     (=ucs@iso		. #x22843)	; &U-00022843;
     (->subsumptive
      ((==ucs@iso	  . #x22843)	; &g2-IU-00022843;