(A-IWDSU+20B1B): New abstract node.

(IU+20B1B): Use A-IWDSU+20B1B instead of U-00020B1B as the mother.
(BC-8BA1): Likewise.
(U+20B1B-itaiji-001): New character.

diff --git a/lisp/utf-2000/Ideograph-R029-Again.el b/lisp/utf-2000/Ideograph-R029-Again.el
index 09c9128..958095d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R029-Again.el
+++ b/lisp/utf-2000/Ideograph-R029-Again.el
@@ -448,6 +448,17 @@
     (ideographic-radical . 29) ; ⼜
     (ideographic-strokes . 2)
     (total-strokes      . 4)
+    (=>ucs@iwds-1      . #x20B1B)      ; &A-IWDSU+20B1B;
+    (=>ucs@iso         . #x20B1B)      ; &A-IWDSU+20B1B;
+    ))
+(define-char
+  '((<-denotational
+     ((=>ucs@iwds-1      . #x20B1B)    ; &A-IWDSU+20B1B;
+      (=>ucs@iso         . #x20B1B)    ; &A-IWDSU+20B1B;
+      ))
+    (ideographic-radical . 29) ; ⼜
+    (ideographic-strokes . 2)
+    (total-strokes      . 4)
     (hanyu-dazidian    1 393 5)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
@@ -493,7 +504,8 @@
     ))
 (define-char
   '((<-denotational
-     ((=ucs              . #x20B1B)    ; 𠬛
+     ((=>ucs@iwds-1      . #x20B1B)    ; &A-IWDSU+20B1B;
+      (=>ucs@iso         . #x20B1B)    ; &A-IWDSU+20B1B;
       ))
     (ideographic-radical . 29) ; ⼜
     (ideographic-strokes . 2)
@@ -502,7 +514,7 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
       )
-     ((=gt-k             . 00089)      ; &GT-K00089;
+     ((=ucs              . #x2008A)    ; 𠂊
       )
      ((=ucs              . #x53C8)     ; 又
       ))
@@ -521,6 +533,36 @@
       ))
     ))
 (define-char
+  '((<-denotational
+     ((=ucs              . #x20B1B)    ; 𠬛
+      ))
+    (ideographic-radical . 29) ; ⼜
+    (ideographic-strokes . 2)
+    (total-strokes      . 4)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=gt-k             . 00304)      ; &GT-K00304;
+      )
+     ((=ucs              . #x53C8)     ; 又
+      ))
+    (=ucs-itaiji-001   . #x20B1B)      ; &U-i001+20B1B;
+    (<-formed
+     ((=ucs@iso                  . #x20B1B)    ; &C5-2140;
+      (=cns11643-5       . #x2140)     ; &C5-2140; [01-32]
+      (=daikanwa         . 03122)      ; &I-M-03122;
+      )
+     ((=big5-cdp         . #x8BA1)     ; &CDP-8BA1;
+      )
+     ((=ucs              . #x6BB3)     ; 殳
+      )
+     ((=ucs              . #x6534)     ; 攴
+      )
+     ((=ucs              . #x6535)     ; 攵
+      ))
+    ))
+(define-char
   '((ideographic-radical . 29) ; ⼜
     (ideographic-strokes . 2)
     (total-strokes      . 4)