From 242bb4cda4f7a0aa77a38440ae48011c4f93ba30 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 15 Aug 2022 15:05:08 +0900
Subject: [PATCH] (U+52A2): Use `<-denotational@usage' instead of
 `<-denotational' for BUCS+52F1. (U-000208A8): New
 character. (U+52F1): Use `<-denotational@usage' instead of
 `<-denotational' for BUCS+52F1.

---
 lisp/utf-2000/Ideograph-R019-Power.el |   78 +++++++++++++++++++++------------
 1 file changed, 50 insertions(+), 28 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R019-Power.el b/lisp/utf-2000/Ideograph-R019-Power.el
index 05ae757..96abba6 100644
--- a/lisp/utf-2000/Ideograph-R019-Power.el
+++ b/lisp/utf-2000/Ideograph-R019-Power.el
@@ -469,6 +469,36 @@
     (=hanziku-1		. #xBB48)	; &I-HZK01-BB48;
     ))
 (define-char
+  '((<-denotational@usage
+     ((==>ucs@bucs	  . #x52F1)	; &BUCS+52F1;
+      ))
+    (ideographic-radical . 19)	; ⼒
+    (ideographic-strokes . 3)
+    (total-strokes	 . 5)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs		  . #x2FF0)	; â¿°
+      )
+     ((=ucs		  . #x4E07)	; 万
+      )
+     ((=ucs		  . #x529B)	; 力
+      ))
+    (=ucs		. #x52A2)	; 劢
+    (=gb2312		. #x5B3D)	; &I-G0-5B3D; [59-29]
+    (<-simplified@CN
+     ((=ucs@unicode	  . #x52F1)	; &AJ1-19200;
+      (=adobe-japan1-5	  . 19200)	; &AJ1-19200;
+      (=gb12345		  . #x5B3D)	; &AJ1-19200; [59-29]
+      ))
+    (->subsumptive
+     ((==ucs@unicode	  . #x52A2)	; &g2-UU+52A2;
+      (==gb2312		  . #x5B3D)	; &g2-UU+52A2; [59-29]
+      (->subsumptive
+       ((===ucs@unicode	    . #x52A2)	; &R-UU+52A2;
+	))
+      ))
+    ))
+(define-char
   '((ideographic-radical . 19)	; ⼒
     (ideographic-strokes . 3)
     (total-strokes	 . 5)
@@ -9092,6 +9122,21 @@
     ))
 (define-char
   '((ideographic-radical . 19)	; ⼒
+    (ideographic-strokes . 12)
+    (total-strokes	 . 14)
+    (=ucs		. #x208A8)	; 𠢨
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x208A8)	; 𠢨
+      ))
+    (ideographic-radical . 19)	; ⼒
+    (ideographic-strokes . 12)
+    (total-strokes	 . 14)
+    (=ucs@iso		. #x208A8)	; &U-000208A8;
+    ))
+(define-char
+  '((ideographic-radical . 19)	; ⼒
     (ideographic-strokes . 13)
     (total-strokes	 . 15)
     (=ucs		. #x208B0)	; ð ¢°
@@ -9298,11 +9343,7 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 19)	; ⼒
-    (==>ucs@bucs	. #x52F1)	; &BUCS+52F1;
-    ))
-(define-char
-  '((<-denotational
+  '((<-denotational@usage
      ((==>ucs@bucs	  . #x52F1)	; &BUCS+52F1;
       ))
     (ideographic-radical . 19)	; ⼒
@@ -9393,29 +9434,6 @@
       ))
     ))
 (define-char
-  '((<-denotational
-     ((==>ucs@bucs	  . #x52F1)	; &BUCS+52F1;
-      ))
-    (ideographic-radical . 19)	; ⼒
-    (ideographic-strokes . 3)
-    (total-strokes	 . 5)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
-      (=ucs		  . #x2FF0)	; â¿°
-      )
-     ((=ucs		  . #x4E07)	; 万
-      )
-     ((=ucs		  . #x529B)	; 力
-      ))
-    (=ucs		. #x52A2)	; 劢
-    (=gb2312		. #x5B3D)	; &I-G0-5B3D; [59-29]
-    (<-simplified@CN
-     ((=ucs@unicode	  . #x52F1)	; &AJ1-19200;
-      (=adobe-japan1-5	  . 19200)	; &AJ1-19200;
-      (=gb12345		  . #x5B3D)	; &AJ1-19200; [59-29]
-      ))
-    ))
-(define-char
   '((ideographic-radical . 19)	; ⼒
     (ideographic-strokes . 13)
     (total-strokes	 . 15)
@@ -10733,6 +10751,10 @@
     ))
 (define-char
   '((ideographic-radical . 19)	; ⼒
+    (==>ucs@bucs	. #x52F1)	; &BUCS+52F1;
+    ))
+(define-char
+  '((ideographic-radical . 19)	; ⼒
     (==>ucs@bucs	. #x52D5)	; &BUCS+52D5;
     ))
 (define-char
-- 
1.7.10.4