(U-00021904): New character.

diff --git a/lisp/utf-2000/Ideograph-R038-Woman.el b/lisp/utf-2000/Ideograph-R038-Woman.el
index 1245139..7c05ce1 100644 (file)
--- a/lisp/utf-2000/Ideograph-R038-Woman.el
+++ b/lisp/utf-2000/Ideograph-R038-Woman.el
@@ -11173,7 +11173,7 @@
      ((=ucs              . #x660F)     ; 昏
       ))
     (=ucs              . #x5A5A)       ; 婚
-    (=adobe-japan1-0   . 02071)        ; &AJ1-02071;
+    (=adobe-japan1-0   . 02071)        ; &I-AJ1-02071;
     (=jis-x0208                . #x3A27)       ; &I-J90-3A27; [26-07]
     (=gb2312           . #x3B69)       ; &I-G0-3B69; [27-73]
     (=ks-x1001         . #x7B66)       ; &I-K0-7B66; [91-70]
@@ -24207,6 +24207,39 @@
     ))
 (define-char
   '((ideographic-radical . 38) ; ⼥
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x5973)     ; 女
+      )
+     ((=ucs              . #x4535)     ; 䔵
+      ))
+    (=ucs              . #x21904)      ; 𡤄
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x21904)    ; 𡤄
+      ))
+    (ideographic-radical . 38) ; ⼥
+    (ideographic-strokes . 16)
+    (total-strokes      . 19)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
+      (=ucs              . #x2FF0)     ; ⿰
+      )
+     ((=ucs              . #x5973)     ; 女
+      )
+     ((=cns11643-3       . #x5257)     ; &C3-5257; [50-55]
+      (=daikanwa         . 31915)      ; &I-M-31915;
+      ))
+    (=ucs@iso          . #x21904)      ; &U-00021904;
+    (->subsumptive
+     ((==ucs@iso         . #x21904)    ; &g2-IU-00021904;
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 38) ; ⼥
     (ideographic-strokes . 17)
     (total-strokes      . 20)
     (=ucs              . #x3736)       ; 㜶