(A-U+25AB4-itaiji-001): Copied from Ideograph-R117-Stand.el; unify

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R092-Fang.el

diff --git a/lisp/utf-2000/Ideograph-R092-Fang.el b/lisp/utf-2000/Ideograph-R092-Fang.el
index fb49266..6312843 100644 (file)
--- a/lisp/utf-2000/Ideograph-R092-Fang.el
+++ b/lisp/utf-2000/Ideograph-R092-Fang.el
@@ -252,12 +252,29 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=ucs              . #x5C1A)     ; 尚
+     ((=>ucs@iwds-1      . #x5C19)     ; &J97-3E30;
+      (=>jis-x0208       . #x3E30)     ; &J97-3E30; [30-16]
       )
      ((=ucs              . #x7259)     ; 牙
       ))
     (=ucs              . #x725A)       ; 牚
-    (=adobe-japan1-5   . 19526)        ; &I-AJ1-19526;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x725A)     ; 牚
+      ))
+    (ideographic-radical . 92) ; ⽛
+    (ideographic-strokes . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=gt-k             . 05014)      ; &GT-K05014;
+      )
+     ((=ucs              . #x7259)     ; 牙
+      ))
+    (=ucs@unicode      . #x725A)       ; &AJ1-19526;
+    (=adobe-japan1-5   . 19526)        ; &AJ1-19526;
     (=jis-x0212                . #x4A57)       ; &I-JSP-4A57; [42-55]
     (=iso-ir165                . #x2C37)       ; &I-EGB-2C37; [12-23]
     (=cns11643-2       . #x3D6B)       ; &I-C2-3D6B; [29-75]
@@ -327,3 +344,37 @@
      ((=cns11643-6       . #x5E5D)     ; &C6-5E5D; [62-61]
       ))
     ))
+(define-char
+  '((ideographic-radical . 92) ; ⽛
+    (ideographic-strokes . 14)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x7259)     ; 牙
+      )
+     ((=ucs              . #x5BE7)     ; 寧
+      ))
+    (=ucs              . #x24613)      ; 𤘓
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x24613)    ; 𤘓
+      ))
+    (ideographic-radical . 92) ; ⽛
+    (ideographic-strokes . 14)
+    (total-strokes      . 18)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x7259)     ; 牙
+      )
+     ((=ucs@unicode      . #x5BE7)     ; &MJ010230;
+      (=mj               . 010230)     ; &MJ010230;
+      ))
+    (=ucs@iso          . #x24613)      ; &U-00024613;
+    (->subsumptive
+     ((==ucs@iso         . #x24613)    ; &g2-IU-00024613;
+      ))
+    ))