From: MORIOKA Tomohiko Date: Mon, 2 Sep 2024 00:42:25 +0000 (+0900) Subject: (GT-K00845): New character; unify U+5C3A-itaiji-001. X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=c661c1d373711fe09903fa5b108d0102a985843f;p=chise%2Fxemacs-chise.git (GT-K00845): New character; unify U+5C3A-itaiji-001. (A2-DJT-02471): Unify BUCS+5C3A. --- diff --git a/lisp/utf-2000/Ideograph-R044-Corpse.el b/lisp/utf-2000/Ideograph-R044-Corpse.el index 1d2cabe..f4949ba 100644 --- a/lisp/utf-2000/Ideograph-R044-Corpse.el +++ b/lisp/utf-2000/Ideograph-R044-Corpse.el @@ -297,7 +297,7 @@ )) (define-char '((<-denotational@usage - ((==>daijiten . 02471) ; &A2-DJT-02471; + ((==>ucs@bucs . #x5C3A) ; &BUCS+5C3A; )) (ideographic-radical . 44) ; ⼫ (ideographic-strokes . 1) @@ -399,6 +399,28 @@ )) (define-char '((ideographic-radical . 44) ; ⼫ + (ideographic-strokes . 1) + (total-strokes . 4) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT") + (=ucs . #x2FF8) ; ⿸ + ) + ((=ucs . #x21C23) ; 𡰣 + ) + ((=ucs . #x200CC) ; 𠃌 + )) + (=gt-k . 00845) ; >-K00845; + (=gt-pj-k1 . #x5465) ; >-K00845; [52-69] + (=ucs-itaiji-001 . #x5C3A) ; >-K00845; + (->subsumptive + ((==ucs-itaiji-001 . #x5C3A) ; &g2-U-i001+5C3A; + ) + ((==gt-k . 00845) ; &g2-GT-K00845; + (==gt-pj-k1 . #x5465) ; &g2-GT-K00845; [52-69] + )) + )) +(define-char + '((ideographic-radical . 44) ; ⼫ (ideographic-structure ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") (=ucs . #x2FF1) ; ⿱ @@ -8948,7 +8970,8 @@ ) ((=ucs . #x5C38) ; 尸 ) - ((=>ucs@cognate . #x6C34) ; &A-cgnU+6C34; + ((=>ucs@iwds-1 . #x6C34) ; &A-IWDSU+6C34; + (=>iwds-1 . 32001) ; &A-IWDSU+6C34; )) (=>ucs@iwds-1 . #x5C3F) ; &A-IWDSU+5C3F; (=>iwds-1 . 0060) ; &A-IWDSU+5C3F; @@ -8982,7 +9005,8 @@ )) (define-char '((ideographic-radical . 44) ; ⼫ - (==>daijiten . 02471) ; &A2-DJT-02471; + (==>ucs@bucs . #x5C3A) ; &BUCS+5C3A; + (==>daijiten . 02471) ; &BUCS+5C3A; )) (define-char '((ideographic-radical . 44) ; ⼫