From c5d957f39d65dcac5593c4de3f400dfbd0e41a20 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 18 Nov 2021 09:02:34 +0900
Subject: [PATCH] (U-00020AD4): Unify GT-03877.

---
 lisp/utf-2000/Ideograph-R028-Private.el |   23 ++++++++++++++++++++++-
 1 file changed, 22 insertions(+), 1 deletion(-)

diff --git a/lisp/utf-2000/Ideograph-R028-Private.el b/lisp/utf-2000/Ideograph-R028-Private.el
index 0484757..32384ce 100644
--- a/lisp/utf-2000/Ideograph-R028-Private.el
+++ b/lisp/utf-2000/Ideograph-R028-Private.el
@@ -159,9 +159,30 @@
     (=ucs		. #x20AD4)	; 𠫔
     (=cns11643-6	. #x213C)	; &I-C6-213C; [01-28]
     (=big5-cdp		. #x89AC)	; &I-CDP-89AC;
+    (=gt		. 03877)	; &I-GT-03877;
     (=gt-k		. 00345)	; &I-GT-K00345;
-    (=gt-pj-2		. #x4B5D)	; 𠫔 [43-61]
+    (=gt-pj-2		. #x4B5D)	; &I-GT-03877; [43-61]
     (=daikanwa		. 03059)	; &I-M-03059;
+    (->subsumptive
+     ((==ucs@iso	  . #x20AD4)	; &g2-GT-03877;
+      (==cns11643-6	  . #x213C)	; &g2-GT-03877; [01-28]
+      (==big5-cdp	  . #x89AC)	; &g2-GT-03877;
+      (==gt		  . 03877)	; &g2-GT-03877;
+      (==gt-k		  . 00345)	; &g2-GT-03877;
+      (==daikanwa	  . 03059)	; &g2-GT-03877;
+      (->subsumptive
+       ((===daikanwa	    . 03059)	; &R-M-03059;
+	)
+       ((===big5-cdp	    . #x89AC)	; &R-CDP-89AC;
+	)
+       ((===cns11643-6	    . #x213C)	; &R-C6-213C; [01-28]
+	)
+       ((===gt		    . 03877)	; &R-GT-03877;
+	(===gt-k	    . 00345)	; &R-GT-03877;
+	)
+       ((===ucs@iso	    . #x20AD4)	; &R-U-00020AD4;
+	))
+      ))
     ))
 (define-char
   '((ideographic-radical . 28)	; ⼛
-- 
1.7.10.4