From d0f395d57b6b911bc53c5ae6e3cf101c0a9aae33 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sat, 14 Oct 2023 02:35:05 +0900
Subject: [PATCH] (A-U+97F1-var-001): New abstract node. (U+97F1-var-001): New
 character; use `<-denotational' for A-U+97F1-var-001.

---
 lisp/utf-2000/Ideograph-R062-Halberd.el |   31 +++++++++++++++++++++++++++++++
 1 file changed, 31 insertions(+)

diff --git a/lisp/utf-2000/Ideograph-R062-Halberd.el b/lisp/utf-2000/Ideograph-R062-Halberd.el
index 7b1fcb1..006670e 100644
--- a/lisp/utf-2000/Ideograph-R062-Halberd.el
+++ b/lisp/utf-2000/Ideograph-R062-Halberd.el
@@ -3283,6 +3283,37 @@
     (=ucs@JP/hanazono	. #x2BEF6)	; &hanaJU+2BEF6;
     ))
 (define-char
+  '((ideographic-radical . 62)	; â¼½
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
+      )
+     ((=ucs		  . #x2298F)	; 𢦏
+      )
+     ((=>ucs@iwds-1	  . #x4E1A)	; &A-IWDSU+4E1A;
+      (=>big5-cdp	  . #x8D6B)	; &A-IWDSU+4E1A;
+      ))
+    (=>ucs-var-001	. #x97F1)	; &A-U-v001+97F1;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-var-001	  . #x97F1)	; &A-U-v001+97F1;
+      ))
+    (ideographic-radical . 62)	; â¼½
+    (ideographic-strokes . 7)
+    (total-strokes	 . 11)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs		  . #x2FF9)	; ⿹
+      )
+     ((=ucs		  . #x2298F)	; 𢦏
+      )
+     ((=ucs@unicode	  . #x4E1A)	; &G0-5235;
+      (=gb2312		  . #x5235)	; &G0-5235; [50-21]
+      ))
+    (=ucs-var-001	. #x97F1)	; &U-v001+97F1;
+    ))
+(define-char
   '((<-denotational
      ((=>big5-cdp	  . #x86F7)	; &A-CDP-86F7;
       ))
-- 
1.7.10.4