Rename `<-vulgar-ideograph' to `<-vulgar'.

diff --git a/lisp/utf-2000/Ideograph-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index f175c1e..bbca7e3 100644 (file)
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -624,7 +624,7 @@
      ((<-simplified@CN
        ((=gb12345          . #x3373)   ; &UU+919C;
        ))
-      (<-vulgar-ideograph
+      (<-vulgar
        ((=daikanwa         . 00023)    ; &I-M-00023;
        ))
       (shinjigen-1       . 17)
@@ -663,15 +663,15 @@
   '((ideographic-radical . 1)  ; ⼀
     (ideographic-strokes . 3)
     (total-strokes      . 4)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=ucs              . #x4E08)     ; 丈
       ))
     (=ucs              . #x2000B)      ; 𠀋
     (->subsumptive
-     ((<-vulgar-ideograph
+     ((<-vulgar
        ((=daikanwa         . 00011)    ; &I-M-00011;
        ))
-      (<-vulgar-ideograph*sources
+      (<-vulgar*sources
        daikanwa)
       (ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM LOWER LEFT")
@@ -690,11 +690,11 @@
       (=daikanwa         . 00026)      ; &I-M-00026;
       (=ucs@jis                  . #x2000B)    ; &GT-00031;
       )
-     ((<-vulgar-ideograph
+     ((<-vulgar
        ((shinjigen-1       . 9)
        (=jis-x0208-1990    . #x3E66)   ; &I-J90-3E66;
        ))
-      (<-vulgar-ideograph*sources
+      (<-vulgar*sources
        shinjigen-1)
       (hanyu-dazidian    1 12 5)
       (ideographic-structure
@@ -755,11 +755,11 @@
     (ideographic-radical@daikanwa . 1) ; ⼀
     (ideographic-strokes@daikanwa . 3)
     (total-strokes      . 4)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 491)
       (=daikanwa         . 01455)      ; &I-M-01455;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa shinjigen-1)
     (hanyu-dazidian    1 241 5)
     (shinjigen-1       . 492)

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index df91c15..7858491 100644 (file)
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -271,7 +271,7 @@
   '((ideographic-radical . 4)  ; ⼃
     (ideographic-strokes . 2)
     (total-strokes      . 3)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 47)
                 (=daikanwa          . 00118)   ; &I-M-00118;
                 )
@@ -356,10 +356,10 @@
     ))
 (define-char
   '((total-strokes      . 3)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 01739)      ; &I-M-01739;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      zhengzi-tong daikanwa)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")

diff --git a/lisp/utf-2000/Ideograph-R005-Second.el b/lisp/utf-2000/Ideograph-R005-Second.el
index 5cf7871..387fabd 100644 (file)
--- a/lisp/utf-2000/Ideograph-R005-Second.el
+++ b/lisp/utf-2000/Ideograph-R005-Second.el
@@ -1885,11 +1885,11 @@
     (ideographic-radical@cns*sources
      shinjigen-1 cns11643 gt)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((ideographic-radical . 213)      ; ⿔
       (=daikanwa         . 48847)      ; &I-M-48847;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa)
     (hanyu-dazidian    8 10 19)
     (ideographic-structure

diff --git a/lisp/utf-2000/Ideograph-R006-Hook.el b/lisp/utf-2000/Ideograph-R006-Hook.el
index fd94819..e5703cd 100644 (file)
--- a/lisp/utf-2000/Ideograph-R006-Hook.el
+++ b/lisp/utf-2000/Ideograph-R006-Hook.el
@@ -355,11 +355,11 @@
     (ideographic-radical . 6)  ; ⼅
     (ideographic-strokes . 6)
     (total-strokes      . 7)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 69)
       (=daikanwa         . 00241)      ; &I-M-00241;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (shinjigen-1       . 71)
     (shinjigen-2       . 71)

diff --git a/lisp/utf-2000/Ideograph-R008-Lid.el b/lisp/utf-2000/Ideograph-R008-Lid.el
index 2fb61eb..5fe307a 100644 (file)
--- a/lisp/utf-2000/Ideograph-R008-Lid.el
+++ b/lisp/utf-2000/Ideograph-R008-Lid.el
@@ -1081,11 +1081,11 @@
     (sound@ja/on/go    "kyAu")
     (=ucs              . #x4EB0)       ; 亰
     (->subsumptive
-     ((<-vulgar-ideograph
+     ((<-vulgar
        ((shinjigen-1       . 102)
        (=daikanwa          . 00299)    ; &I-M-00299;
        ))
-      (<-vulgar-ideograph*sources
+      (<-vulgar*sources
        shinjigen-1)
       (ideographic-structure
        ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
@@ -1402,7 +1402,7 @@
     (ideographic-radical . 8)  ; ⼇
     (ideographic-strokes . 8)
     (total-strokes      . 10)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (seiji-tsuu morohashi-daikanwa shinjigen-1)
       :char    ((shinjigen-1        . 104)
                 (=daikanwa          . 00303)   ; &I-M-00303;
@@ -1461,7 +1461,7 @@
     (ideographic-radical . 8)  ; ⼇
     (ideographic-strokes . 8)
     (total-strokes      . 10)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (morohashi-daikanwa shinjigen-1)
       :char    ((shinjigen-1        . 106)
                 (=daikanwa          . 00304)   ; &I-M-00304;

diff --git a/lisp/utf-2000/Ideograph-R009-Man.el b/lisp/utf-2000/Ideograph-R009-Man.el
index f1cb6db..5c893a1 100644 (file)
--- a/lisp/utf-2000/Ideograph-R009-Man.el
+++ b/lisp/utf-2000/Ideograph-R009-Man.el
@@ -771,7 +771,7 @@
     (ideographic-radical@cns*sources
      cns11643-3 daikanwa)
     (total-strokes      . 4)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=ucs              . #x5167)     ; 內
       ))
     (=ucs              . #x5185)       ; 内
@@ -1876,11 +1876,11 @@
     (ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 4)
     (total-strokes      . 6)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 144)
       (=daikanwa         . 00398)      ; &I-M-00398;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (hanyu-dazidian    1 124 5)
     (ideographic-structure
@@ -10797,7 +10797,7 @@
     (ideographic-radical . 9)  ; ⼈
     (ideographic-strokes . 7)
     (total-strokes      . 9)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 487)
                 (=daikanwa          . 01437)   ; &I-M-01437;
                 )

diff --git a/lisp/utf-2000/Ideograph-R012-Eight.el b/lisp/utf-2000/Ideograph-R012-Eight.el
index 4891ff7..a1a8b69 100644 (file)
--- a/lisp/utf-2000/Ideograph-R012-Eight.el
+++ b/lisp/utf-2000/Ideograph-R012-Eight.el
@@ -264,11 +264,11 @@
     (ideographic-radical@daikanwa . 1) ; ⼀
     (ideographic-strokes@daikanwa . 3)
     (total-strokes      . 4)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 491)
       (=daikanwa         . 01455)      ; &I-M-01455;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa shinjigen-1)
     (hanyu-dazidian    1 241 5)
     (shinjigen-1       . 492)

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index d1ada89..0b4e63d 100644 (file)
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -116,7 +116,7 @@
     (ideographic-radical@cns*sources
      cns11643-3 daikanwa)
     (total-strokes      . 4)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=ucs              . #x5167)     ; 內
       ))
     (=ucs              . #x5185)       ; 内
@@ -128,10 +128,10 @@
     (<-denotational
      ((=ucs              . #x5185)     ; 内
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 01418)      ; &I-M-01418;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa)
     (=cns11643-6       . #x2150)       ; &M-01512;
     (=daikanwa         . 01512)        ; &I-M-01512;

diff --git a/lisp/utf-2000/Ideograph-R014-Cover.el b/lisp/utf-2000/Ideograph-R014-Cover.el
index 29988a0..ab3b9e7 100644 (file)
--- a/lisp/utf-2000/Ideograph-R014-Cover.el
+++ b/lisp/utf-2000/Ideograph-R014-Cover.el
@@ -45,7 +45,7 @@
     (ideographic-radical . 14) ; ⼍
     (ideographic-strokes . 2)
     (total-strokes      . 4)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 525)
                 (=daikanwa          . 01566)   ; &I-M-01566;
                 )
@@ -672,7 +672,7 @@
   '((ideographic-radical . 14) ; ⼍
     (ideographic-strokes . 9)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 1852)
                 (=daikanwa          . 07230)   ; &I-M-07230;

diff --git a/lisp/utf-2000/Ideograph-R015-Ice.el b/lisp/utf-2000/Ideograph-R015-Ice.el
index 5dccaf8..5a5335e 100644 (file)
--- a/lisp/utf-2000/Ideograph-R015-Ice.el
+++ b/lisp/utf-2000/Ideograph-R015-Ice.el
@@ -199,7 +199,7 @@
   '((ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 4)
     (total-strokes      . 6)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 542)
                 (=daikanwa          . 01613)   ; &I-M-01613;
@@ -269,7 +269,7 @@
   '((ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 4)
     (total-strokes      . 6)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (gyokuhen morohashi-daikanwa shinjigen-1)
       :char    ((shinjigen-1        . 4092)
                 (=daikanwa          . 17209)   ; &I-M-17209;
@@ -300,7 +300,7 @@
   '((ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 4)
     (total-strokes      . 6)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (gyokuhen morohashi-daikanwa shinjigen-1)
       :char    ((shinjigen-1        . 4080)
                 (=daikanwa          . 17174)   ; &I-M-17174;
@@ -371,7 +371,7 @@
   '((ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 5)
     (total-strokes      . 7)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (gyokuhen kangxi morohashi-daikanwa shinjigen-1)
       :char    ((shinjigen-1        . 4122)
                 (=daikanwa          . 17264)   ; &I-M-17264;
@@ -1227,7 +1227,7 @@
     (ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 8)
     (total-strokes      . 10)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((ideographic-radical . 85)     ; ⽔
                 (shinjigen-1        . 4308)
@@ -1918,7 +1918,7 @@
     (ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 10)
     (total-strokes      . 12)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 4378)
                 (=daikanwa          . 17934)   ; &I-M-17934;
                 )
@@ -2386,11 +2386,11 @@
     (ideographic-radical . 15) ; ⼎
     (ideographic-strokes . 13)
     (total-strokes      . 15)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 561)
       (=daikanwa         . 01717)      ; &I-M-01717;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      pianhai daikanwa shinjigen-1)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")

diff --git a/lisp/utf-2000/Ideograph-R016-Table.el b/lisp/utf-2000/Ideograph-R016-Table.el
index acdbde8..3c4abf5 100644 (file)
--- a/lisp/utf-2000/Ideograph-R016-Table.el
+++ b/lisp/utf-2000/Ideograph-R016-Table.el
@@ -122,10 +122,10 @@
     ))
 (define-char
   '((total-strokes      . 3)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 01739)      ; &I-M-01739;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      zhengzi-tong daikanwa)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")

diff --git a/lisp/utf-2000/Ideograph-R017-Open-Box.el b/lisp/utf-2000/Ideograph-R017-Open-Box.el
index 8b9584e..2f602eb 100644 (file)
--- a/lisp/utf-2000/Ideograph-R017-Open-Box.el
+++ b/lisp/utf-2000/Ideograph-R017-Open-Box.el
@@ -501,7 +501,7 @@
   '((ideographic-radical . 17) ; ⼐
     (ideographic-strokes . 7)
     (total-strokes      . 9)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 584)
                 (=daikanwa          . 01826)   ; &I-M-01826;

diff --git a/lisp/utf-2000/Ideograph-R018-Knife.el b/lisp/utf-2000/Ideograph-R018-Knife.el
index 35f51aa..6904e8e 100644 (file)
--- a/lisp/utf-2000/Ideograph-R018-Knife.el
+++ b/lisp/utf-2000/Ideograph-R018-Knife.el
@@ -1667,7 +1667,7 @@
   '((ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 5)
     (total-strokes      . 7)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 709)
                 (=daikanwa          . 02316)   ; &I-M-02316;
@@ -1694,7 +1694,7 @@
   '((ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 5)
     (total-strokes      . 7)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 709)
                 (=daikanwa          . 02316)   ; &I-M-02316;
@@ -3624,7 +3624,7 @@
     (ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 7)
     (total-strokes      . 9)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (seiji-tsuu morohashi-daikanwa)
       :char    ((=daikanwa          . 01953)   ; &I-M-01953;
                 )
@@ -3649,7 +3649,7 @@
     (ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 7)
     (total-strokes      . 9)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 634)
                 (=jis-x0212         . #x333A)  ; &JSP-333A;
@@ -4015,7 +4015,7 @@
   '((ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 8)
     (total-strokes      . 10)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 634)
                 (=jis-x0212         . #x333A)  ; &JSP-333A;
@@ -4686,7 +4686,7 @@
   '((ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 8)
     (total-strokes      . 10)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 666)
                 (=daikanwa          . 02049)   ; &I-M-02049;
@@ -7980,7 +7980,7 @@
     (ideographic-radical . 18) ; ⼑
     (ideographic-strokes . 14)
     (total-strokes      . 16)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 653)
                 (=daikanwa          . 02228)   ; &I-M-02228;
                 )

diff --git a/lisp/utf-2000/Ideograph-R019-Power.el b/lisp/utf-2000/Ideograph-R019-Power.el
index 822b880..cbc43af 100644 (file)
--- a/lisp/utf-2000/Ideograph-R019-Power.el
+++ b/lisp/utf-2000/Ideograph-R019-Power.el
@@ -1000,12 +1000,12 @@
       (=ks-x1001         . #x7C79)     ; &I-K0-7C79;
       (=daikanwa         . 13186)      ; &I-M-13186;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((ideographic-radical . 66)       ; ⽁
       (shinjigen-1       . 725)
       (=daikanwa         . 13186)      ; &I-M-13186;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      yupian zhengyun zhengzi-tong daikanwa shinjigen-1)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER LEFT TO RIGHT")
@@ -1469,10 +1469,10 @@
      ((=ucs              . #x6555)     ; 敕
       (=jis-x0208        . #x5A45)     ; &I-J90-5A45;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 02380)      ; &I-M-02380;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      zhengzi-tong daikanwa)
     (hanyu-dazidian    1 371 2)
     (ideographic-structure
@@ -1621,11 +1621,11 @@
     (ideographic-radical . 19) ; ⼒
     (ideographic-strokes . 7)
     (total-strokes      . 9)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 731)
       (=daikanwa         . 02360)      ; &I-M-02360;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa shinjigen-1)
     (shinjigen-1       . 730)
     (shinjigen-2       . 730)
@@ -2301,11 +2301,11 @@
     (ideographic-radical . 19) ; ⼒
     (ideographic-strokes . 9)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 740)
       (=daikanwa         . 02391)      ; &I-M-02391;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa shinjigen-1)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
@@ -2809,11 +2809,11 @@
       ))
     (<-simplified@JP/Jouyou*sources
      daikanwa JP/Jouyou)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 744)
       (=daikanwa         . 02424)      ; &I-M-02424;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (shinjigen-1       . 743)
     (shinjigen-2       . 743)

diff --git a/lisp/utf-2000/Ideograph-R020-Wrap.el b/lisp/utf-2000/Ideograph-R020-Wrap.el
index 2308e72..aebd7d3 100644 (file)
--- a/lisp/utf-2000/Ideograph-R020-Wrap.el
+++ b/lisp/utf-2000/Ideograph-R020-Wrap.el
@@ -94,7 +94,7 @@
     (ideographic-radical . 20) ; ⼓
     (ideographic-strokes . 2)
     (total-strokes      . 4)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (seiji-tsuu morohashi-daikanwa shinjigen-1)
       :char    ((shinjigen-1        . 764)
                 (=daikanwa          . 02496)   ; &I-M-02496;

diff --git a/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el b/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
index 4325de9..fdd2874 100644 (file)
--- a/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
+++ b/lisp/utf-2000/Ideograph-R022-Right-Open-Box.el
@@ -97,7 +97,7 @@
   '((ideographic-radical . 22) ; ⼕
     (ideographic-strokes . 3)
     (total-strokes      . 5)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((ideographic-radical . 50)     ; ⼱
                 (shinjigen-1        . 2079)
@@ -1208,11 +1208,11 @@
   '((ideographic-radical . 22) ; ⼕
     (ideographic-strokes . 12)
     (total-strokes      . 14)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 796)
       (=daikanwa         . 02655)      ; &I-M-02655;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (hanyu-dazidian    1 89 13)
     (ideographic-structure

diff --git a/lisp/utf-2000/Ideograph-R024-Ten.el b/lisp/utf-2000/Ideograph-R024-Ten.el
index 3880320..3c6ec25 100644 (file)
--- a/lisp/utf-2000/Ideograph-R024-Ten.el
+++ b/lisp/utf-2000/Ideograph-R024-Ten.el
@@ -151,7 +151,7 @@
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 2)
     (total-strokes      . 4)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 823)
                 (=daikanwa          . 02740)   ; &I-M-02740;
@@ -676,7 +676,7 @@
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 5)
     (total-strokes      . 7)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 910)
                 (=daikanwa          . 03154)   ; &I-M-03154;
                 )
