(U+20B1B-itaiji-003): Use A-U+20B1B-itaiji-003 instead of A-cgnU+20B1B
authorMORIOKA Tomohiko <tomo.git@chise.org>
Thu, 26 Sep 2024 17:47:41 +0000 (02:47 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Fri, 27 Sep 2024 14:56:01 +0000 (23:56 +0900)
as its mother.

lisp/utf-2000/Ideograph-R029-Again.el

index 9e41211..729b460 100644 (file)
     ))
 (define-char
   '((<-denotational
-     ((=>ucs@cognate     . #x20B1B)    ; &A-cgnU+20B1B;
-      ))
-    (ideographic-radical . 29) ; ⼜
-    (ideographic-strokes . 3)
-    (total-strokes      . 6)
-    (ideographic-structure
-     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
-      (=ucs              . #x2FF1)     ; ⿱
-      )
-     ((name              . "CJK RADICAL KNIFE ONE")
-      (=ucs              . #x2E88)     ; ⺈
-      )
-     ((=ucs              . #x6587)     ; 文
-      ))
-    (=ucs-itaiji-003   . #x20B1B)      ; &U-i003+20B1B;
-    (<-formed
-     ((=ucs@iso                  . #x20B1B)    ; &MJ032008;
-      (=mj               . 032008)     ; &MJ032008;
-      )
-     ((=big5-cdp         . #x8BA1)     ; &CDP-8BA1;
-      )
-     ((=ucs              . #x6BB3)     ; 殳
-      ))
-    (->subsumptive
-     ((==ucs-itaiji-003          . #x20B1B)    ; &g2-U-i003+20B1B;
-      ))
-    ))
-(define-char
-  '((<-denotational
      ((=>big5-cdp@cognate . #x8C79)    ; &A-cgnCDP-8C79;
       ))
     (<-denotational@component
     (=ucs@JP/hanazono  . #x31471)      ; &hanaJU+31471;
     ))
 (define-char
+  '((<-denotational
+     ((=>ucs-itaiji-003          . #x20B1B)    ; &A-U-i003+20B1B;
+      ))
+    (ideographic-radical . 29) ; ⼜
+    (ideographic-strokes . 3)
+    (total-strokes      . 6)
+    (ideographic-structure
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (=ucs              . #x2FF1)     ; ⿱
+      )
+     ((name              . "CJK RADICAL KNIFE ONE")
+      (=ucs              . #x2E88)     ; ⺈
+      )
+     ((=ucs              . #x6587)     ; 文
+      ))
+    (=ucs-itaiji-003   . #x20B1B)      ; &U-i003+20B1B;
+    (<-formed
+     ((=ucs@iso                  . #x20B1B)    ; &MJ032008;
+      (=mj               . 032008)     ; &MJ032008;
+      )
+     ((=big5-cdp         . #x8BA1)     ; &CDP-8BA1;
+      )
+     ((=ucs              . #x6BB3)     ; 殳
+      ))
+    (->subsumptive
+     ((==ucs-itaiji-003          . #x20B1B)    ; &g2-U-i003+20B1B;
+      ))
+    ))
+(define-char
   '((ideographic-radical . 29) ; ⼜
     (ideographic-strokes . 4)
     (total-strokes      . 6)