(RUI6-E161): Unify U-000301BA.

diff --git a/lisp/utf-2000/Ideograph-R029-Again.el b/lisp/utf-2000/Ideograph-R029-Again.el
index db97ff1..6b4b129 100644 (file)
--- a/lisp/utf-2000/Ideograph-R029-Again.el
+++ b/lisp/utf-2000/Ideograph-R029-Again.el
@@ -3102,6 +3102,28 @@
     ))
 (define-char
   '((ideographic-radical . 29) ; ⼜
+    (ideographic-strokes . 5)
+    (total-strokes      . 7)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((=ucs              . #x4E4D)     ; 乍
+      )
+     ((=ucs              . #x53C8)     ; 又
+      ))
+    (=ucs              . #x301BA)      ; 𰆺
+    (=ruimoku-v6       . #xE161)       ; &I-RUI6-E161;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x301BA)   ; &g2-hanaJU+301BA;
+      (==ruimoku-v6      . #xE161)     ; &g2-hanaJU+301BA;
+      (->subsumptive
+       ((===ruimoku-v6     . #xE161)   ; &R-RUI6-E161;
+       ))
+      ))
+    ))
+(define-char
+  '((ideographic-radical . 29) ; ⼜
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (=ucs              . #x2FF1)     ; ⿱
@@ -3231,23 +3253,6 @@
     (=ucs-itaiji-004   . #x7077)       ; &U-i004+7077;
     ))
 (define-char
-  '((ideographic-radical . 29) ; ⼜
-    (ideographic-strokes . 5)
-    (total-strokes      . 7)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs              . #x2FF1)     ; ⿱
-      )
-     ((=ucs              . #x4E4D)     ; 乍
-      )
-     ((=ucs              . #x53C8)     ; 又
-      ))
-    (=ruimoku-v6       . #xE161)       ; &RUI6-E161;
-    (->subsumptive
-     ((==ruimoku-v6      . #xE161)     ; &g2-RUI6-E161;
-      ))
-    ))
-(define-char
   '((<-denotational
      ((=>gt-k            . 03405)      ; &A-GT-K03405;
       ))