From: MORIOKA Tomohiko Date: Sat, 15 Jul 2023 09:58:04 +0000 (+0900) Subject: (U-00022724): Add ideographic-structure. X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6ff79f900f670cb878e865f7683f3608cf023ade;p=chise%2Fxemacs-chise.git (U-00022724): Add ideographic-structure. (S1-2576): Unify hanaJU+22724 and U+22724-var-002. --- diff --git a/lisp/utf-2000/Ideograph-R061-Heart.el b/lisp/utf-2000/Ideograph-R061-Heart.el index e4f129b..a6a5df6 100644 --- a/lisp/utf-2000/Ideograph-R061-Heart.el +++ b/lisp/utf-2000/Ideograph-R061-Heart.el @@ -21944,6 +21944,15 @@ '((ideographic-radical . 61) ; ⼼ (ideographic-strokes . 8) (total-strokes . 12) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=ucs-itaiji-001 . #x3905) ; &U-i001+3905; + ) + ((=>ucs@component . #x590A) ; &A-compU+590A; + (=>iwds-1 . 0092) ; &A-compU+590A; + )) (=ucs . #x22724) ; 𢜤 )) (define-char @@ -21953,6 +21962,14 @@ (ideographic-radical . 61) ; ⼼ (ideographic-strokes . 8) (total-strokes . 12) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=ucs-itaiji-001 . #x3905) ; &U-i001+3905; + ) + ((=ucs . #x590A) ; 夊 + )) (=ucs@iso . #x22724) ; &C6-486D; (=cns11643-6 . #x486D) ; &C6-486D; [40-77] (=daikanwa . 10841) ; &I-M-10841; @@ -21982,7 +21999,17 @@ (ideographic-radical . 61) ; ⼼ (ideographic-strokes . 8) (total-strokes . 12) - (=shinjigen@1ed . 2576) ; &SJG1-2576; + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((=ucs-itaiji-001 . #x3905) ; &U-i001+3905; + ) + ((=ucs . #x5902) ; 夂 + )) + (=ucs@JP/hanazono . #x22724) ; &U-v002+22724; + (=shinjigen@1ed . 2576) ; &U-v002+22724; + (=ucs-var-002 . #x22724) ; &U-v002+22724; (<-vulgar ((=ucs@unicode . #x611B) ; &MJ011752; (=mj . 011752) ; &MJ011752; @@ -21991,6 +22018,12 @@ )) (<-vulgar*sources shinjigen@1ed) + (->subsumptive + ((==ucs@JP/hanazono . #x22724) ; &g2-hanaJU+22724; + (==shinjigen@1ed . 2576) ; &g2-hanaJU+22724; + ) + ((==ucs-var-002 . #x22724) ; &g2-U-v002+22724; + )) )) (define-char '((ideographic-radical . 61) ; ⼼