From b4ffc0d2d2e4d11af84a643a2c0f69d0476c55bc Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Mon, 13 Dec 2004 13:29:44 +0000
Subject: [PATCH] - Add some `=ucs@cns' features. - Use `->subsumptive' or
 `{<-|->}denotational' for some character   definitions.

---
 lisp/utf-2000/Ideograph-R080-Do-Not.el  |   20 +++++------
 lisp/utf-2000/Ideograph-R081-Compare.el |   58 ++++++++++++++-----------------
 2 files changed, 36 insertions(+), 42 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R080-Do-Not.el b/lisp/utf-2000/Ideograph-R080-Do-Not.el
index b1ad3d9..01ffd44 100644
--- a/lisp/utf-2000/Ideograph-R080-Do-Not.el
+++ b/lisp/utf-2000/Ideograph-R080-Do-Not.el
@@ -102,20 +102,18 @@
     (=cns11643-6	. #x283D)	; &I-C6-283D; [08-29]
     ))
 (define-char
-  '((=>ucs		. #x6BD0)	; 毐
-    (ideographic-radical . 80)	; ⽏
-    (ideographic-strokes . 3)
-    (total-strokes	 . 7)
-    (=cns11643-2	. #x2448)	; &M-16727; [04-40]
-    (=big5		. #xCB48)	; &I-B-CB48;
-    (=daikanwa		. 16727)	; &I-M-16727;
-    ))
-(define-char
-  '((morohashi-daikanwa	16727 0 2)
-    (ideographic-radical . 80)	; ⽏
+  '((ideographic-radical . 80)	; ⽏
     (ideographic-strokes . 3)
     (total-strokes	 . 7)
     (=ucs		. #x6BD0)	; 毐
+    (->subsumptive
+     ((=cns11643-2	  . #x2448)	; &M-16727; [04-40]
+      (=big5		  . #xCB48)	; &I-B-CB48;
+      (=daikanwa	  . 16727)	; &I-M-16727;
+      (=ucs@cns		  . #x6BD0)	; &M-16727;
+      )
+     ((=ucs@unicode	  . #x6BD0)	; &UU+6BD0;
+      ))
     ))
 (define-char
   '((ideographic-radical . 80)	; ⽏
diff --git a/lisp/utf-2000/Ideograph-R081-Compare.el b/lisp/utf-2000/Ideograph-R081-Compare.el
index 0fe78a2..adacecc 100644
--- a/lisp/utf-2000/Ideograph-R081-Compare.el
+++ b/lisp/utf-2000/Ideograph-R081-Compare.el
@@ -126,21 +126,19 @@
     (ideographic-strokes . 5)
     (total-strokes	 . 9)
     (=ucs		. #x6BD6)	; 毖
-    (=gb2312		. #x3151)	; &I-G0-3151; [17-49]
-    (=ks-x1001		. #x5D70)	; &I-K0-5D70; [61-80]
-    (=jis-x0212		. #x4638)	; &I-JSP-4638; [38-24]
-    (=jis-x0213-1-2000	. #x764B)	; &I-JX1-764B; [86-43]
-    (=big5		. #xCF68)	; &I-B-CF68;
-    (=daikanwa		. 16750)	; &I-M-16750;
-    (=jef-china3	. #x54F8)	; &I-JC3-54F8;
-    ))
-(define-char
-  '((=>ucs		. #x6BD6)	; 毖
-    (morohashi-daikanwa	16750 0 1)
-    (ideographic-radical . 81)	; ⽐
-    (ideographic-strokes . 5)
-    (total-strokes	 . 9)
-    (=cns11643-2	. #x2B4A)	; &C2-2B4A; [11-42]
+    (->subsumptive
+     ((=gb2312		  . #x3151)	; &M-16750; [17-49]
+      (=ks-x1001	  . #x5D70)	; &I-K0-5D70; [61-80]
+      (=jis-x0212	  . #x4638)	; &I-JSP-4638; [38-24]
+      (=jis-x0213-1-2000  . #x764B)	; &I-JX1-764B; [86-43]
+      (=big5		  . #xCF68)	; &I-B-CF68;
+      (=daikanwa	  . 16750)	; &I-M-16750;
+      (=jef-china3	  . #x54F8)	; &I-JC3-54F8;
+      (=ucs@unicode	  . #x6BD6)	; &M-16750;
+      )
+     ((=cns11643-2	  . #x2B4A)	; &C2-2B4A; [11-42]
+      (=ucs@cns		  . #x6BD6)	; &C2-2B4A;
+      ))
     ))
 (define-char
   '((=>ucs		. #x3C8B)	; 㲋
@@ -181,23 +179,21 @@
   '((ideographic-radical . 81)	; ⽐
     (ideographic-strokes . 5)
     (total-strokes	 . 9)
-    (shinjigen-2	. 4013)
     (=ucs		. #x6BD8)	; 毘
-    (=jis-x0208		. #x487B)	; &I-J90-487B; [40-91]
-    (=ks-x1001		. #x5D72)	; &I-K0-5D72; [61-82]
-    (=big5		. #xCF69)	; &I-B-CF69;
-    (=gt		. 21470)	; &I-GT-21470;
-    (=gt-k		. 05164)	; &I-GT-K05164;
-    (=gt-pj-1		. #x487B)	; &I-GT-21470; [40-91]
-    (=daikanwa		. 16753)	; &I-M-16753;
-    ))
-(define-char
-  '((=>ucs		. #x6BD8)	; 毘
-    (morohashi-daikanwa	16753 0 1)
-    (ideographic-radical . 81)	; ⽐
-    (ideographic-strokes . 5)
-    (total-strokes	 . 9)
-    (=cns11643-2	. #x2B4B)	; &C2-2B4B; [11-43]
+    (->subsumptive
+     ((shinjigen-2	  . 4013)
+      (=jis-x0208	  . #x487B)	; &GT-21470; [40-91]
+      (=ks-x1001	  . #x5D72)	; &I-K0-5D72; [61-82]
+      (=big5		  . #xCF69)	; &I-B-CF69;
+      (=gt		  . 21470)	; &I-GT-21470;
+      (=gt-k		  . 05164)	; &I-GT-K05164;
+      (=gt-pj-1		  . #x487B)	; &I-GT-21470; [40-91]
+      (=daikanwa	  . 16753)	; &I-M-16753;
+      (=ucs@unicode	  . #x6BD8)	; &GT-21470;
+      )
+     ((=cns11643-2	  . #x2B4B)	; &C2-2B4B; [11-43]
+      (=ucs@cns		  . #x6BD8)	; &C2-2B4B;
+      ))
     ))
 (define-char
   '((ideographic-radical . 81)	; ⽐
-- 
1.7.10.4