From 341ae03be57bec8fba96d1cff850c6eb59d47dbf Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Fri, 24 Jan 2020 08:34:15 +0900 Subject: [PATCH] (U+5362): Use `<-denotational@usage' instead of `<-denotational' for BUCS+76E7. (A-GT-K01541): New abstract node. (GT-K01541): New character; use `<-denotational' for A-GT-K01541. --- lisp/utf-2000/Ideograph-R025-Divination.el | 39 +++++++++++++++++++++++++++- 1 file changed, 38 insertions(+), 1 deletion(-) diff --git a/lisp/utf-2000/Ideograph-R025-Divination.el b/lisp/utf-2000/Ideograph-R025-Divination.el index 70658e2..14f53cc 100644 --- a/lisp/utf-2000/Ideograph-R025-Divination.el +++ b/lisp/utf-2000/Ideograph-R025-Divination.el @@ -570,7 +570,7 @@ (=cns11643-6 . #x224C) ; &I-C6-224C; [02-44] )) (define-char - '((<-denotational + '((<-denotational@usage ((==>ucs@bucs . #x76E7) ; &BUCS+76E7; )) (ideographic-radical . 25) ; ⼘ @@ -605,6 +605,43 @@ )) (define-char '((ideographic-radical . 25) ; ⼘ + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((name . "CJK RADICAL DIVINATION") + (=ucs . #x2E8A) ; ⺊ + ) + ((=>ucs@component . #x5DF1) ; &A-compU+5DF1; + (=>iwds-1 . 0120) ; &A-compU+5DF1; + )) + (=>gt-k . 01541) ; &A-GT-K01541; + )) +(define-char + '((<-denotational + ((=>gt-k . 01541) ; &A-GT-K01541; + )) + (ideographic-radical . 25) ; ⼘ + (ideographic-strokes . 3) + (total-strokes . 5) + (ideographic-structure + ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") + (=ucs . #x2FF1) ; ⿱ + ) + ((name . "CJK RADICAL DIVINATION") + (=ucs . #x2E8A) ; ⺊ + ) + ((=ucs . #x5DF3) ; 巳 + )) + (=gt-k . 01541) ; >-K01541; + (=gt-pj-k1 . #x4B63) ; >-K01541; [43-67] + (->subsumptive + ((==gt-k . 01541) ; &g2-GT-K01541; + (==gt-pj-k1 . #x4B63) ; &g2-GT-K01541; [43-67] + )) + )) +(define-char + '((ideographic-radical . 25) ; ⼘ (ideographic-strokes . 4) (total-strokes . 6) (=ucs . #x209D4) ; 𠧔 -- 1.7.10.4