X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R138-Stopping.el;h=9f3abdf30d511309913eba9bc32d5f61406032ae;hb=fbb862955b19daa92bb6c71b977ea235c95c020f;hp=2dff51179cc9cbb700f15ad24adac43bab44438c;hpb=c47c8a0b96cf04d90da5f65c6a300d83993f5e2d;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/Ideograph-R138-Stopping.el b/lisp/utf-2000/Ideograph-R138-Stopping.el
index 2dff511..9f3abdf 100644
--- a/lisp/utf-2000/Ideograph-R138-Stopping.el
+++ b/lisp/utf-2000/Ideograph-R138-Stopping.el
@@ -31,24 +31,45 @@
     (total-strokes	 . 7)
     (=ucs		. #x826F)	; 良
     (=big5		. #xA87D)	; &I-B-A87D;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x826F)	; 良
+      ))
+    (ideographic-radical . 138)	; ⾉
+    (ideographic-strokes . 1)
+    (total-strokes	 . 7)
+    (=ucs@unicode	. #x826F)	; &GT-39586;
+    (=jis-x0208		. #x4E49)	; &GT-39586; [46-41]
+    (=gb2312		. #x413C)	; &I-G0-413C; [33-28]
+    (=jis-x0213-1	. #x4E49)	; &I-JX1-4E49; [46-41]
+    (=gt		. 39586)	; &I-GT-39586;
+    (=gt-k		. 02672)	; &I-GT-K02672;
+    (=gt-pj-1		. #x4E49)	; &I-GT-39586; [46-41]
     (->subsumptive
-     ((=jis-x0208	  . #x4E49)	; &GT-39586; [46-41]
-      (=ks-x1001	  . #x555E)	; &I-K0-555E; [53-62]
-      (=jis-x0213-1	  . #x4E49)	; &I-JX1-4E49; [46-41]
-      (=gt		  . 39586)	; &I-GT-39586;
-      (=gt-k		  . 02672)	; &I-GT-K02672;
-      (=gt-pj-1		  . #x4E49)	; &I-GT-39586; [46-41]
+     ((==ucs@jis	  . #x826F)	; &R-GT-39586;
+      (=ks-x1001	  . #x555E)	; &R-GT-39586; [53-62]
+      (==jis-x0208	  . #x4E49)	; &R-GT-39586; [46-41]
+      (==jis-x0213-1	  . #x4E49)	; &R-GT-39586; [46-41]
+      (==gt		  . 39586)	; &R-GT-39586;
+      (==gt-k		  . 02672)	; &R-GT-39586;
       (=daikanwa	  . 30597)	; &I-M-30597;
-      (=shinjigen	  .  6671)	; &GT-39586;
-      (=ucs@jis		  . #x826F)	; &GT-39586;
-      )
-     ((=gb2312		  . #x413C)	; &C1-4B40; [33-28]
-      (=cns11643-1	  . #x4B40)	; &I-C1-4B40; [43-32]
-      (=ucs@unicode	  . #x826F)	; &C1-4B40;
+      (=shinjigen	  .  6671)	; &R-GT-39586;
       )
-     ((=gt-k		  . 02674)	; &GT-K02674;
-      (=gt-pj-k1	  . #x3B7A)	; &GT-K02674; [27-90]
+     ((==ucs@unicode	  . #x826F)	; &C1-4B40;
+      (==gb2312		  . #x413C)	; &C1-4B40; [33-28]
+      (=cns11643-1	  . #x4B40)	; &C1-4B40; [43-32]
+      ))
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs		  . #x826F)	; 良
       ))
+    (ideographic-radical . 138)	; ⾉
+    (ideographic-strokes . 1)
+    (total-strokes	 . 7)
+    (=gt-k		. 02674)	; &GT-K02674;
+    (=gt-pj-k1		. #x3B7A)	; &GT-K02674; [27-90]
     ))
 (define-char
   '((<-denotational
@@ -58,24 +79,46 @@
     (ideographic-strokes . 1)
     (total-strokes	 . 7)
     (=gt-k		. 02673)	; &GT-K02673;
+    (=>>gt-k		. 02673)	; &GT-K02673;
     (=gt-pj-k1		. #x374D)	; &GT-K02673; [23-45]
-    (<-identical@component/connect-right
-     ((=jis-x0208	  . #x4E49)	; &GT-39586; [46-41]
-      (=ks-x1001	  . #x555E)	; &I-K0-555E; [53-62]
+    (<-formed@component/connect-right
+     ((=ucs@unicode	  . #x826F)	; &GT-39586;
+      (=jis-x0208	  . #x4E49)	; &GT-39586; [46-41]
+      (=gb2312		  . #x413C)	; &I-G0-413C; [33-28]
       (=jis-x0213-1	  . #x4E49)	; &I-JX1-4E49; [46-41]
-      (=daikanwa	  . 30597)	; &I-M-30597;
+      ))
+    (->subsumptive
+     ((==gt-k		  . 02673)	; &R-GT-K02673;
+      (<-formed@component/connect-right
+       ((==ucs@jis	    . #x826F)	; &R-GT-39586;
+	(=ks-x1001	    . #x555E)	; &R-GT-39586; [53-62]
+	(=daikanwa	    . 30597)	; &I-M-30597;
+	))
       ))
     ))
 (define-char
-  '((ideographic-radical . 138)	; ⾉
+  '((<-denotational
+     ((=ucs		  . #x826F)	; 良
+      ))
+    (ideographic-radical . 138)	; ⾉
     (ideographic-strokes . 1)
     (total-strokes	 . 6)
     (=big5-cdp		. #x8C42)	; &CDP-8C42;
+    (=>>big5-cdp	. #x8C42)	; &CDP-8C42;
     (<-simplified@component
-     ((=jis-x0208	  . #x4E49)	; &GT-39586; [46-41]
-      (=ks-x1001	  . #x555E)	; &I-K0-555E; [53-62]
+     ((=gt-k		  . 02673)	; &GT-K02673;
+      ))
+    (<-simplified@component/connect-right
+     ((=ucs@unicode	  . #x826F)	; &GT-39586;
+      (=jis-x0208	  . #x4E49)	; &GT-39586; [46-41]
+      (=gb2312		  . #x413C)	; &I-G0-413C; [33-28]
       (=jis-x0213-1	  . #x4E49)	; &I-JX1-4E49; [46-41]
-      (=daikanwa	  . 30597)	; &I-M-30597;
+      ))
+    (->subsumptive
+     ((==big5-cdp	  . #x8C42)	; &R-CDP-8C42;
+      (<-simplified@component
+       ((==gt-k		    . 02673)	; &R-GT-K02673;
+	))
       ))
     ))
 (define-char