(U+7FA1): Use `->denotational' and `->subsumptive'.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R048-Work.el

diff --git a/lisp/utf-2000/Ideograph-R048-Work.el b/lisp/utf-2000/Ideograph-R048-Work.el
index f2fd564..520b622 100644 (file)
--- a/lisp/utf-2000/Ideograph-R048-Work.el
+++ b/lisp/utf-2000/Ideograph-R048-Work.el
@@ -17,6 +17,19 @@
     (=shinjigen@rev    .  2059)        ; 工
     ))
 (define-char
+  '((<-denotational
+     ((=ucs              . #x5DE5)     ; 工
+      ))
+    (ideographic-radical . 48) ; ⼯
+    (ideographic-strokes . 0)
+    (total-strokes      . 3)
+    (=gt-k             . 00173)        ; &GT-K00173;
+    (=gt-pj-k1         . #x3474)       ; &GT-K00173; [20-84]
+    (<-formed@component/connect-right
+     ((=ucs              . #x5DE5)     ; 工
+      ))
+    ))
+(define-char
   '((ideographic-radical . 48) ; ⼯
     (ideographic-strokes . 1)
     (total-strokes      . 4)