From 427497289f8c1cf4d71933afc7f932e4dac2176d Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Sat, 11 Jun 2011 23:24:13 +0000
Subject: [PATCH] Add mappings between CJK Ext B and CNS 11643 plain 7.
 (U+96B8): Use `->subsumptive'. (U-00028F82): Use
 `->subsumptive' to separate representative nodes.

---
 lisp/utf-2000/Ideograph-R171-Slave.el |  116 +++++++++++++++++++++------------
 1 file changed, 73 insertions(+), 43 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R171-Slave.el b/lisp/utf-2000/Ideograph-R171-Slave.el
index cb4d21d..4675177 100644
--- a/lisp/utf-2000/Ideograph-R171-Slave.el
+++ b/lisp/utf-2000/Ideograph-R171-Slave.el
@@ -56,8 +56,13 @@
   '((ideographic-radical . 171)	; ⾪
     (ideographic-strokes . 7)
     (total-strokes	 . 15)
-    (=cns11643-7	. #x2A57)	; &M-41927; [10-55]
-    (=daikanwa		. 41927)	; &I-M-41927;
+    (=ucs		. #x28F79)	; 𨽹
+    (->subsumptive
+     ((=ucs@iso		  . #x28F79)	; &M-41927;
+      (=daikanwa	  . 41927)	; &M-41927;
+      )
+     ((=cns11643-7	  . #x2A57)	; &C7-2A57; [10-55]
+      ))
     ))
 (define-char
   '((ideographic-radical . 171)	; ⾪
@@ -65,8 +70,10 @@
     (total-strokes	 . 16)
     (=ucs		. #x96B7)	; 隷
     (->subsumptive
-     ((=cns11643-3	  . #x5349)	; &M-41928; [51-41]
-      (=daikanwa	  . 41928)	; &I-M-41928;
+     ((=daikanwa	  . 41928)	; &M-41928;
+      )
+     ((=ucs@cns		  . #x96B7)	; &C3-5349;
+      (=cns11643-3	  . #x5349)	; &C3-5349; [51-41]
       )
      ((=ucs@unicode	  . #x96B7)	; &GT-56345;
       (=jis-x0208	  . #x4E6C)	; &GT-56345; [46-76]
@@ -74,7 +81,7 @@
       (=jis-x0213-1	  . #x4E6C)	; &I-JX1-4E6C; [46-76]
       (=gt		  . 56345)	; &I-GT-56345;
       (=gt-pj-1		  . #x4E6C)	; &I-GT-56345; [46-76]
-      (=shinjigen@rev	  .  8938)	; &GT-56345;
+      (=shinjigen	  .  8938)	; &GT-56345;
       ))
     ))
 (define-char
@@ -82,21 +89,29 @@
     (ideographic-strokes . 8)
     (total-strokes	 . 16)
     (=ucs		. #x28F7C)	; 𨽼
-    (=cns11643-5	. #x5945)	; &I-C5-5945; [57-37]
-    (=daikanwa		. 41929)	; &I-M-41929;
+    (->subsumptive
+     ((=>>>ucs@iso	  . #x28F7C)	; &g2-IU+28F7C;
+      (->subsumptive
+       ((=daikanwa	    . 41929)	; &M-41929;
+	)
+       ((=ucs@iso	    . #x28F7C)	; &U-00028F7C;
+	))
+      )
+     ((=cns11643-5	  . #x5945)	; &C5-5945; [57-37]
+      ))
     ))
 (define-char
   '((ideographic-radical . 171)	; ⾪
     (ideographic-strokes . 8)
     (total-strokes	 . 16)
-    (=daikanwa		. 41930)	; &M-41930;
-    ))
-(define-char
-  '((morohashi-daikanwa	41930 0 9)
-    (ideographic-radical . 171)	; ⾪
-    (ideographic-strokes . 8)
-    (total-strokes	 . 16)
-    (=cns11643-7	. #x3521)	; &C7-3521; [21-01]
+    (=ucs		. #x28F7D)	; 𨽽
+    (->subsumptive
+     ((=daikanwa	  . 41930)	; &M-41930;
+      )
+     ((=ucs@iso		  . #x28F7D)	; &U-00028F7D;
+      )
+     ((=cns11643-7	  . #x3521)	; &C7-3521; [21-01]
+      ))
     ))
 (define-char
   '((ideographic-radical . 171)	; ⾪
@@ -114,47 +129,48 @@
     (=cns11643-4	. #x5956)	; &C4-5956; [57-54]
     ))
 (define-char
-  '((=>ucs		. #x96B8)	; 隸
-    (ideographic-radical . 171)	; ⾪
-    (ideographic-strokes . 9)
-    (total-strokes	 . 17)
-    (=cns11643-1	. #x7622)	; &M-41932; [86-02]
-    (=daikanwa		. 41932)	; &I-M-41932;
-    ))
-(define-char
-  '((morohashi-daikanwa	41932 0 0)
-    (ideographic-radical . 171)	; ⾪
+  '((ideographic-radical . 171)	; ⾪
     (ideographic-strokes . 9)
     (total-strokes	 . 17)
     (=ucs		. #x96B8)	; 隸
-    (=jis-x0208		. #x7031)	; &I-J90-7031; [80-17]
-    (=jis-x0213-1	. #x7031)	; &I-JX1-7031; [80-17]
-    (=gb12345		. #x4125)	; 隸 [33-05]
-    (=gt		. 56348)	; &I-GT-56348;
-    (=gt-pj-1		. #x7031)	; &I-GT-56348; [80-17]
-    (=shinjigen@rev	.  8939)	; 隸
+    (->subsumptive
+     ((=daikanwa	  . 41932)	; &M-41932;
+      )
+     ((=cns11643-1	  . #x7622)	; &C1-7622; [86-02]
+      )
+     ((=ucs@unicode	  . #x96B8)	; &GT-56348;
+      (=jis-x0208	  . #x7031)	; &GT-56348; [80-17]
+      (=jis-x0213-1	  . #x7031)	; &I-JX1-7031; [80-17]
+      (=gb12345		  . #x4125)	; &GT-56348; [33-05]
+      (=gt		  . 56348)	; &I-GT-56348;
+      (=gt-pj-1		  . #x7031)	; &I-GT-56348; [80-17]
+      (=shinjigen	  .  8939)	; &GT-56348;
+      ))
     ))
 (define-char
   '((ideographic-radical . 171)	; ⾪
     (ideographic-strokes . 10)
     (total-strokes	 . 18)
-    (=daikanwa		. 41933)	; &M-41933;
-    ))
-(define-char
-  '((morohashi-daikanwa	41933 0 0)
-    (ideographic-radical . 171)	; ⾪
-    (ideographic-strokes . 10)
-    (total-strokes	 . 18)
-    (=cns11643-7	. #x444D)	; &C7-444D; [36-45]
+    (=ucs		. #x28F80)	; 𨾀
+    (->subsumptive
+     ((=daikanwa	  . 41933)	; &M-41933;
+      )
+     ((=cns11643-7	  . #x444D)	; &C7-444D; [36-45]
+      )
+     ((=ucs@iso		  . #x28F80)	; &U-00028F80;
+      ))
     ))
 (define-char
   '((ideographic-radical . 171)	; ⾪
     (ideographic-strokes . 10)
     (total-strokes	 . 18)
+    (=ucs		. #x28F81)	; 𨾁
     (->subsumptive
      ((=daikanwa	  . 41934)	; &M-41934;
       )
      ((=cns11643-7	  . #x444E)	; &C7-444E; [36-46]
+      )
+     ((=ucs@iso		  . #x28F81)	; &U-00028F81;
       ))
     ))
 (define-char
@@ -162,13 +178,27 @@
     (ideographic-strokes . 11)
     (total-strokes	 . 19)
     (=ucs		. #x28F82)	; 𨾂
-    (=cns11643-5	. #x6A3E)	; &I-C5-6A3E; [74-30]
-    (=daikanwa		. 41935)	; &I-M-41935;
+    (->subsumptive
+     ((=daikanwa	  . 41935)	; &M-41935;
+      )
+     ((=ucs@iso		  . #x28F82)	; &U-00028F82;
+      )
+     ((=cns11643-5	  . #x6A3E)	; &C5-6A3E; [74-30]
+      ))
     ))
 (define-char
   '((ideographic-radical . 171)	; ⾪
     (ideographic-strokes . 12)
     (total-strokes	 . 20)
-    (=cns11643-7	. #x507B)	; &M-41936; [48-91]
-    (=daikanwa		. 41936)	; &I-M-41936;
+    (=ucs		. #x28F83)	; 𨾃
+    (->subsumptive
+     ((=>>>ucs@iso	  . #x28F83)	; &g2-IU+28F83;
+      (->subsumptive
+       ((=daikanwa	    . 41936)	; &M-41936;
+	)
+       ((=ucs@iso	    . #x28F83)	; &U-00028F83;
+	))
+      )
+     ((=cns11643-7	  . #x507B)	; &C7-507B; [48-91]
+      ))
     ))
-- 
1.7.10.4