@@ -812,11 +812,11 @@
      ((=ucs              . #xFA35)     ; 卑
       (=jis-x0213-1-2000  . #x2E6E)    ; &I-JX1-2E6E;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 830)
       (=daikanwa         . 02738)      ; &I-M-02738;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (shinjigen-1       . 829)
     (shinjigen-2       . 829)
@@ -831,11 +831,11 @@
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 6)
     (total-strokes      . 8)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 830)
       (=daikanwa         . 02738)      ; &I-M-02738;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      zhengzi-tong daikanwa shinjigen-1)
     (shinjigen-1       . 831)
     (shinjigen-2       . 831)
@@ -1191,7 +1191,7 @@
   '((ideographic-radical . 24) ; ⼗
     (ideographic-strokes . 8)
     (total-strokes      . 10)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 1170)
                 (=daikanwa          . 03993)   ; &I-M-03993;
                 )

diff --git a/lisp/utf-2000/Ideograph-R026-Seal.el b/lisp/utf-2000/Ideograph-R026-Seal.el
index caba811..30b296e 100644 (file)
--- a/lisp/utf-2000/Ideograph-R026-Seal.el
+++ b/lisp/utf-2000/Ideograph-R026-Seal.el
@@ -411,10 +411,10 @@
      ((=ucs              . #x537D)     ; 卽
       (=jis-x0213-1-2000  . #x2E71)    ; &I-JX1-2E71;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 02873)      ; &M-02873;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (hanyu-dazidian    1 314 2)
     (ideographic-structure
@@ -881,7 +881,7 @@
     (ideographic-radical . 26) ; ⼙
     (ideographic-strokes . 9)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (morohashi-daikanwa)
       :char    ((=daikanwa          . 02879)   ; &I-M-02879;
                 )
@@ -897,7 +897,7 @@
     (hanyu-dazidian-vol         . 1)
     (hanyu-dazidian-page . 318)
     (hanyu-dazidian-char . 3)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 868)
                 (=daikanwa          . 02880)   ; &I-M-02880;
@@ -926,7 +926,7 @@
   '((ideographic-radical . 26) ; ⼙
     (ideographic-strokes . 9)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (morohashi-daikanwa)
       :char    ((=daikanwa          . 02879)   ; &I-M-02879;
                 )

diff --git a/lisp/utf-2000/Ideograph-R027-Cliff.el b/lisp/utf-2000/Ideograph-R027-Cliff.el
index 4544286..dc8dde9 100644 (file)
--- a/lisp/utf-2000/Ideograph-R027-Cliff.el
+++ b/lisp/utf-2000/Ideograph-R027-Cliff.el
@@ -1585,7 +1585,7 @@
   '((ideographic-radical . 27) ; ⼚
     (ideographic-strokes . 9)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 2191)
                 (=daikanwa          . 09410)   ; &I-M-09410;
                 )
@@ -1874,7 +1874,7 @@
     (ideographic-radical . 27) ; ⼚
     (ideographic-strokes . 10)
     (total-strokes      . 12)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 2199)
                 (=jis-x0208         . #x567C)  ; &GT-11869;
@@ -2073,7 +2073,7 @@
   '((ideographic-radical . 27) ; ⼚
     (ideographic-strokes . 10)
     (total-strokes      . 12)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 2216)
                 (=daikanwa          . 09479)   ; &I-M-09479;
