From b27a3396fec0f09ce8b09f51a07d13d519266afa Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 23 Mar 2022 21:57:08 +0900
Subject: [PATCH] (U+623C): Add `<-denotational@usage' for BUCS+536F; unify
 DJT-03643. (U+22A60-var-001): New character; use
 `<-denotational' for U-00022A60.

---
 lisp/utf-2000/Ideograph-R063-Door.el |   41 +++++++++++++++++++++++++++++-----
 1 file changed, 35 insertions(+), 6 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R063-Door.el b/lisp/utf-2000/Ideograph-R063-Door.el
index 503db85..8987804 100644
--- a/lisp/utf-2000/Ideograph-R063-Door.el
+++ b/lisp/utf-2000/Ideograph-R063-Door.el
@@ -1,5 +1,10 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
+  '((ideographic-radical . 63)	; â¼¾
+    (ideographic-strokes . 0)
+    (=>ucs@cognate	. #x6236)	; &A-cgnU+6236;
+    ))
+(define-char
   '((<-denotational
      ((=>ucs@cognate	  . #x6236)	; &A-cgnU+6236;
       ))
@@ -11,11 +16,6 @@
     (=>iwds-1		.  0007)	; &A-IWDSU+6236;
     ))
 (define-char
-  '((ideographic-radical . 63)	; â¼¾
-    (ideographic-strokes . 0)
-    (=>ucs@cognate	. #x6236)	; &A-cgnU+6236;
-    ))
-(define-char
   '((<-denotational
      ((=>ucs@iwds-1	  . #x6236)	; &A-IWDSU+6236;
       (=>iwds-1		  .  0007)	; &A-IWDSU+6236;
@@ -972,7 +972,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 63)	; â¼¾
+  '((<-denotational@usage
+     ((==>ucs@bucs	  . #x536F)	; &BUCS+536F;
+      ))
+    (ideographic-radical . 63)	; â¼¾
     (ideographic-strokes . 3)
     (total-strokes	 . 7)
     (hanyu-dazidian	1 53 15)
@@ -980,6 +983,7 @@
     (=cns11643-3	. #x2629)	; &I-C3-2629; [06-09]
     (=big5-cdp		. #x89B5)	; &I-CDP-89B5;
     (=daikanwa		. 11708)	; &I-M-11708;
+    (=daijiten		. 03643)	; &I-DJT-03643;
     (=shinjigen		.  0849)	; 戼
     (<-original
      ((=ucs@unicode	  . #x536F)	; &AJ1-01230;
@@ -995,10 +999,13 @@
       (==cns11643-3	  . #x2629)	; &g2-CDP-89B5; [06-09]
       (==big5-cdp	  . #x89B5)	; &g2-CDP-89B5;
       (==daikanwa	  . 11708)	; &g2-CDP-89B5;
+      (==daijiten	  . 03643)	; &g2-CDP-89B5;
       (==shinjigen	  .  0849)	; &g2-CDP-89B5;
       (->subsumptive
        ((===daikanwa	    . 11708)	; &R-M-11708;
 	)
+       ((===daijiten	    . 03643)	; &R-DJT-03643;
+	)
        ((===big5-cdp	    . #x89B5)	; &R-CDP-89B5;
 	)
        ((===cns11643-3	    . #x2629)	; &R-C3-2629; [06-09]
@@ -3568,6 +3575,28 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs		  . #x22A60)	; 𢩠
+      ))
+    (ideographic-radical . 63)	; â¼¾
+    (ideographic-strokes . 13)
+    (total-strokes	 . 17)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs		  . #x2FF8)	; ⿸
+      )
+     ((=+>ucs@jis	  . #x6238)	; &o-J0-384D;
+      (=+>jis-x0208	  . #x384D)	; &o-J0-384D; [24-45]
+      )
+     ((=ucs@unicode	  . #x7758)	; &AJ1-18194;
+      (=adobe-japan1-5	  . 18194)	; &AJ1-18194;
+      ))
+    (=ucs-var-001	. #x22A60)	; &U-v001+22A60;
+    (->subsumptive
+     ((==ucs-var-001	  . #x22A60)	; &g2-U-v001+22A60;
+      ))
+    ))
+(define-char
   '((ideographic-radical . 63)	; â¼¾
     (ideographic-strokes . 17)
     (total-strokes	 . 21)
-- 
1.7.10.4