From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 20 Sep 2022 16:03:15 +0000 (+0900)
Subject: (U-0002009C): Apply new conventions for glyph granularity.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5f88c181c93091f0e9f101ff380c9d0c7d1ffe7b;p=chise%2Fxemacs-chise.git

(U-0002009C): Apply new conventions for glyph granularity.
---

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index e510469..3bd18cd 100644
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -2255,6 +2255,21 @@
     ))
 (define-char
   '((ideographic-radical . 4)	; ⼃
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs		  . #x2FF1)	; ⿱
+      )
+     ((=ucs		  . #x4E3F)	; 丿
+      )
+     ((=ucs		  . #x3193B)	; 𱤻
+      ))
+    (=ucs		. #x2009C)	; 𠂜
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x2009C)	; 𠂜
+      ))
+    (ideographic-radical . 4)	; ⼃
     (ideographic-strokes . 3)
     (total-strokes	 . 4)
     (hanyu-dazidian	1 36 3)
@@ -2264,14 +2279,31 @@
       )
      ((=ucs		  . #x4E3F)	; 丿
       )
-     ((=big5-cdp	  . #x88B1)	; &CDP-88B1;
+     ((=ucs@JP/hanazono	  . #x3193B)	; &CDP-88B1;
+      (=big5-cdp	  . #x88B1)	; &CDP-88B1;
       ))
-    (=ucs		. #x2009C)	; 𠂜
-    (=cns11643-6	. #x2145)	; &I-C6-2145; [01-37]
+    (=ucs@iso		. #x2009C)	; &GT-00174;
+    (=cns11643-6	. #x2145)	; &GT-00174; [01-37]
     (=gt		. 00174)	; &I-GT-00174;
     (=gt-pj-2		. #x3124)	; &I-GT-00174; [17-04]
     (=daikanwa		. 00127)	; &I-M-00127;
-    (=hanziku-1		. #xAB77)	; &I-HZK01-AB77;
+    (->subsumptive
+     ((==ucs@iso	  . #x2009C)	; &g2-GT-00174;
+      (==cns11643-6	  . #x2145)	; &g2-GT-00174; [01-37]
+      (==gt		  . 00174)	; &g2-GT-00174;
+      (==daikanwa	  . 00127)	; &g2-GT-00174;
+      (->subsumptive
+       ((===daikanwa	    . 00127)	; &R-M-00127;
+	)
+       ((===cns11643-6	    . #x2145)	; &R-C6-2145; [01-37]
+	)
+       ((===gt		    . 00174)	; &R-GT-00174;
+	)
+       ((===ucs@iso	    . #x2009C)	; &R-U-0002009C;
+	))
+      )
+     ((=hanziku-1	  . #xAB77)	; &HZK01-AB77;
+      ))
     ))
 (define-char
   '((ideographic-radical . 4)	; ⼃