(<CJK RADICAL EAT TWO>): Add `<-ideographic-component-forms' for

U+98DF.
(GT-59030): Copied from Ideograph-R184-Eat.el.
(<CJK RADICAL EAT THREE>): Add `<-ideographic-component-forms' for
U+98DF.
(<CJK RADICAL C-SIMPLIFIED EAT>): Likewise.

diff --git a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
index 69d0c71..7fb544a 100644 (file)
--- a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
+++ b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
@@ -1006,13 +1006,32 @@
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (<-ideographic-component-forms
+     ((=ucs              . #x98DF)     ; 食
+      ))
     (=ucs              . #x2EDE)       ; ⻞
     ))
 (define-char
+  '((=>ucs             . #x2EDE)       ; ⻞
+    (morohashi-daikanwa        44014 0 6)
+    (ideographic-radical . 184)        ; ⾷
+    (ideographic-strokes . 0)
+    (total-strokes      . 3)
+    (<-ideographic-component-forms
+     ((=ucs              . #x98DF)     ; 食
+      ))
+    (=gt               . 59030)        ; ������
+    (=gt-k             . 06140)        ; ������
+    (=gt-pj-9          . #x4F28)       ; ������
+    ))
+(define-char
   '((name              . "CJK RADICAL EAT THREE")
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (<-ideographic-component-forms
+     ((=ucs              . #x98DF)     ; 食
+      ))
     (<-radical
      ((=ucs              . #x98E0)     ; 飠
       ))
@@ -1023,6 +1042,9 @@
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
+    (<-ideographic-component-forms
+     ((=ucs              . #x98DF)     ; 食
+      ))
     (<-radical
      ((=ucs              . #x9963)     ; 饣
       ))