(U+2FF0): Add `<-denotational' for IWDS1-0307; add

`<-denotational@component' for A-compU+2FF0.
(U+2FF1): Add `<-denotational' for IWDS1-0305; add
`<-denotational@component' for A-compU+2FF5.
(U+2FF5): Add `<-denotational@component' for A-compU+2FF5.
(U+2FF8): Add `<-denotational' for IWDS1-0305.
(U+2FF9-itaiji-001): New character; use `<-denotational' for U+2FF9.
(U+2FFA): Add `<-denotational' for IWDS1-0307.

diff --git a/lisp/utf-2000/u02FF0-Ideographic-Description-Characters.el b/lisp/utf-2000/u02FF0-Ideographic-Description-Characters.el
index c6d02a9..3c7638f 100644 (file)
--- a/lisp/utf-2000/u02FF0-Ideographic-Description-Characters.el
+++ b/lisp/utf-2000/u02FF0-Ideographic-Description-Characters.el
@@ -1,13 +1,29 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
-  '((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+  '((<-denotational
+     ((=>ucs@iwds-1      . #x2FFA)     ; &A-IWDSU+2FFA;
+      (=>iwds-1                  .  0307)      ; &A-IWDSU+2FFA;
+      ))
+    (<-denotational@component
+     ((=>ucs@component   . #x2FF0)     ; &U-v001+2FF0;
+      (=ucs-var-001      . #x2FF0)     ; &U-v001+2FF0;
+      ))
+    (name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
     (=ucs              . #x2FF0)       ; ⿰
     ))
 (define-char
-  '((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+  '((<-denotational
+     ((=>ucs@iwds-1      . #x2FF8)     ; &U-v002+2FF1;
+      (=>iwds-1                  .  0305)      ; &U-v002+2FF1;
+      ))
+    (<-denotational@component
+     ((=>ucs@component   . #x2FF5)     ; &U-v001+2FF1;
+      (=ucs-var-001      . #x2FF1)     ; &U-v001+2FF1;
+      ))
+    (name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
@@ -35,7 +51,11 @@
     (=ucs              . #x2FF4)       ; ⿴
     ))
 (define-char
-  '((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
+  '((<-denotational@component
+     ((=>ucs@component   . #x2FF5)     ; &U-v001+2FF1;
+      (=ucs-var-001      . #x2FF1)     ; &U-v001+2FF1;
+      ))
+    (name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM ABOVE")
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
@@ -56,7 +76,11 @@
     (=ucs              . #x2FF7)       ; ⿷
     ))
 (define-char
-  '((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
+  '((<-denotational
+     ((=>ucs@iwds-1      . #x2FF8)     ; &U-v002+2FF1;
+      (=>iwds-1                  .  0305)      ; &U-v002+2FF1;
+      ))
+    (name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)
@@ -70,7 +94,18 @@
     (=ucs              . #x2FF9)       ; ⿹
     ))
 (define-char
-  '((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
+  '((<-denotational
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER RIGHT")
+      (=ucs              . #x2FF9)     ; ⿹
+      ))
+    (=ucs-itaiji-001   . #x2FF9)       ; &U-i001+2FF9;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@iwds-1      . #x2FFA)     ; &A-IWDSU+2FFA;
+      (=>iwds-1                  .  0307)      ; &A-IWDSU+2FFA;
+      ))
+    (name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
     (general-category  symbol other) ; Informative Category
     (bidi-category     . "ON")
     (mirrored          . nil)