(U+53CC): Add `<-simplified@JP/Jouyou'; use

`<-vulgar-ideograph*sources' instead of char-ref in
`<-vulgar-ideograph'.
(U+53CE): Add `<-simplified@JP/Jouyou'; use
`<-vulgar-ideograph' and `<-vulgar-ideograph*sources' instead of
`vulgar-ideograph-of'.
(U+53D9): Add `<-simplified@JP/Jouyou'; use
`<-vulgar-ideograph*sources' instead of char-ref in
`<-vulgar-ideograph'.

diff --git a/lisp/utf-2000/Ideograph-R029-Again.el b/lisp/utf-2000/Ideograph-R029-Again.el
index e4a3980..6097ec7 100644 (file)
--- a/lisp/utf-2000/Ideograph-R029-Again.el
+++ b/lisp/utf-2000/Ideograph-R029-Again.el
@@ -283,13 +283,16 @@
     (ideographic-radical . 29) ; ⼜
     (ideographic-strokes . 2)
     (total-strokes      . 4)
+    (<-simplified@JP/Jouyou
+     ((=jis-x0208-1990   . #x5256)     ; �����
+      ))
     (<-vulgar-ideograph
-     (:sources (inkai shinjigen-1)
-      :char    ((ideographic-radical . 172)    ; ⾫
-                (shinjigen-1        . 903)
-                (=daikanwa          . 42116)   ; �����
-                )
+     ((ideographic-radical . 172)      ; ⾫
+      (shinjigen-1       . 903)
+      (=daikanwa         . 42116)      ; �����
       ))
+    (<-vulgar-ideograph*sources
+     yunhai shinjigen-1)
     (hanyu-dazidian    1 393 9)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -379,10 +382,21 @@
     (=gt-pj-k1         . #x422F)       ; 反
     ))
 (define-char
-  '((script            JP-Jouyou Ideograph)
+  '((script            JP Jouyou Ideograph)
     (ideographic-radical . 29) ; ⼜
     (ideographic-strokes . 2)
     (total-strokes      . 4)
+    (<-simplified@JP/Jouyou
+     ((=ucs              . #x6536)     ; 收
+      (=jis-x0208        . #x5A40)     ; �����
+      ))
+    (<-vulgar-ideograph
+     ((ideographic-radical . 66)       ; ⽁
+      (shinjigen-1       . 907)
+      (=daikanwa         . 13110)      ; �����
+      ))
+    (<-vulgar-ideograph*sources
+     daikanwa shinjigen-1)
     (hanyu-dazidian    1 393 3)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -394,13 +408,6 @@
       ))
     (shinjigen-1       . 906)
     (shinjigen-2       . 906)
-    (vulgar-ideograph-of
-     ((sources           morohashi-daikanwa shinjigen-1)
-      (char . ((ideographic-radical . 66)      ; ⽁
-              (shinjigen-1        . 907)
-              (=daikanwa          . 13110)     ; �����
-              ))
-      ))
     (=ucs              . #x53CE)       ; 収
     (=jis-x0208-1990   . #x3C7D)       ; �����
     (=gt               . 03952)        ; ������
@@ -1152,15 +1159,20 @@
     (=daikanwa         . 03162)        ; �����
     ))
 (define-char
-  '((script            JP-Jouyou Ideograph)
+  '((script            JP Jouyou Ideograph)
     (ideographic-radical . 29) ; ⼜
     (ideographic-strokes . 7)
     (total-strokes      . 9)
+    (<-simplified@JP/Jouyou
+     ((=ucs              . #x654D)     ; 敍
+      (=jis-x0208        . #x5A46)     ; �����
+      ))
     (<-vulgar-ideograph
-     (:char    ((shinjigen-1        . 915)
-                (=daikanwa          . 13205)   ; �����
-                )
-      :sources (seiji-tsuu morohashi-daikanwa shinjigen-1)))
+     ((shinjigen-1       . 915)
+      (=daikanwa         . 13205)      ; �����
+      ))
+    (<-vulgar-ideograph*sources
+     zhengzi-tong daikanwa shinjigen-1)
     (hanyu-dazidian    1 397 15)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")