From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 19 Aug 2018 15:21:47 +0000 (+0900)
Subject: (JU+81FE): Add some relations for other characters.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1e5aeb5848cf2fb2a5ff01f8f104c6a2e18a2f88;p=chise%2Fxemacs-chise.git

(JU+81FE): Add some relations for other characters.
(A-U+81FE-itaiji-001): New abstract node; use `<-denotational' for
A-cgnU+81FE; unify A-U+81FE-itaiji-002.
(U+81FE-itaiji-001): New character; use `<-denotational' for
A-U+81FE-itaiji-001.
(U+81FE-itaiji-002): Likewise.
---

diff --git a/lisp/utf-2000/Ideograph-R134-Mortar.el b/lisp/utf-2000/Ideograph-R134-Mortar.el
index 889ef88..4b30ffe 100644
--- a/lisp/utf-2000/Ideograph-R134-Mortar.el
+++ b/lisp/utf-2000/Ideograph-R134-Mortar.el
@@ -430,6 +430,30 @@
     (=gt-pj-1		. #x674C)	; &I-GT-39042; [71-44]
     (=daikanwa		. 30178)	; &I-M-30178;
     (=shinjigen@rev	.  6610)	; &AJ1-06295;
+    (<-ancient
+     ((=ucs@cns		  . #x8562)	; &C2-596F;
+      (=cns11643-2	  . #x596F)	; &C2-596F; [57-79]
+      (=daikanwa	  . 31989)	; &I-M-31989;
+      ))
+    (<-formed
+     ((=ucs		  . #x6142)	; 慂
+      ))
+    (<-formed$_1*sources
+     jiyun)
+    (<-same
+     ((=ucs		  . #x6142)	; 慂
+      (=daikanwa	  . 11039)	; &I-M-11039;
+      )
+     ((=ucs@cns		  . #x8562)	; &C2-596F;
+      (=cns11643-2	  . #x596F)	; &C2-596F; [57-79]
+      (=daikanwa	  . 31989)	; &I-M-31989;
+      ))
+    (<-same$_1*sources
+     jiyun daikanwa)
+    (<-same$_2*sources
+     jiyun daikanwa)
+    (<-same*sources
+     jiyun daikanwa)
     (->subsumptive
      ((==ucs@jis	  . #x81FE)	; &g2-AJ1-06295;
       (==ucs@ks		  . #x81FE)	; &g2-AJ1-06295;
@@ -484,6 +508,44 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs@cognate	  . #x81FE)	; &A-cgnU+81FE;
+      ))
+    (ideographic-radical . 134)	; ⾅
+    (ideographic-strokes . 2)
+    (=>ucs-itaiji-001	. #x81FE)	; &A-U-i001+81FE;
+    (=>ucs-itaiji-002	. #x81FE)	; &A-U-i001+81FE;
+    (<-formed@component
+     ((=ucs		  . #x81FE)	; 臾
+      )
+     ((=ucs		  . #x20010)	; 𠀐
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-001	  . #x81FE)	; &A-U-i001+81FE;
+      ))
+    (ideographic-radical . 134)	; ⾅
+    (ideographic-strokes . 2)
+    (total-strokes	 . 9)
+    (=ucs-itaiji-001	. #x81FE)	; &U-i001+81FE;
+    (->subsumptive
+     ((==ucs-itaiji-001	  . #x81FE)	; &g2-U-i001+81FE;
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-001	  . #x81FE)	; &A-U-i001+81FE;
+      ))
+    (ideographic-radical . 134)	; ⾅
+    (ideographic-strokes . 2)
+    (total-strokes	 . 8)
+    (=ucs-itaiji-002	. #x81FE)	; &U-i002+81FE;
+    (->subsumptive
+     ((==ucs-itaiji-002	  . #x81FE)	; &g2-U-i002+81FE;
+      ))
+    ))
+(define-char
   '((ideographic-radical . 134)	; ⾅
     (ideographic-strokes . 2)
     (total-strokes	 . 9)