(A-M-05717): New abstract character.
authortomo <tomo>
Fri, 6 Aug 2010 10:11:36 +0000 (10:11 +0000)
committertomo <tomo>
Fri, 6 Aug 2010 10:11:36 +0000 (10:11 +0000)
(U+3686): New character; add `<-denotational' for A-M-05717; integrate
M-05717 and JC3-48D2.
(M-05717): Map to U+3686 instead of U+590D.
(JC3-48D2): Likewise.
(U+590D): Use `<-denotational' for A-M-05717.

lisp/utf-2000/Ideograph-R035-Go-Slowly.el

index 39baf2c..2e8c150 100644 (file)
     (=ucs@iso          . #x21563)      ; &U-00021563;
     ))
 (define-char
-  '((=>ucs             . #x590D)       ; 复
+  '((ideographic-radical . 35) ; ⼢
+    (ideographic-strokes . 6)
+    (total-strokes      . 9)
+    (=>daikanwa                . 05717)        ; &A-M-05717;
+    ))
+(define-char
+  '((<-denotational
+     ((=>daikanwa        . 05717)      ; &A-M-05717;
+      ))
+    (ideographic-radical . 35) ; ⼢
+    (ideographic-strokes . 6)
+    (total-strokes      . 9)
+    (=ucs              . #x3686)       ; 㚆
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x3686)     ; 㚆
+      ))
     (ideographic-radical . 35) ; ⼢
     (ideographic-strokes . 6)
     (total-strokes      . 9)
+    (=daikanwa         . 05717)        ; &M-05717;
+    ))
+(define-char
+  '((<-denotational
+     ((=ucs              . #x3686)     ; 㚆
+      ))
+    (ideographic-radical . 35) ; ⼢
+    (ideographic-strokes . 6)
+    (total-strokes      . 9)
+    (=>>ucs@unicode    . #x3686)       ; &G-UU+3686;
     (->subsumptive
-     ((=daikanwa         . 05717)      ; &M-05717;
-      )
      ((=jef-china3       . #x48D2)     ; &JC3-48D2;
+      )
+     ((=ucs@unicode      . #x3686)     ; &UU+3686;
       ))
     ))
 (define-char
-  '((=>daikanwa                . 05717)        ; &M-05717;
+  '((<-denotational
+     ((=>daikanwa        . 05717)      ; &A-M-05717;
+      ))
     (ideographic-radical . 35) ; ⼢
     (ideographic-strokes . 6)
     (total-strokes      . 9)
     (hanyu-dazidian    2 869 6)
     (=ucs              . #x590D)       ; 复
+    (=big5             . #xCE60)       ; &I-B-CE60;
     ))
 (define-char
   '((<-denotational
     (=ucs@unicode      . #x590D)       ; &JX2-253B;
     (=gb2312           . #x3834)       ; &JX2-253B; [24-20]
     (=jis-x0213-2      . #x253B)       ; &I-JX2-253B; [05-27]
-    (=big5             . #xCE60)       ; &I-B-CE60;
     (=jef-china3       . #x81FB)       ; &I-JC3-81FB;
     ))
 (define-char