From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 21 May 2024 09:39:39 +0000 (+0900)
Subject: (U+5DF5): Add `<-denotational@usage' for BUCS+536E; apply new
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5536bc37d29cd118745044bd9d85794bfa7811d5;p=chise%2Fxemacs-chise.git

(U+5DF5): Add `<-denotational@usage' for BUCS+536E; apply new
conventions for glyph granularity.
---

diff --git a/lisp/utf-2000/Ideograph-R049-Oneself.el b/lisp/utf-2000/Ideograph-R049-Oneself.el
index 36bb33e..085ff07 100644
--- a/lisp/utf-2000/Ideograph-R049-Oneself.el
+++ b/lisp/utf-2000/Ideograph-R049-Oneself.el
@@ -800,10 +800,12 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 49)	; â¼°
+  '((<-denotational@usage
+     ((==>ucs@bucs	  . #x536E)	; &BUCS+536E;
+      ))
+    (ideographic-radical . 49)	; â¼°
     (ideographic-strokes . 4)
     (total-strokes	 . 7)
-    (hanyu-dazidian	1 69 27)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
       (=ucs		  . #x2FF8)	; ⿸
@@ -813,7 +815,26 @@
      ((=ucs		  . #x5DF4)	; å·´
       ))
     (=ucs		. #x5DF5)	; å·µ
-    (=adobe-japan1-0	. 04719)	; &I-AJ1-04719;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x5DF5)	; å·µ
+      ))
+    (ideographic-radical . 49)	; â¼°
+    (ideographic-strokes . 4)
+    (total-strokes	 . 7)
+    (hanyu-dazidian	1 69 27)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs		  . #x2FF8)	; ⿸
+      )
+     ((=ucs		  . #x2008B)	; 𠂋
+      )
+     ((=ucs@unicode	  . #x5DF4)	; &AJ1-03321;
+      (=adobe-japan1-0	  . 03321)	; &AJ1-03321;
+      ))
+    (=ucs@unicode	. #x5DF5)	; &AJ1-04719;
+    (=adobe-japan1-0	. 04719)	; &AJ1-04719;
     (=jis-x0208		. #x5662)	; &I-J90-5662; [54-66]
     (=cns11643-3	. #x2567)	; &I-C3-2567; [05-71]
     (=jis-x0213-1	. #x5662)	; &I-JX1-5662; [54-66]
@@ -822,7 +843,8 @@
     (=gt-k		. 02703)	; &I-GT-K02703;
     (=gt-pj-1		. #x5662)	; &I-GT-11033; [54-66]
     (=daikanwa		. 08751)	; &I-M-08751;
-    (=shinjigen		.  0847)	; å·µ
+    (=daijiten		. 02789)	; &I-DJT-02789;
+    (=shinjigen		.  0847)	; &AJ1-04719;
     (=cbeta		. 01682)	; &I-CB01682;
     (<-vulgar
      ((=ucs@unicode	  . #x536E)	; &AJ1-04317;
@@ -842,11 +864,14 @@
       (==gt		  . 11033)	; &g2-AJ1-04719;
       (==gt-k		  . 02703)	; &g2-AJ1-04719;
       (==daikanwa	  . 08751)	; &g2-AJ1-04719;
+      (==daijiten	  . 02789)	; &g2-AJ1-04719;
       (==shinjigen	  .  0847)	; &g2-AJ1-04719;
       (==cbeta		  . 01682)	; &g2-AJ1-04719;
       (->subsumptive
        ((===daikanwa	    . 08751)	; &R-M-08751;
 	)
+       ((===daijiten	    . 02789)	; &R-DJT-02789;
+	)
        ((===jis-x0208	    . #x5662)	; &R-J0-5662; [54-66]
 	(===jis-x0213-1	    . #x5662)	; &R-J0-5662; [54-66]
 	)