(U-0002D4EE): Add `total-strokes'.

(CB10981): Add `ideographic-radical', `ideographic-strokes' and
`total-strokes'.
(U-0003033C): New character.

diff --git a/lisp/utf-2000/Ideograph-R040-Roof.el b/lisp/utf-2000/Ideograph-R040-Roof.el
index 2a42c96..40f6e7d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R040-Roof.el
+++ b/lisp/utf-2000/Ideograph-R040-Roof.el
@@ -5992,6 +5992,7 @@
 (define-char
   '((ideographic-radical . 40) ; ⼧
     (ideographic-strokes . 6)
+    (total-strokes      . 9)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
@@ -6006,6 +6007,9 @@
   '((<-denotational
      ((=ucs              . #x2D4EE)    ; 𭓮
       ))
+    (ideographic-radical . 40) ; ⼧
+    (ideographic-strokes . 6)
+    (total-strokes      . 9)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
@@ -6025,6 +6029,20 @@
     ))
 (define-char
   '((ideographic-radical . 40) ; ⼧
+    (ideographic-strokes . 6)
+    (total-strokes      . 9)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x5B80)     ; 宀
+      )
+     ((=ucs              . #x767E)     ; 百
+      ))
+    (=ucs              . #x3033C)      ; 𰌼
+    ))
+(define-char
+  '((ideographic-radical . 40) ; ⼧
     (=>big5-cdp                . #x8D7C)       ; &A-CDP-8D7C;
     ))
 (define-char