(A-IWDSU+5F51-itaiji-002): New abstract node.

(A-U+5F51-itaiji-002): New abstract node; use
`<-denotational@component' for A-IWDSU+5F51-itaiji-002.
(U+5F51-itaiji-002): New character; use `<-denotational' for
A-U+5F51-itaiji-002.
(A-U+38C7-itaiji-011): New abstract node; use `<-denotational' for
A-cgnU+38C7.
(U+38C7-itaiji-011): New character; use `<-denotational' for
A-U+38C7-itaiji-011.

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index c9f7958..f1624d4 100644 (file)
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -249,6 +249,58 @@
     ))
 (define-char
   '((ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 0)
+    (total-strokes      . 3)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=>ucs@component   . #x5200)     ; &A-compU+5200;
+      (=>iwds-1                  .  0149)      ; &A-compU+5200;
+      )
+     ((=ucs              . #x4E00)     ; 一
+      ))
+    (=>ucs-itaiji-002@iwds-1 . #x5F51) ; &A-IWDSU-i002+5F51;
+    ))
+(define-char
+  '((<-denotational@component
+     ((=>ucs-itaiji-002@iwds-1 . #x5F51)       ; &A-IWDSU-i002+5F51;
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 0)
+    (total-strokes      . 3)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x2008A)    ; 𠂊
+      )
+     ((=ucs              . #x4E00)     ; 一
+      ))
+    (=>ucs-itaiji-002  . #x5F51)       ; &A-U-i002+5F51;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-002          . #x5F51)     ; &A-U-i002+5F51;
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 0)
+    (total-strokes      . 3)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs@iso                  . #x2008A)    ; &U-0002008A;
+      )
+     ((=ucs              . #x4E00)     ; 一
+      ))
+    (=ucs-itaiji-002   . #x5F51)       ; &U-i002+5F51;
+    (->subsumptive
+     ((==ucs-itaiji-002          . #x5F51)     ; &g2-U-i002+5F51;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 2)
     (total-strokes      . 5)
     (=ucs              . #x5F52)       ; 归
@@ -654,6 +706,44 @@
       ))
     (ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 5)
+    (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs              . #x2FF3)     ; ⿳
+      )
+     ((=>ucs-itaiji-002          . #x5F51)     ; &A-U-i002+5F51;
+      )
+     ((=ucs              . #x2008A)    ; 𠂊
+      )
+     ((=ucs              . #x5DFE)     ; 巾
+      ))
+    (=>ucs-itaiji-011  . #x38C7)       ; &A-U-i011+38C7;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs-itaiji-011          . #x38C7)     ; &A-U-i011+38C7;
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 5)
+    (total-strokes      . 8)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
+      (=ucs              . #x2FF3)     ; ⿳
+      )
+     ((=ucs-itaiji-002   . #x5F51)     ; &U-i002+5F51;
+      )
+     ((=ucs@iso                  . #x2008A)    ; &U-0002008A;
+      )
+     ((=ucs              . #x5DFE)     ; 巾
+      ))
+    (=ucs-itaiji-011   . #x38C7)       ; &U-i011+38C7;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@cognate     . #x38C7)     ; &A-cgnU+38C7;
+      ))
+    (ideographic-radical . 58) ; ⼹
+    (ideographic-strokes . 5)
     (total-strokes      . 9)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")