(U+5F17): Add `<-denotational@usage' for BUCS+5F17; add

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R031-Enclosure.el

diff --git a/lisp/utf-2000/Ideograph-R031-Enclosure.el b/lisp/utf-2000/Ideograph-R031-Enclosure.el
index 1e41f36..9dc64d0 100644 (file)
--- a/lisp/utf-2000/Ideograph-R031-Enclosure.el
+++ b/lisp/utf-2000/Ideograph-R031-Enclosure.el
@@ -934,6 +934,15 @@
     (ideographic-radical . 31) ; ⼞
     (ideographic-strokes . 3)
     (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND")
+      (=ucs              . #x2FF4)     ; ⿴
+      )
+     ((=ucs              . #x56D7)     ; 囗
+      )
+     ((name              . "CJK RADICAL SMALL ONE")
+      (=ucs              . #x2E8C)     ; ⺌
+      ))
     (=big5-cdp         . #x8B62)       ; &CDP-8B62;
     (->subsumptive
      ((==big5-cdp        . #x8B62)     ; &g2-CDP-8B62;
@@ -1244,6 +1253,24 @@
       )
      ((=big5-cdp         . #x8CC8)     ; &CDP-8CC8;
       )
+     ((=>ucs@iwds-1      . #x4EBA)     ; &A-IWDSU+4EBA;
+      (=>iwds-1                  .  14623)     ; &A-IWDSU+4EBA;
+      ))
+    (=>ucs-itaiji-007  . #x56DF)       ; &A-U-i007+56DF;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-007          . #x56DF)     ; &A-U-i007+56DF;
+      ))
+    (ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 3)
+    (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND")
+      (=ucs              . #x2FF4)     ; ⿴
+      )
+     ((=big5-cdp         . #x8CC8)     ; &CDP-8CC8;
+      )
      ((=ucs              . #x4EBA)     ; 人
       ))
     (=ucs-itaiji-007   . #x56DF)       ; &U-i007+56DF;
@@ -2303,7 +2330,8 @@
     (->mistakable*sources
      kangxi-biansi-2char daikanwa)
     (->vulgar
-     ((=ucs              . #x7A93)     ; 窓
+     ((=ucs@unicode      . #x7A93)     ; &AJ1-02797;
+      (=adobe-japan1-0   . 02797)      ; &AJ1-02797;
       (=daikanwa         . 25494)      ; &I-M-25494;
       ))
     (->vulgar*sources
@@ -4190,6 +4218,28 @@
     (ideographic-strokes . 5)
     (total-strokes      . 8)
     (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND")
+      (=ucs              . #x2FF4)     ; ⿴
+      )
+     ((=ucs              . #x56D7)     ; 囗
+      )
+     ((=ucs              . #x5360)     ; 占
+      ))
+    (=ucs              . #x3024F)      ; 𰉏
+    (=ruimoku-v6       . #xE0BD)       ; &I-RUI6-E0BD;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x3024F)   ; &g2-hanaJU+3024F;
+      (==ruimoku-v6      . #xE0BD)     ; &g2-hanaJU+3024F;
+      (->subsumptive
+       ((===ruimoku-v6     . #xE0BD)   ; &R-RUI6-E0BD;
+       ))
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 31) ; ⼞
+    (ideographic-strokes . 5)
+    (total-strokes      . 8)
+    (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
@@ -4267,23 +4317,6 @@
       )
      ((=ucs              . #x56D7)     ; 囗
       )
-     ((=ucs              . #x5360)     ; 占
-      ))
-    (=ruimoku-v6       . #xE0BD)       ; &RUI6-E0BD;
-    (->subsumptive
-     ((==ruimoku-v6      . #xE0BD)     ; &g2-RUI6-E0BD;
-      ))
-    ))
-(define-char
-  '((ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 5)
-    (total-strokes      . 8)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER FULL SURROUND")
-      (=ucs              . #x2FF4)     ; ⿴
-      )
-     ((=ucs              . #x56D7)     ; 囗
-      )
      ((=ucs              . #x767D)     ; 白
       ))
     (=ruimoku-v6       . #xE0D1)       ; &RUI6-E0D1;