From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 26 Apr 2024 07:20:50 +0000 (+0900)
Subject: (U+5B63): Add `<-denotational@usage' for BUCS+5B63; apply new
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ea9b4f1c98b1e5e1299299e7560ba58e87866331;p=chise%2Fxemacs-chise.git

(U+5B63): Add `<-denotational@usage' for BUCS+5B63; apply new
conventions for glyph granularity.
(BUCS+5B63): New abstract node; unify A2-DJT-02276.
---

diff --git a/lisp/utf-2000/Ideograph-R039-Child.el b/lisp/utf-2000/Ideograph-R039-Child.el
index af31306..63e45ee 100644
--- a/lisp/utf-2000/Ideograph-R039-Child.el
+++ b/lisp/utf-2000/Ideograph-R039-Child.el
@@ -1566,11 +1566,40 @@
     (=jef-china3	. #x97E6)	; &I-JC3-97E6;
     ))
 (define-char
-  '((ideographic-radical . 39)	; ⼦
+  '((<-denotational@usage
+     ((==>ucs@bucs	  . #x5B63)	; &BUCS+5B63;
+      ))
+    (ideographic-radical . 39)	; ⼦
     (ideographic-strokes . 5)
     (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x79BE)	; 禾
+      )
+     ((=ucs		  . #x5B50)	; 子
+      ))
     (=ucs		. #x5B63)	; å­£
-    (=adobe-japan1-0	. 01602)	; &I-AJ1-01602;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x5B63)	; å­£
+      ))
+    (ideographic-radical . 39)	; ⼦
+    (ideographic-strokes . 5)
+    (total-strokes	 . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs@unicode	  . #x79BE)	; &AJ1-01363;
+      (=adobe-japan1-0	  . 01363)	; &AJ1-01363;
+      )
+     ((=ucs		  . #x5B50)	; 子
+      ))
+    (=ucs@unicode	. #x5B63)	; &AJ1-01602;
+    (=adobe-japan1-0	. 01602)	; &AJ1-01602;
     (=jis-x0208		. #x3528)	; &I-J90-3528; [21-08]
     (=gb2312		. #x3C3E)	; &I-G0-3C3E; [28-30]
     (=ks-x1001		. #x4C79)	; &I-K0-4C79; [44-89]
@@ -1581,6 +1610,7 @@
     (=gt-k		. 03665)	; &I-GT-K03665;
     (=gt-pj-1		. #x3528)	; &I-GT-08754; [21-08]
     (=daikanwa		. 06965)	; &I-M-06965;
+    (=daijiten		. 02276)	; &I-DJT-02276;
     (->subsumptive
      ((=decomposition@cid
        ((=ucs		    . #x5B63)	; å­£
@@ -1596,9 +1626,12 @@
       (==gt		  . 08754)	; &g2-AJ1-01602;
       (==gt-k		  . 03665)	; &g2-AJ1-01602;
       (==daikanwa	  . 06965)	; &g2-AJ1-01602;
+      (==daijiten	  . 02276)	; &g2-AJ1-01602;
       (->subsumptive
        ((===daikanwa	    . 06965)	; &R-M-06965;
 	)
+       ((===daijiten	    . 02276)	; &R-DJT-02276;
+	)
        ((===jis-x0208	    . #x3528)	; &R-J0-3528; [21-08]
 	(===jis-x0213-1	    . #x3528)	; &R-J0-3528; [21-08]
 	)
@@ -5555,6 +5588,11 @@
     ))
 (define-char
   '((ideographic-radical . 39)	; ⼦
+    (==>ucs@bucs	. #x5B63)	; &BUCS+5B63;
+    (==>daijiten	. 02276)	; &BUCS+5B63;
+    ))
+(define-char
+  '((ideographic-radical . 39)	; ⼦
     (==>ucs@bucs	. #x5B64)	; &BUCS+5B64;
     (==>daijiten	. 02277)	; &BUCS+5B64;
     ))