(A-GT-K01804): New abstract node; unify A-U+23470-itaiji-002.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R063-Door.el

diff --git a/lisp/utf-2000/Ideograph-R063-Door.el b/lisp/utf-2000/Ideograph-R063-Door.el
index 40af069..012db8c 100644 (file)
--- a/lisp/utf-2000/Ideograph-R063-Door.el
+++ b/lisp/utf-2000/Ideograph-R063-Door.el
@@ -213,6 +213,29 @@
     ))
 (define-char
   '((ideographic-radical . 63) ; ⼾
+    (ideographic-strokes . 1)
+    (total-strokes      . 5)
+    (=>gt-k            . 01390)        ; &A-GT-K01390;
+    (=>ucs-itaiji-001  . #x2666A)      ; &A-GT-K01390;
+    ))
+(define-char
+  '((<-denotational
+     ((=>gt-k            . 01390)      ; &A-GT-K01390;
+      ))
+    (ideographic-radical . 63) ; ⼾
+    (ideographic-strokes . 1)
+    (total-strokes      . 5)
+    (=gt-k             . 01390)        ; &U-i001+2666A;
+    (=gt-pj-k1         . #x6254)       ; &U-i001+2666A; [66-52]
+    (=ucs-itaiji-001   . #x2666A)      ; &U-i001+2666A;
+    (->subsumptive
+     ((==gt-k            . 01390)      ; &g2-U-i001+2666A;
+      (==gt-pj-k1        . #x6254)     ; &g2-U-i001+2666A; [66-52]
+      (==ucs-itaiji-001          . #x2666A)    ; &g2-U-i001+2666A;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 63) ; ⼾
     (ideographic-strokes . 2)
     (total-strokes      . 6)
     (=ucs              . #x22A26)      ; 𢨦
@@ -897,11 +920,7 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 63) ; ⼾
-    (==>ucs@bucs       . #x6240)       ; &BUCS+6240;
-    ))
-(define-char
-  '((<-denotational
+  '((<-denotational@usage
      ((==>ucs@bucs       . #x6240)     ; &BUCS+6240;
       ))
     (ideographic-radical . 63) ; ⼾
@@ -1778,6 +1797,41 @@
     ))
 (define-char
   '((ideographic-radical . 63) ; ⼾
+    (ideographic-strokes . 6)
+    (total-strokes      . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs              . #x2FF8)     ; ⿸
+      )
+     ((=>iwds-1                  .  0007)      ; &IWDS1-007;
+      )
+     ((=ucs              . #x8089)     ; 肉
+      ))
+    (=ucs              . #x22A4C)      ; 𢩌
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x22A4C)    ; 𢩌
+      ))
+    (ideographic-radical . 63) ; ⼾
+    (ideographic-strokes . 6)
+    (total-strokes      . 10)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+      (=ucs              . #x2FF8)     ; ⿸
+      )
+     ((=+>ucs@jis        . #x6238)     ; &o-J0-384D;
+      (=+>jis-x0208      . #x384D)     ; &o-J0-384D; [24-45]
+      )
+     ((=ucs              . #x8089)     ; 肉
+      ))
+    (=ucs@iso          . #x22A4C)      ; &U-00022A4C;
+    (->subsumptive
+     ((==ucs@iso         . #x22A4C)    ; &g2-IU-00022A4C;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 63) ; ⼾
     (ideographic-strokes . 7)
     (total-strokes      . 11)
     (=ucs              . #x6248)       ; 扈
@@ -2185,3 +2239,8 @@
       (=cns11643-5       . #x7022)     ; &C5-7022; [80-02]
       ))
     ))
+(define-char
+  '((ideographic-radical . 63) ; ⼾
+    (==>ucs@bucs       . #x6240)       ; &BUCS+6240;
+    (==>daijiten       . 03647)        ; &BUCS+6240;
+    ))