From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 10 Dec 2017 03:33:58 +0000 (+0900)
Subject: (U-00023D92): Apply new conventions for glyph granularity; add
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=47c39132eb3895b20d98ec7fde624e7034a972a1;p=chise%2Fxemacs-chise.git

(U-00023D92): Apply new conventions for glyph granularity; add
`<-denotational' for A-cgnU+23D92.
---

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index fd00290..1706b65 100644
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -2725,7 +2725,10 @@
       ))
     ))
 (define-char
-  '((ideographic-radical@ucs . 85)	; ⽔
+  '((<-denotational
+     ((=>ucs@cognate	  . #x23D92)	; &A-cgnU+23D92;
+      ))
+    (ideographic-radical@ucs . 85)	; ⽔
     (ideographic-strokes@ucs . 8)
     (ideographic-radical@cns . 2)	; ⼁
     (ideographic-strokes@cns . 7)
@@ -2752,17 +2755,47 @@
      ((=ucs		  . #x4E00)	; 一
       ))
     (=ucs		. #x23D92)	; 𣶒
+    (=cns11643-4	. #x252F)	; &I-C4-252F; [05-15]
+    (=big5-cdp		. #x8DD9)	; &I-CDP-8DD9;
+    (=gt		. 00119)	; &I-GT-00119;
+    (=gt-pj-2		. #x3060)	; &I-GT-00119; [16-64]
+    (=daikanwa		. 00084)	; &I-M-00084;
     (->subsumptive
-     ((=ucs@iso		  . #x23D92)	; &GT-00119;
-      (=cns11643-4	  . #x252F)	; &GT-00119; [05-15]
-      (=gt		  . 00119)	; &I-GT-00119;
-      (=gt-pj-2		  . #x3060)	; &I-GT-00119; [16-64]
-      (=daikanwa	  . 00084)	; &I-M-00084;
-      )
-     ((=big5-cdp	  . #x8DD9)	; &GT-00120;
-      (=gt		  . 00120)	; &I-GT-00120;
+     ((=>>ucs@iso	  . #x23D92)	; &G-GT-00119;
+      (=>>cns11643-4	  . #x252F)	; &G-GT-00119; [05-15]
+      (=>>gt		  . 00119)	; &G-GT-00119;
+      (=>>daikanwa	  . 00084)	; &G-GT-00119;
+      (->subsumptive
+       ((==ucs@iso	    . #x23D92)	; &g2-GT-00119;
+	(==cns11643-4	    . #x252F)	; &g2-GT-00119; [05-15]
+	(==gt		    . 00119)	; &g2-GT-00119;
+	(==daikanwa	    . 00084)	; &g2-GT-00119;
+	(->subsumptive
+	 ((===daikanwa	      . 00084)	; &R-M-00084;
+	  )
+	 ((===cns11643-4      . #x252F)	; &R-C4-252F; [05-15]
+	  )
+	 ((===gt	      . 00119)	; &R-GT-00119;
+	  )
+	 ((===ucs@iso	      . #x23D92)	; &R-U-00023D92;
+	  ))
+	))
+      )
+     ((=>>big5-cdp	  . #x8DD9)	; &GT-00120;
+      (=gt		  . 00120)	; &GT-00120;
       (=gt-k		  . 06263)	; &I-GT-K06263;
-      (=gt-pj-9		  . #x4B25)	; &I-GT-00120; [43-05]
+      (=gt-pj-9		  . #x4B25)	; &GT-00120; [43-05]
+      (->subsumptive
+       ((==big5-cdp	    . #x8DD9)	; &g2-GT-00120;
+	(==gt		    . 00120)	; &g2-GT-00120;
+	(==gt-k		    . 06263)	; &g2-GT-00120;
+	(->subsumptive
+	 ((===big5-cdp	      . #x8DD9)	; &R-CDP-8DD9;
+	  )
+	 ((===gt	      . 00120)	; &R-GT-00120;
+	  (===gt-k	      . 06263)	; &R-GT-00120;
+	  ))
+	))
       ))
     ))
 (define-char