Add mappings between CJK Ext-B and CNS 11643 plain 7.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R008-Lid.el

diff --git a/lisp/utf-2000/Ideograph-R008-Lid.el b/lisp/utf-2000/Ideograph-R008-Lid.el
index 502b8cd..afa7d2d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R008-Lid.el
+++ b/lisp/utf-2000/Ideograph-R008-Lid.el
@@ -946,8 +946,8 @@
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
        (=ucs               . #x2FF1)   ; ⿱
        )
-       ((=ucs@iso          . #x20AD3)  ; &CDP-8B7E;
-       (=big5-cdp          . #x8B7E)   ; &CDP-8B7E;
+       ((=ucs@iso          . #x20AD3)  ; 𠫓󠄂
+       (=big5-cdp          . #x8B7E)   ; 𠫓󠄂
        (=daikanwa          . 03058)    ; &I-M-03058;
        )
        ((=big5-cdp         . #x8BED)   ; &GT-10942;
@@ -1925,6 +1925,51 @@
     ))
 (define-char
   '((ideographic-radical . 8)  ; ⼇
+    (ideographic-strokes . 7)
+    (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x4EA0)     ; 亠
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO MIDDLE AND RIGHT")
+       (=ucs               . #x2FF2)   ; ⿲
+       )
+       ((=ucs              . #x5200)   ; 刀
+       )
+       ((=ucs              . #x4E2B)   ; 丫
+       )
+       ((=big5-cdp         . #x89CA)   ; &CDP-89CA;
+       ))
+      ))
+    (=>>big5-cdp       . #x8DEB)       ; &G-CDP-8DEB;
+    (->subsumptive
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+       (=ucs               . #x2FF1)   ; ⿱
+       )
+       ((=ucs@jis          . #x4EA0)   ; 亠󠄀
+       (=jis-x0208         . #x5035)   ; 亠󠄀 [48-21]
+       (=jis-x0213-1       . #x5035)   ; &I-JX1-5035; [48-21]
+       )
+       ((ideographic-structure
+        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO MIDDLE AND RIGHT")
+         (=ucs               . #x2FF2) ; ⿲
+         )
+        ((=ucs               . #x5200) ; 刀
+         )
+        ((=ucs               . #x4E2B) ; 丫
+         )
+        ((=big5-cdp          . #x89CA) ; &CDP-89CA;
+         ))
+       ))
+      (=big5-cdp         . #x8DEB)     ; &CDP-8DEB;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 8)  ; ⼇
     (ideographic-strokes . 8)
     (total-strokes      . 10)
     (ideographic-structure