From f1152744002dba2d1f8bd5778a2fa61df8a29afa Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 2 May 2017 15:22:54 +0900
Subject: [PATCH] (U+5492): Separate UU+5492. (GT-K06154): New character; use
 `<-denotational' for U+5492.

---
 lisp/utf-2000/Ideograph-R030-Mouth.el |   44 ++++++++++++++++++++++++++++++---
 1 file changed, 41 insertions(+), 3 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R030-Mouth.el b/lisp/utf-2000/Ideograph-R030-Mouth.el
index 2361862..9393cf9 100644
--- a/lisp/utf-2000/Ideograph-R030-Mouth.el
+++ b/lisp/utf-2000/Ideograph-R030-Mouth.el
@@ -9957,6 +9957,22 @@
     ))
 (define-char
   '((ideographic-radical . 30)	; ⼝
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5405)	; 吅
+      )
+     ((=>ucs@component	  . #x5140)	; &IWDS1-214;
+      (=>iwds-1		  .  0214)	; &IWDS1-214;
+      ))
+    (=ucs		. #x5492)	; 咒
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x5492)	; 咒
+      ))
+    (ideographic-radical . 30)	; ⼝
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
     (hanyu-dazidian	1 277 18)
@@ -9968,8 +9984,8 @@
       )
      ((=ucs		  . #x51E0)	; 几
       ))
-    (=ucs		. #x5492)	; 咒
-    (=adobe-japan1-0	. 04357)	; &I-AJ1-04357;
+    (=ucs@unicode	. #x5492)	; &AJ1-04357;
+    (=adobe-japan1-0	. 04357)	; &AJ1-04357;
     (=jis-x0208		. #x5270)	; &I-J90-5270; [50-80]
     (=gb2312		. #x5664)	; &I-G0-5664; [54-68]
     (=cns11643-1	. #x4C49)	; &I-C1-4C49; [44-41]
@@ -9978,7 +9994,7 @@
     (=gt		. 04360)	; &I-GT-04360;
     (=gt-pj-1		. #x5270)	; &I-GT-04360; [50-80]
     (=daikanwa		. 03444)	; &I-M-03444;
-    (=shinjigen		.  1034)	; 咒
+    (=shinjigen		.  1034)	; &AJ1-04357;
     (<-vulgar
      ((=ucs		  . #x546A)	; 呪
       (=jis-x0208	  . #x3C76)	; &I-J90-3C76; [28-86]
@@ -10013,6 +10029,28 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x5492)	; 咒
+      ))
+    (ideographic-radical . 30)	; ⼝
+    (ideographic-strokes . 5)
+    (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x5405)	; 吅
+      )
+     ((=ucs		  . #x5140)	; 兀
+      ))
+    (=gt-k		. 06154)	; &GT-K06154;
+    (=gt-pj-k1		. #x3E77)	; &GT-K06154; [30-87]
+    (->subsumptive
+     ((==gt-k		  . 06154)	; &g2-GT-K06154;
+      (==gt-pj-k1	  . #x3E77)	; &g2-GT-K06154; [30-87]
+      ))
+    ))
+(define-char
   '((ideographic-radical . 30)	; ⼝
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
-- 
1.7.10.4