(U+5332): Use `<-vulgar-ideograph' instead of

`vulgar-char-of-shinjigen-1'; add `ideographic-structure'; unify
CB-02324.
(U+5333): Add `ideographic-structure'; unify CB-00633.
(M-02662): Add `ideographic-structure'; unify CB-05235.

diff --git a/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el b/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
index 30d059d..3cde6a3 100644 (file)
--- a/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
+++ b/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
@@ -845,11 +845,32 @@
   '((ideographic-radical . 22) ; ⼕
     (ideographic-strokes . 12)
     (total-strokes      . 14)
+    (<-vulgar-ideograph
+     (:sources (shinjigen-1)
+      :char    ((shinjigen-1        . 796)
+                (ideograph-daikanwa . 02655)   ; �����
+                )
+      ))
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT")
+      (ucs               . #x2FF7)     ; ⿷
+      )
+     ((ucs               . #x531A)     ; 匚
+      )
+     ((ideographic-structure
+       ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+       (ucs                . #x2FF1)   ; ⿱
+       )
+       ((ucs               . #x5927)   ; 大
+       )
+       ((ucs               . #x54C1)   ; 品
+       ))
+      ))
     (shinjigen-1       . 798)
-    (vulgar-char-of-shinjigen-1 . 796)
     (japanese-jisx0212 . #x3431)       ; �����
     (chinese-cns11643-3 . #x4623)      ; �����
     (ideograph-daikanwa . 02652)       ; �����
+    (ideograph-cbeta   . 02324)        ; �����
     (ucs               . #x5332)       ; 匲
     ))
 (define-char
@@ -870,6 +891,14 @@
   '((ideographic-radical . 22) ; ⼕
     (ideographic-strokes . 13)
     (total-strokes      . 15)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT")
+      (ucs               . #x2FF7)     ; ⿷
+      )
+     ((ucs               . #x531A)     ; 匚
+      )
+     ((ucs               . #x50C9)     ; 僉
+      ))
     (shinjigen-1       . 796)
     (shinjigen-2       . 796)
     (japanese-jisx0208-1978    . #x523D)       ; �����
@@ -877,6 +906,7 @@
     (chinese-cns11643-3                . #x4B34)       ; �����
     (japanese-jisx0208-1990    . #x523D)       ; �����
     (ideograph-daikanwa                . 02655)        ; �����
+    (ideograph-cbeta           . 00633)        ; �����
     (ucs                       . #x5333)       ; 匳
     ))
 (define-char
@@ -943,10 +973,19 @@
   '((ideographic-radical . 22) ; ⼕
     (ideographic-strokes . 15)
     (total-strokes      . 17)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LEFT")
+      (ucs               . #x2FF7)     ; ⿷
+      )
+     ((ucs               . #x531A)     ; 匚
+      )
+     ((ucs               . #x8CE3)     ; 賣
+      ))
     (japanese-jisx0212         . #x3432)       ; �����
     (chinese-cns11643-3                . #x5444)       ; �����
     (japanese-jisx0213-2       . #x234F)       ; �����
     (ideograph-daikanwa                . 02662)        ; �����
+    (ideograph-cbeta           . 05235)        ; �����
     (ucs                       . #x5335)       ; 匵
     ))
 (define-char