From b7fb9a484c2461f9e177d9dd6f01547073fc0a0b Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 31 Oct 2016 18:43:19 +0900
Subject: [PATCH] (U+6C38): Separate UU+6C38. (GT-K00893): New character; use
 `<-denotational' for U+6C38.

---
 lisp/utf-2000/Ideograph-R085-Water.el |   23 +++++++++++++++++++++--
 1 file changed, 21 insertions(+), 2 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R085-Water.el b/lisp/utf-2000/Ideograph-R085-Water.el
index 77bf7c3..4798c92 100644
--- a/lisp/utf-2000/Ideograph-R085-Water.el
+++ b/lisp/utf-2000/Ideograph-R085-Water.el
@@ -129,7 +129,16 @@
     (ideographic-strokes . 1)
     (total-strokes	 . 5)
     (=ucs		. #x6C38)	; æ°¸
-    (=adobe-japan1-0	. 01260)	; &I-AJ1-01260;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x6C38)	; æ°¸
+      ))
+    (ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 1)
+    (total-strokes	 . 5)
+    (=ucs@unicode	. #x6C38)	; &AJ1-01260;
+    (=adobe-japan1-0	. 01260)	; &AJ1-01260;
     (=jis-x0208		. #x314A)	; &I-J90-314A; [17-42]
     (=gb2312		. #x5340)	; &I-G0-5340; [51-32]
     (=ks-x1001		. #x6735)	; &I-K0-6735; [71-21]
@@ -140,7 +149,7 @@
     (=gt-k		. 00892)	; &I-GT-K00892;
     (=gt-pj-1		. #x314A)	; &I-GT-21884; [17-42]
     (=daikanwa		. 17088)	; &I-M-17088;
-    (=shinjigen		.  4050)	; æ°¸
+    (=shinjigen		.  4050)	; &AJ1-01260;
     (->subsumptive
      ((==ucs@unicode	  . #x6C38)	; &g2-AJ1-01260;
       (==adobe-japan1-0	  . 01260)	; &g2-AJ1-01260;
@@ -180,6 +189,16 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x6C38)	; æ°¸
+      ))
+    (ideographic-radical . 85)	; ⽔
+    (ideographic-strokes . 1)
+    (total-strokes	 . 5)
+    (=gt-k		. 00893)	; &GT-K00893;
+    (=gt-pj-k2		. #x4A60)	; &GT-K00893; [42-64]
+    ))
+(define-char
   '((ideographic-radical . 85)	; ⽔
     (ideographic-strokes . 1)
     (total-strokes	 . 5)
-- 
1.7.10.4