(IWDS1-0239): New abstract component.

(U+72AC): Add `<-denotational@component' for IWDS1-0239.

diff --git a/lisp/utf-2000/Ideograph-R094-Dog.el b/lisp/utf-2000/Ideograph-R094-Dog.el
index 39391f3..0244364 100644 (file)
--- a/lisp/utf-2000/Ideograph-R094-Dog.el
+++ b/lisp/utf-2000/Ideograph-R094-Dog.el
@@ -2,6 +2,16 @@
 (define-char
   '((ideographic-radical . 94) ; ⽝
     (ideographic-strokes . 0)
+    (=>ucs@component   . #x72AC)       ; &IWDS1-239;
+    (=>iwds-1          .  0239)        ; &IWDS1-239;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=>ucs@component   . #x72AC)     ; &IWDS1-239;
+      (=>iwds-1                  .  0239)      ; &IWDS1-239;
+      ))
+    (ideographic-radical . 94) ; ⽝
+    (ideographic-strokes . 0)
     (total-strokes      . 4)
     (=ucs              . #x72AC)       ; 犬
     (=jis-x0208                . #x3824)       ; &I-J90-3824; [24-04]