@@ -2162,11 +2162,11 @@
     (ideographic-radical . 27) ; ⼚
     (ideographic-strokes . 11)
     (total-strokes      . 13)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 2207)
       (=gt               . 11902)      ; &GT-11902;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
@@ -2588,7 +2588,7 @@
   '((ideographic-radical . 27) ; ⼚
     (ideographic-strokes . 12)
     (total-strokes      . 14)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 2212)
                 (=daikanwa          . 09487)   ; &I-M-09487;
@@ -2700,7 +2700,7 @@
     (ideographic-radical . 27) ; ⼚
     (ideographic-strokes . 12)
     (total-strokes      . 14)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 2216)
                 (=daikanwa          . 09479)   ; &I-M-09479;
@@ -2722,7 +2722,7 @@
     (ideographic-radical . 27) ; ⼚
     (ideographic-strokes . 12)
     (total-strokes      . 14)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 2214)
                 (=daikanwa          . 09490)   ; &I-M-09490;
                 )

diff --git a/lisp/utf-2000/Ideograph-R028-Private.el b/lisp/utf-2000/Ideograph-R028-Private.el
index 7216abb..9e12082 100644 (file)
--- a/lisp/utf-2000/Ideograph-R028-Private.el
+++ b/lisp/utf-2000/Ideograph-R028-Private.el
@@ -812,7 +812,7 @@
   '((ideographic-radical . 28) ; ⼛
     (ideographic-strokes . 10)
     (total-strokes      . 12)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((shinjigen-1        . 893)
                 (=daikanwa          . 03098)   ; &I-M-03098;

diff --git a/lisp/utf-2000/Ideograph-R029-Again.el b/lisp/utf-2000/Ideograph-R029-Again.el
index bf63403..5cc07cf 100644 (file)
--- a/lisp/utf-2000/Ideograph-R029-Again.el
+++ b/lisp/utf-2000/Ideograph-R029-Again.el
@@ -293,12 +293,12 @@
     (<-simplified@JP/Jouyou
      ((=jis-x0208-1990   . #x5256)     ; &GT-56567;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((ideographic-radical . 172)      ; ⾫
       (shinjigen-1       . 903)
       (=daikanwa         . 42116)      ; &I-M-42116;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      yunhai shinjigen-1)
     (hanyu-dazidian    1 393 9)
     (ideographic-structure
@@ -398,12 +398,12 @@
      ((=ucs              . #x6536)     ; 收
       (=jis-x0208        . #x5A40)     ; &I-J90-5A40;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((ideographic-radical . 66)       ; ⽁
       (shinjigen-1       . 907)
       (=daikanwa         . 13110)      ; &I-M-13110;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa shinjigen-1)
     (=ucs              . #x53CE)       ; 収
     (->subsumptive
@@ -1174,11 +1174,11 @@
      ((=ucs              . #x654D)     ; 敍
       (=jis-x0208        . #x5A46)     ; &I-J90-5A46;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 915)
       (=daikanwa         . 13205)      ; &I-M-13205;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      zhengzi-tong daikanwa shinjigen-1)
     (hanyu-dazidian    1 397 15)
     (ideographic-structure

diff --git a/lisp/utf-2000/Ideograph-R030-Mouth.el b/lisp/utf-2000/Ideograph-R030-Mouth.el
index 8716bca..f6de605 100644 (file)
--- a/lisp/utf-2000/Ideograph-R030-Mouth.el
+++ b/lisp/utf-2000/Ideograph-R030-Mouth.el
@@ -4016,7 +4016,7 @@
   '((ideographic-radical . 30) ; ⼝
     (ideographic-strokes . 4)
     (total-strokes      . 7)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (morohashi-daikanwa)
       :char    ((=daikanwa          . 03329)   ; &I-M-03329;
                 )
@@ -25519,7 +25519,7 @@
     (ideographic-radical . 30) ; ⼝
     (ideographic-strokes . 12)
     (total-strokes      . 15)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (morohashi-daikanwa)
       :char    ((=daikanwa          . 04409)   ; &I-M-04409;
                 )

diff --git a/lisp/utf-2000/Ideograph-R036-Evening.el b/lisp/utf-2000/Ideograph-R036-Evening.el
index 65a4bb9..3686d49 100644 (file)
--- a/lisp/utf-2000/Ideograph-R036-Evening.el
+++ b/lisp/utf-2000/Ideograph-R036-Evening.el
@@ -63,7 +63,7 @@
   '((ideographic-radical . 36) ; ⼣
     (ideographic-strokes . 2)
     (total-strokes      . 5)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (shinjigen-1)
       :char    ((ideographic-radical . 26)     ; ⼙
                 (shinjigen-1        . 848)
@@ -606,10 +606,10 @@
     ))
 (define-char
   '((total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 05802)      ; &I-M-05802;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      songyuan-yilai-suzipu zihui daikanwa shinjigen-1)
     (hanyu-dazidian    2 863 18)
     (shinjigen-1       . 1552)
@@ -845,11 +845,11 @@
     (ideographic-radical . 36) ; ⼣
     (ideographic-strokes . 11)
     (total-strokes      . 14)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 1550)
       (=daikanwa         . 05802)      ; &I-M-05802;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (shinjigen-1       . 1553)
     (=jis-x0212                . #x3869)       ; &M-05803;

diff --git a/lisp/utf-2000/Ideograph-R037-Big.el b/lisp/utf-2000/Ideograph-R037-Big.el
index f1052fb..2829fe7 100644 (file)
--- a/lisp/utf-2000/Ideograph-R037-Big.el
+++ b/lisp/utf-2000/Ideograph-R037-Big.el
@@ -1959,7 +1959,7 @@
   '((ideographic-radical . 37) ; ⼤
     (ideographic-strokes . 8)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (sougen-irai-zokujifu morohashi-daikanwa)
       :char    ((=daikanwa          . 19746)   ; &I-M-19746;
                 )
@@ -2530,11 +2530,11 @@
     (total-strokes      . 14)
     (=ucs              . #x5969)       ; 奩
     (->subsumptive
-     ((<-vulgar-ideograph
+     ((<-vulgar
        ((shinjigen-1       . 796)
        (=ucs               . #x5333)   ; 匳
        ))
-      (<-vulgar-ideograph*sources
+      (<-vulgar*sources
        shinjigen-1)
       (shinjigen-1       . 799)
       (shinjigen-2       . 799)

diff --git a/lisp/utf-2000/Ideograph-R038-Woman.el b/lisp/utf-2000/Ideograph-R038-Woman.el
index c22d78e..cd97d21 100644 (file)
--- a/lisp/utf-2000/Ideograph-R038-Woman.el
+++ b/lisp/utf-2000/Ideograph-R038-Woman.el
@@ -1907,7 +1907,7 @@
   '((ideographic-radical . 38) ; ⼥
     (ideographic-strokes . 5)
     (total-strokes      . 8)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((=daikanwa          . 06164)   ; &I-M-06164;
                 )
       :sources (morohashi-daikanwa)))

diff --git a/lisp/utf-2000/Ideograph-R040-Roof.el b/lisp/utf-2000/Ideograph-R040-Roof.el
index 95b66dd..81e13e5 100644 (file)
--- a/lisp/utf-2000/Ideograph-R040-Roof.el
+++ b/lisp/utf-2000/Ideograph-R040-Roof.el
@@ -2596,7 +2596,7 @@
     (ideographic-radical . 40) ; ⼧
     (ideographic-strokes . 8)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((=daikanwa          . 01587)   ; &I-M-01587;
                 )
       :sources (seiji-tsuu morohashi-daikanwa)))

diff --git a/lisp/utf-2000/Ideograph-R044-Corpse.el b/lisp/utf-2000/Ideograph-R044-Corpse.el
index bce58d7..1feb382 100644 (file)
--- a/lisp/utf-2000/Ideograph-R044-Corpse.el
+++ b/lisp/utf-2000/Ideograph-R044-Corpse.el
@@ -819,10 +819,10 @@
      ((=ucs              . #x665D)     ; 晝
       (=jis-x0208        . #x5A6C)     ; &I-J90-5A6C;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 13948)      ; &I-M-13948;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      songyuan-yilai-suzipu daikanwa)
     (shinjigen-2       . 3309)
     (=ucs              . #x663C)       ; 昼

diff --git a/lisp/utf-2000/Ideograph-R053-Dotted-Cliff.el b/lisp/utf-2000/Ideograph-R053-Dotted-Cliff.el
index 87de0eb..afef3ec 100644 (file)
--- a/lisp/utf-2000/Ideograph-R053-Dotted-Cliff.el
+++ b/lisp/utf-2000/Ideograph-R053-Dotted-Cliff.el
@@ -1699,7 +1699,7 @@
     (ideographic-radical . 53) ; ⼴
     (ideographic-strokes . 7)
     (total-strokes      . 10)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (seiji-tsuu morohashi-daikanwa shinjigen-1)
       :char    ((shinjigen-1        . 879)
                 (=daikanwa          . 02942)   ; &I-M-02942;
@@ -3451,7 +3451,7 @@
     (ideographic-radical . 53) ; ⼴
     (ideographic-strokes . 11)
     (total-strokes      . 14)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (jiyun morohashi-daikanwa)
       :char    ((=daikanwa          . 09453)   ; &I-M-09453;
                 )
@@ -3484,7 +3484,7 @@
     (ideographic-radical . 53) ; ⼴
     (ideographic-strokes . 11)
     (total-strokes      . 14)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((shinjigen-1        . 2207)
                 (=gt                . 11902)   ; &GT-11902;
                 )

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index 4aa2ea1..8d79130 100644 (file)
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -67,7 +67,7 @@
     (ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 2)
     (total-strokes      . 5)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((=daikanwa          . 16349)   ; &I-M-16349;
                 )
       :sources (morohashi-daikanwa)))
@@ -108,10 +108,10 @@
   '((ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 3)
     (total-strokes      . 6)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 21890)      ; &I-M-21890;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa)
     (=ucs              . #x22450)      ; 𢑐
     (=cns11643-6       . #x246E)       ; &I-C6-246E;

diff --git a/lisp/utf-2000/Ideograph-R061-Heart.el b/lisp/utf-2000/Ideograph-R061-Heart.el
index a9afd76..8ecf9b0 100644 (file)
--- a/lisp/utf-2000/Ideograph-R061-Heart.el
+++ b/lisp/utf-2000/Ideograph-R061-Heart.el
@@ -7250,14 +7250,14 @@
      ((=jis-x0208        . #x584E)     ; &GT-13968;
       (=daikanwa         . 11094)      ; &I-M-11094;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((ideographic-radical . 61)       ; ⼼
       (ideographic-strokes . 11)
       (total-strokes      . 14)
       (shinjigen-2       . 2544)
       (=daikanwa         . 11094)      ; &I-M-11094;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa)
     (shinjigen-2       . 2543)
     (=ucs              . #x60E8)       ; 惨

diff --git a/lisp/utf-2000/Ideograph-R072-Sun.el b/lisp/utf-2000/Ideograph-R072-Sun.el
index 0fb0e2d..361d837 100644 (file)
--- a/lisp/utf-2000/Ideograph-R072-Sun.el
+++ b/lisp/utf-2000/Ideograph-R072-Sun.el
@@ -388,12 +388,12 @@
   '((ideographic-radical . 72) ; ⽇
     (ideographic-strokes . 3)
     (total-strokes      . 7)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 3267)
       (=jis-x0208        . #x3B5D)     ; &I-J90-3B5D;
       (=daikanwa         . 13738)      ; &I-M-13738;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (shinjigen-1       . 3269)
     (shinjigen-2       . 3269)
@@ -1830,10 +1830,10 @@
      ((=ucs              . #x665D)     ; 晝
       (=jis-x0208        . #x5A6C)     ; &I-J90-5A6C;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 13948)      ; &I-M-13948;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      songyuan-yilai-suzipu daikanwa)
     (shinjigen-2       . 3309)
     (=ucs              . #x663C)       ; 昼

diff --git a/lisp/utf-2000/Ideograph-R075-Tree.el b/lisp/utf-2000/Ideograph-R075-Tree.el
index 1decf9a..7f9f632 100644 (file)
--- a/lisp/utf-2000/Ideograph-R075-Tree.el
+++ b/lisp/utf-2000/Ideograph-R075-Tree.el
@@ -5107,7 +5107,7 @@
   '((ideographic-radical . 75) ; ⽊
     (ideographic-strokes . 6)
     (total-strokes      . 12)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((=daikanwa          . 15010)   ; &I-M-15010;
                 )
       :sources (seiji-tsuu morohashi-daikanwa)))
@@ -7683,10 +7683,10 @@
     ))
 (define-char
   '((total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 05802)      ; &I-M-05802;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      songyuan-yilai-suzipu zihui daikanwa shinjigen-1)
     (hanyu-dazidian    2 863 18)
     (shinjigen-1       . 1552)
@@ -18099,11 +18099,11 @@
       ))
     (->synonyms@seiji-tsuu*sources
      seiji-tsuu jiyun daikanwa)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 932)
       (=daikanwa         . 03220)      ; &I-M-03220;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (hanyu-dazidian    2 1288 18)
     (shinjigen-1       . 933)

diff --git a/lisp/utf-2000/Ideograph-R079-Weapon.el b/lisp/utf-2000/Ideograph-R079-Weapon.el
index a65e986..051fe1a 100644 (file)
--- a/lisp/utf-2000/Ideograph-R079-Weapon.el
+++ b/lisp/utf-2000/Ideograph-R079-Weapon.el
@@ -267,10 +267,10 @@
       (=jis-x0213-1-2000  . #x7649)    ; &I-JX1-7649;
       (=daikanwa         . 16638)      ; &I-M-16638;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 16638)      ; &I-M-16638;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa)
     (shinjigen-1       . 3996)
     (shinjigen-2       . 3996)

diff --git a/lisp/utf-2000/Ideograph-R085-Water.el b/lisp/utf-2000/Ideograph-R085-Water.el
index ecd3f03..03dc009 100644 (file)
--- a/lisp/utf-2000/Ideograph-R085-Water.el
+++ b/lisp/utf-2000/Ideograph-R085-Water.el
@@ -9835,10 +9835,10 @@
      ((=ucs              . #x6EAB)     ; 溫
       (=jis-x0213-1-2000  . #x767C)    ; &I-JX1-767C;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 17968)      ; &I-M-17968;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      zihui daikanwa)
     (shinjigen-2       . 4319)
     (=ucs              . #x6E29)       ; 温
@@ -20704,7 +20704,7 @@
     (ideographic-radical . 85) ; ⽔
     (ideographic-strokes . 14)
     (total-strokes      . 17)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((=daikanwa          . 18659)   ; &I-M-18659;
                 )
       :sources (seiji-tsuu morohashi-daikanwa)))

diff --git a/lisp/utf-2000/Ideograph-R086-Fire.el b/lisp/utf-2000/Ideograph-R086-Fire.el
index 13d43ef..5ea90ca 100644 (file)
--- a/lisp/utf-2000/Ideograph-R086-Fire.el
+++ b/lisp/utf-2000/Ideograph-R086-Fire.el
@@ -172,7 +172,7 @@
     (ideographic-radical . 86) ; ⽕
     (ideographic-strokes . 2)
     (total-strokes      . 6)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((=daikanwa          . 18858)   ; &I-M-18858;
                 )
       :sources (chuuka-daijiten morohashi-daikanwa)))
@@ -199,10 +199,10 @@
     (ideographic-radical . 86) ; ⽕
     (ideographic-strokes . 2)
     (total-strokes      . 6)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 18858)      ; &I-M-18858;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      zhonghua-dazidian daikanwa)
     (ideographic-structure
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER SURROUND FROM UPPER LEFT")
@@ -1781,7 +1781,7 @@
     (ideographic-radical . 86) ; ⽕
     (ideographic-strokes . 5)
     (total-strokes      . 9)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((=daikanwa          . 18953)   ; &I-M-18953;
                 )
       :sources (morohashi-daikanwa)))

diff --git a/lisp/utf-2000/Ideograph-R096-Jade.el b/lisp/utf-2000/Ideograph-R096-Jade.el
index 8268389..2a4b278 100644 (file)
--- a/lisp/utf-2000/Ideograph-R096-Jade.el
+++ b/lisp/utf-2000/Ideograph-R096-Jade.el
@@ -1255,7 +1255,7 @@
   '((ideographic-radical . 96) ; ⽟
     (ideographic-strokes . 5)
     (total-strokes      . 9)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (jiyun morohashi-daikanwa)
       :char    ((=daikanwa          . 20920)   ; &I-M-20920;
                 )

diff --git a/lisp/utf-2000/Ideograph-R106-White.el b/lisp/utf-2000/Ideograph-R106-White.el
index 61e2dee..9691cf0 100644 (file)
--- a/lisp/utf-2000/Ideograph-R106-White.el
+++ b/lisp/utf-2000/Ideograph-R106-White.el
@@ -328,11 +328,11 @@
     (ideographic-radical . 106)        ; ⽩
     (ideographic-strokes . 4)
     (total-strokes      . 9)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 3961)
       (=daikanwa         . 16308)      ; &I-M-16308;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (shinjigen-1       . 3962)
     (shinjigen-2       . 3962)

diff --git a/lisp/utf-2000/Ideograph-R112-Stone.el b/lisp/utf-2000/Ideograph-R112-Stone.el
index bc24c30..46a6bc8 100644 (file)
--- a/lisp/utf-2000/Ideograph-R112-Stone.el
+++ b/lisp/utf-2000/Ideograph-R112-Stone.el
@@ -619,10 +619,10 @@
       (=jis-x0213-1-2000  . #x7923)    ; &I-JX1-7923;
       (=daikanwa         . 24177)      ; &I-M-24177;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 24177)      ; &I-M-24177;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa)
     (shinjigen-2       . 5407)
     (=ucs              . #x7814)       ; 研

diff --git a/lisp/utf-2000/Ideograph-R113-Spirit.el b/lisp/utf-2000/Ideograph-R113-Spirit.el
index 7f8d36b..4efca71 100644 (file)
--- a/lisp/utf-2000/Ideograph-R113-Spirit.el
+++ b/lisp/utf-2000/Ideograph-R113-Spirit.el
@@ -2778,10 +2778,10 @@
     (ideographic-radical . 113)        ; ⽰
     (ideographic-strokes . 8)
     (total-strokes      . 13)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 24835)      ; &I-M-24835;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      sougen-irai-zokujifu daikanwa)
     (=daikanwa         . 24754)        ; &M-24754;
     ))
@@ -3803,10 +3803,10 @@
     (ideographic-radical . 113)        ; ⽰
     (ideographic-strokes . 11)
     (total-strokes      . 16)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 25267)      ; &I-M-25267;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      seiji-tsuu daikanwa)
     (=daikanwa         . 24824)        ; &M-24824;
     ))

diff --git a/lisp/utf-2000/Ideograph-R118-Bamboo.el b/lisp/utf-2000/Ideograph-R118-Bamboo.el
index 5b2e73b..a70a062 100644 (file)
--- a/lisp/utf-2000/Ideograph-R118-Bamboo.el
+++ b/lisp/utf-2000/Ideograph-R118-Bamboo.el
@@ -2404,10 +2404,10 @@
      ((=ucs              . #xFA56)     ; 節
       (=jis-x0213-1-2000  . #x7964)    ; &I-JX1-7964;
       ))
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 26243)      ; &M-26243;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      cihai daikanwa)
     (shinjigen-2       . 5805)
     (=ucs              . #x7BC0)       ; 節

diff --git a/lisp/utf-2000/Ideograph-R135-Tongue.el b/lisp/utf-2000/Ideograph-R135-Tongue.el
index e8a4901..10f1bc7 100644 (file)
--- a/lisp/utf-2000/Ideograph-R135-Tongue.el
+++ b/lisp/utf-2000/Ideograph-R135-Tongue.el
@@ -451,7 +451,7 @@
       ))
     (->same*sources
      daikanwa)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((=daikanwa          . 38671)   ; &I-M-38671;
                 )
       :sources (daikanwa))

diff --git a/lisp/utf-2000/Ideograph-R140-Grass.el b/lisp/utf-2000/Ideograph-R140-Grass.el
index 96dfe62..9b6398b 100644 (file)
--- a/lisp/utf-2000/Ideograph-R140-Grass.el
+++ b/lisp/utf-2000/Ideograph-R140-Grass.el
@@ -25598,11 +25598,11 @@
     (ideographic-radical . 140)        ; ⾋
     (ideographic-strokes . 12)
     (total-strokes      . 15)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 6886)
       (=ucs              . #x843C)     ; 萼
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      shinjigen-1)
     (hanyu-dazidian    5 3291 3)
     (shinjigen-1       . 6887)

diff --git a/lisp/utf-2000/Ideograph-R165-Distinguish.el b/lisp/utf-2000/Ideograph-R165-Distinguish.el
index b502a79..3beb0e5 100644 (file)
--- a/lisp/utf-2000/Ideograph-R165-Distinguish.el
+++ b/lisp/utf-2000/Ideograph-R165-Distinguish.el
@@ -79,10 +79,10 @@
     (ideographic-radical . 165)        ; ⾤
     (ideographic-strokes . 4)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 40129)      ; &I-M-40129;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa)
     (=gt               . 53949)        ; &GT-53949;
     (=gt-pj-7          . #x6356)       ; &GT-53949;

diff --git a/lisp/utf-2000/Ideograph-R177-Leather.el b/lisp/utf-2000/Ideograph-R177-Leather.el
index b099dfe..05e08d3 100644 (file)
--- a/lisp/utf-2000/Ideograph-R177-Leather.el
+++ b/lisp/utf-2000/Ideograph-R177-Leather.el
@@ -168,7 +168,7 @@
     (ideographic-radical . 177)        ; ⾰
     (ideographic-strokes . 3)
     (total-strokes      . 12)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:sources (doubun-tsuukou morohashi-daikanwa)
       :char    ((=daikanwa          . 42713)   ; &I-M-42713;
                 )

diff --git a/lisp/utf-2000/Ideograph-R189-Tall.el b/lisp/utf-2000/Ideograph-R189-Tall.el
index 68fa365..a6d62ab 100644 (file)
--- a/lisp/utf-2000/Ideograph-R189-Tall.el
+++ b/lisp/utf-2000/Ideograph-R189-Tall.el
@@ -28,7 +28,7 @@
     (ideographic-radical . 189)        ; ⾼
     (ideographic-strokes . 0)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      (:char    ((=daikanwa          . 45313)   ; &I-M-45313;
                 )
       :sources (inkai morohashi-daikanwa)))

