From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 5 Oct 2015 23:51:48 +0000 (+0900)
Subject: (U-000253A6): Add `<-ancient' for U+77E6; Add representative nodes.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0c96afb3564b844c251bf1276342c673ccc626d8;p=chise%2Fxemacs-chise.git-

(U-000253A6): Add `<-ancient' for U+77E6; Add representative nodes.
---

diff --git a/lisp/utf-2000/Ideograph-R027-Cliff.el b/lisp/utf-2000/Ideograph-R027-Cliff.el
index 5b655e2..06b9327 100644
--- a/lisp/utf-2000/Ideograph-R027-Cliff.el
+++ b/lisp/utf-2000/Ideograph-R027-Cliff.el
@@ -810,6 +810,23 @@
     (=ucs		. #x253A6)	; 𥎦
     (=cns11643-6	. #x263F)	; &I-C6-263F; [06-31]
     (=daikanwa		. 02928)	; &I-M-02928;
+    (<-ancient
+     ((=ucs		  . #x77E6)	; 矦
+      ))
+    (<-ancient*sources
+     shuowen daikanwa)
+    (->subsumptive
+     ((==ucs@iso	  . #x253A6)	; &g2-M-02928;
+      (==cns11643-6	  . #x263F)	; &g2-M-02928; [06-31]
+      (==daikanwa	  . 02928)	; &g2-M-02928;
+      (->subsumptive
+       ((===daikanwa	    . 02928)	; &R-M-02928;
+	)
+       ((===cns11643-6	    . #x263F)	; &R-C6-263F; [06-31]
+	)
+       ((===ucs@iso	    . #x253A6)	; &R-U-000253A6;
+	))
+      ))
     ))
 (define-char
   '((ideographic-radical . 27)	; ⼚