X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R138-Stopping.el;h=4702d8ac074888ab2c376e785a9633634afb6aa4;hb=ec2ee044866c8a2192561706007e4d9fcd5691a8;hp=4bc68028bd61ed8aad1c327bf0931cb3cad79d43;hpb=72da096bf7c900292af5c7b8fd83d02b10c76980;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 4bc6802..4702d8a 100644
--- a/lisp/utf-2000/Ideograph-R138-Stopping.el
+++ b/lisp/utf-2000/Ideograph-R138-Stopping.el
@@ -30,24 +30,52 @@
     (ideographic-strokes . 1)
     (total-strokes	 . 7)
     (=ucs		. #x826F)	; 良
+    (=jis-x0208		. #x4E49)	; &I-J90-4E49; [46-41]
+    (=gb2312		. #x413C)	; &I-G0-413C; [33-28]
+    (=ks-x1001		. #x555E)	; &I-K0-555E; [53-62]
+    (=cns11643-1	. #x4B40)	; &I-C1-4B40; [43-32]
+    (=jis-x0213-1	. #x4E49)	; &I-JX1-4E49; [46-41]
     (=big5		. #xA87D)	; &I-B-A87D;
+    (=gt		. 39586)	; &I-GT-39586;
+    (=gt-k		. 02672)	; &I-GT-K02672;
+    (=gt-pj-1		. #x4E49)	; &I-GT-39586; [46-41]
+    (=daikanwa		. 30597)	; &I-M-30597;
+    (=shinjigen		.  6671)	; 良
     (->subsumptive
-     ((=ucs@jis		  . #x826F)	; &GT-39586;
-      (=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]
-      (=daikanwa	  . 30597)	; &I-M-30597;
-      (=shinjigen	  .  6671)	; &GT-39586;
-      )
-     ((=ucs@unicode	  . #x826F)	; &C1-4B40;
-      (=gb2312		  . #x413C)	; &C1-4B40; [33-28]
-      (=cns11643-1	  . #x4B40)	; &I-C1-4B40; [43-32]
+     ((==ucs@unicode	  . #x826F)	; &g2-GT-39586;
+      (==gb2312		  . #x413C)	; &g2-GT-39586; [33-28]
+      (==ks-x1001	  . #x555E)	; &g2-GT-39586; [53-62]
+      (==jis-x0208	  . #x4E49)	; &g2-GT-39586; [46-41]
+      (==cns11643-1	  . #x4B40)	; &g2-GT-39586; [43-32]
+      (==jis-x0213-1	  . #x4E49)	; &g2-GT-39586; [46-41]
+      (==gt		  . 39586)	; &g2-GT-39586;
+      (==gt-k		  . 02672)	; &g2-GT-39586;
+      (==daikanwa	  . 30597)	; &g2-GT-39586;
+      (==shinjigen	  .  6671)	; &g2-GT-39586;
+      (->subsumptive
+       ((===daikanwa	    . 30597)	; &R-M-30597;
+	)
+       ((===jis-x0208	    . #x4E49)	; &R-J0-4E49; [46-41]
+	(===jis-x0213-1	    . #x4E49)	; &R-J0-4E49; [46-41]
+	)
+       ((===ucs@ks	    . #x826F)	; &R-K0-555E;
+	(===ks-x1001	    . #x555E)	; &R-K0-555E; [53-62]
+	)
+       ((===gt		    . 39586)	; &R-GT-39586;
+	(===gt-k	    . 02672)	; &R-GT-39586;
+	)
+       ((===ucs@unicode	    . #x826F)	; &R-UU+826F;
+	)
+       ((===cns11643-1	    . #x4B40)	; &R-C1-4B40; [43-32]
+	)
+       ((===gt		    . 39586)	; &R-GT-39586;
+	(===gt-k	    . 02672)	; &R-GT-39586;
+	))
       )
      ((=gt-k		  . 02674)	; &GT-K02674;
       (=gt-pj-k1	  . #x3B7A)	; &GT-K02674; [27-90]
+      )
+     ((===hng-khi	  . 05390)	; &HNG010-05390;
       ))
     ))
 (define-char
@@ -59,25 +87,36 @@
     (total-strokes	 . 7)
     (=gt-k		. 02673)	; &GT-K02673;
     (=gt-pj-k1		. #x374D)	; &GT-K02673; [23-45]
-    (<-identical@component/connect-right
-     ((=ucs@jis		  . #x826F)	; &GT-39586;
-      (=jis-x0208	  . #x4E49)	; &GT-39586; [46-41]
-      (=ks-x1001	  . #x555E)	; &I-K0-555E; [53-62]
-      (=jis-x0213-1	  . #x4E49)	; &I-JX1-4E49; [46-41]
-      (=daikanwa	  . 30597)	; &I-M-30597;
+    (<-formed@component/connect-right
+     ((=ucs		  . #x826F)	; 良
+      ))
+    (->subsumptive
+     ((==gt-k		  . 02673)	; &g2-GT-K02673;
+      (<-formed@component/connect-right
+       ((==ucs@unicode	    . #x826F)	; &g2-GT-39586;
+	(==jis-x0208	    . #x4E49)	; &g2-GT-39586; [46-41]
+	))
       ))
     ))
 (define-char
-  '((ideographic-radical . 138)	; ⾉
+  '((<-denotational
+     ((=ucs		  . #x826F)	; 良
+      ))
+    (ideographic-radical . 138)	; ⾉
     (ideographic-strokes . 1)
     (total-strokes	 . 6)
     (=big5-cdp		. #x8C42)	; &CDP-8C42;
     (<-simplified@component
-     ((=ucs@jis		  . #x826F)	; &GT-39586;
-      (=jis-x0208	  . #x4E49)	; &GT-39586; [46-41]
-      (=ks-x1001	  . #x555E)	; &I-K0-555E; [53-62]
-      (=jis-x0213-1	  . #x4E49)	; &I-JX1-4E49; [46-41]
-      (=daikanwa	  . 30597)	; &I-M-30597;
+     ((=gt-k		  . 02673)	; &GT-K02673;
+      ))
+    (<-simplified@component/connect-right
+     ((=ucs		  . #x826F)	; 良
+      ))
+    (->subsumptive
+     ((==big5-cdp	  . #x8C42)	; &g2-CDP-8C42;
+      (<-simplified@component
+       ((==gt-k		    . 02673)	; &g2-GT-K02673;
+	))
       ))
     ))
 (define-char