diff --git a/lisp/utf-2000/Ideograph-R205-Frog.el b/lisp/utf-2000/Ideograph-R205-Frog.el
index d824d47..23ec030 100644 (file)
--- a/lisp/utf-2000/Ideograph-R205-Frog.el
+++ b/lisp/utf-2000/Ideograph-R205-Frog.el
@@ -33,10 +33,10 @@
     (ideographic-radical . 205)        ; ⿌
     (ideographic-strokes . 0)
     (total-strokes      . 8)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((=daikanwa         . 48257)      ; &I-M-48257;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      zhengzi-tong daikanwa)
     (=ucs              . #x2FA18)      ; 黾
     (=cns11643-4       . #x2834)       ; &I-C4-2834;

diff --git a/lisp/utf-2000/Ideograph-R213-Turtle.el b/lisp/utf-2000/Ideograph-R213-Turtle.el
index b5fef3d..467fff1 100644 (file)
--- a/lisp/utf-2000/Ideograph-R213-Turtle.el
+++ b/lisp/utf-2000/Ideograph-R213-Turtle.el
@@ -9,11 +9,11 @@
     (ideographic-radical@cns*sources
      shinjigen-1 cns11643 gt)
     (total-strokes      . 11)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((ideographic-radical . 213)      ; ⿔
       (=daikanwa         . 48847)      ; &I-M-48847;
       ))
-    (<-vulgar-ideograph*sources
+    (<-vulgar*sources
      daikanwa)
     (hanyu-dazidian    8 10 19)
     (ideographic-structure