From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 10 May 2016 04:18:57 +0000 (+0900)
Subject: (U+9C32): Use `->denotational' and `->subsumptive'.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7bc924d4e11edb1204cefc3a4177328f55f69ba4;p=chise%2Fxemacs-chise.git-

(U+9C32): Use `->denotational' and `->subsumptive'.
---

diff --git a/lisp/utf-2000/Ideograph-R195-Fish.el b/lisp/utf-2000/Ideograph-R195-Fish.el
index d950406..2d653f1 100644
--- a/lisp/utf-2000/Ideograph-R195-Fish.el
+++ b/lisp/utf-2000/Ideograph-R195-Fish.el
@@ -7249,7 +7249,13 @@
     (=gb12345		. #x7663)	; é°± [86-67]
     ))
 (define-char
-  '((=>ucs		. #x9C32)	; é°²
+  '((ideographic-radical . 195)	; ⿂
+    (=ucs		. #x9C32)	; é°²
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x9C32)	; é°²
+      ))
     (ideographic-radical . 195)	; ⿂
     (ideographic-strokes . 11)
     (total-strokes	 . 22)
@@ -7260,23 +7266,65 @@
     (=gt		. 63057)	; &I-GT-63057;
     (=gt-pj-1		. #x7262)	; &I-GT-63057; [82-66]
     (=daikanwa		. 46416)	; &I-M-46416;
-    (=shinjigen@rev	.  9845)	; &GT-63057;
-    ))
-(define-char
-  '((=>ucs		. #x9C32)	; é°²
-    (morohashi-daikanwa	46416 0 2)
-    (ideographic-radical . 195)	; ⿂
-    (ideographic-strokes . 11)
-    (total-strokes	 . 22)
-    (=cns11643-2	. #x6E61)	; &C2-6E61; [78-65]
+    (->subsumptive
+     ((==ucs@jis	  . #x9C32)	; &g2-GT-63057;
+      (==ucs@ks		  . #x9C32)	; &g2-GT-63057;
+      (==ks-x1001	  . #x6827)	; &g2-GT-63057; [72-07]
+      (==jis-x0208	  . #x7262)	; &g2-GT-63057; [82-66]
+      (==jis-x0213-1	  . #x7262)	; &g2-GT-63057; [82-66]
+      (==gt		  . 63057)	; &g2-GT-63057;
+      (==daikanwa	  . 46416)	; &g2-GT-63057;
+      (->subsumptive
+       ((===daikanwa	    . 46416)	; &R-M-46416;
+	)
+       ((===jis-x0208	    . #x7262)	; &R-J0-7262; [82-66]
+	(===jis-x0213-1	    . #x7262)	; &R-J0-7262; [82-66]
+	)
+       ((===gt		    . 63057)	; &R-GT-63057;
+	)
+       ((===ucs@ks	    . #x9C32)	; &R-K0-6827;
+	(===ks-x1001	    . #x6827)	; &R-K0-6827; [72-07]
+	))
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	46416 0 3)
+  '((<-denotational
+     ((=ucs		  . #x9C32)	; é°²
+      ))
     (ideographic-radical . 195)	; ⿂
-    (ideographic-strokes . 10)
-    (total-strokes	 . 21)
-    (=ucs		. #x9C32)	; é°²
-    (=gb12345		. #x7721)	; é°² [87-01]
+    (=+>ucs@unicode	. #x9C32)	; &o-UU+9C32;
+    (->subsumptive
+     ((ideographic-strokes . 11)
+      (total-strokes	   . 22)
+      (=ucs@cns		  . #x9C32)	; &C2-6E61;
+      (=cns11643-2	  . #x6E61)	; &C2-6E61; [78-65]
+      (=shinjigen	  .  9845)	; &C2-6E61;
+      (<-vulgar
+       ((=ucs@jis	    . #x9F07)	; &AJ1-07450;
+	(=adobe-japan1-0    . 07450)	; &AJ1-07450;
+	(=jis-x0208	    . #x7367)	; &I-J90-7367; [83-71]
+	(=shinjigen	    .  9844)	; &AJ1-07450;
+	))
+      (<-vulgar*sources
+       shinjigen)
+      (->subsumptive
+       ((==shinjigen	    .  9845)	; &g2-SJG2-9845;
+	)
+       ((==ucs@cns	    . #x9C32)	; &g2-CU+9C32;
+	(==cns11643-2	    . #x6E61)	; &g2-CU+9C32; [78-65]
+	))
+      )
+     ((ideographic-strokes . 10)
+      (total-strokes	   . 21)
+      (=ucs@unicode	  . #x9C32)	; &UU+9C32;
+      (=ucs@JP/hanazono	  . nil)
+      (=gb12345		  . #x7721)	; &UU+9C32; [87-01]
+      (->subsumptive
+       ((==ucs@unicode	    . #x9C32)	; &g2-UU+9C32;
+	(==ucs@JP/hanazono  . nil)
+	(==gb12345	    . #x7721)	; &g2-UU+9C32; [87-01]
+	))
+      ))
     ))
 (define-char
   '((ideographic-radical . 195)	; ⿂