(U-0002122D): Use `->subsumptive'; unify S-7639; add `<-vulgar' for

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R022-Right-Open-Box.el

diff --git a/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el b/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
index 8b5a0a6..2d59990 100644 (file)
--- a/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
+++ b/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
@@ -540,13 +540,21 @@
     (=hanziku-1                . #xB574)       ; &I-HZK01-B574;
     ))
 (define-char
-  '((ideographic-radical . 22) ; ⼕
+  '((<-denotational
+     ((=ucs              . #x20971)    ; 𠥱
+      ))
+    (ideographic-radical . 22) ; ⼕
     (ideographic-strokes . 5)
     (total-strokes      . 7)
-    (=cbeta            . 06935)        ; &CB06935;
-    (<-unknown
-     ((=ucs              . #x20971)    ; 𠥱
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT")
+      (=ucs              . #x2FF7)     ; ⿷
+      )
+     ((=ucs              . #x531A)     ; 匚
+      )
+     ((=ucs              . #x51FA)     ; 出
       ))
+    (=cbeta            . 06935)        ; &CB06935;
     ))
 (define-char
   '((ideographic-radical . 22) ; ⼕
@@ -1372,14 +1380,7 @@
       )
      ((=ucs              . #x531A)     ; 匚
       )
-     ((ideographic-structure
-       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-       (=ucs               . #x2FF1)   ; ⿱
-       )
-       ((=big5-cdp         . #x8C48)   ; &CDP-8C48;
-       )
-       ((=ucs              . #x8D1D)   ; 贝
-       ))
+     ((=ucs              . #x8D35)     ; 贵
       ))
     (=ucs              . #x532E)       ; 匮
     (=gb2312           . #x5851)       ; &I-G0-5851; [56-49]
@@ -1995,6 +1996,7 @@
     (ideographic-radical . 22) ; ⼕
     (ideographic-strokes . 18)
     (total-strokes      . 20)
+    (=ucs@cns          . #x5336)       ; &C3-5C34;
     (=cns11643-3       . #x5C34)       ; &C3-5C34; [60-20]
     (->subsumptive
      ((==ucs@cns         . #x5336)     ; &g2-CU+5336;
@@ -2015,13 +2017,10 @@
       )
      ((=ucs              . #x531A)     ; 匚
       )
-     ((=ucs@unicode      . #x820A)     ; &HD-JA-6751;
-      (=jis-x0208        . #x6751)     ; &HD-JA-6751; [71-49]
-      (=ks-x1001         . #x4F41)     ; &I-K0-4F41; [47-33]
-      (=jis-x0213-1      . #x6751)     ; &I-JX1-6751; [71-49]
+     ((=ucs@unicode      . #x820A)     ; &AJ1-06300;
+      (=adobe-japan1-0   . 06300)      ; &AJ1-06300;
       ))
-    (=ucs@unicode      . #x5336)       ; &HZK01-B6B8;
-    (=hanziku-1                . #xB6B8)       ; &HZK01-B6B8;
+    (=ucs@unicode      . #x5336)       ; &UU+5336;
     (->subsumptive
      ((ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT")
@@ -2029,10 +2028,15 @@
        )
        ((=ucs              . #x531A)   ; 匚
        )
-       ((==ucs@unicode     . #x820A)   ; &g2-HD-JA-6751;
-       (==jis-x0208        . #x6751)   ; &g2-HD-JA-6751; [71-49]
+       ((==ucs@unicode     . #x820A)   ; &g2-AJ1-06300;
+       (==adobe-japan1-0   . 06300)    ; &g2-AJ1-06300;
        ))
       (==ucs@unicode     . #x5336)     ; &g2-UU+5336;
+      (->subsumptive
+       ((===ucs@unicode            . #x5336)   ; &R-UU+5336;
+       )
+       ((=hanziku-1        . #xB6B8)   ; &HZK01-B6B8;
+       ))
       ))
     ))
 (define-char