- Use `=jis-x0208@{1978|1983|1990}' instead of

  `=jis-x0208-{1978|1983|1990}'.
- Use `->subsumptive' or `{<-|->}denotational' for some character
  definitions.

diff --git a/lisp/utf-2000/Ideograph-R120-Silk.el b/lisp/utf-2000/Ideograph-R120-Silk.el
index 1ad25af..466d702 100644 (file)
--- a/lisp/utf-2000/Ideograph-R120-Silk.el
+++ b/lisp/utf-2000/Ideograph-R120-Silk.el
@@ -1242,8 +1242,8 @@
     (=ucs              . #x7D1B)       ; 紛
     (=big5             . #xAFC9)       ; &I-B-AFC9;
     (->subsumptive
-     ((=jis-x0208-1978   . #x4A36)     ; &GT-35189; [42-22]
-      (=jis-x0208-1983   . #x4A36)     ; &I-J83-4A36; [42-22]
+     ((=jis-x0208@1978   . #x4A36)     ; &GT-35189; [42-22]
+      (=jis-x0208@1983   . #x4A36)     ; &I-J83-4A36; [42-22]
       (=ks-x1001         . #x5D51)     ; &I-K0-5D51; [61-49]
       (=gt               . 35189)      ; &I-GT-35189;
       (=gt-k             . 06891)      ; &I-GT-K06891;
@@ -1252,7 +1252,7 @@
       (=jef-china3       . #x5EF3)     ; &I-JC3-5EF3;
       )
      ((shinjigen-2       . 5993)
-      (=jis-x0208-1990   . #x4A36)     ; &GT-35190; [42-22]
+      (=jis-x0208@1990   . #x4A36)     ; &GT-35190; [42-22]
       (=gt               . 35190)      ; &I-GT-35190;
       (=gt-pj-1                  . #x4A36)     ; &I-GT-35190; [42-22]
       (=ucs@jis                  . #x7D1B)     ; &GT-35190;
@@ -3400,13 +3400,13 @@
     (=ucs              . #x7D5E)       ; 絞
     (=big5             . #xB5B1)       ; &I-B-B5B1;
     (->subsumptive
-     ((=jis-x0208-1978   . #x394A)     ; &M-27421; [25-42]
-      (=jis-x0208-1983   . #x394A)     ; &I-J83-394A; [25-42]
+     ((=jis-x0208@1978   . #x394A)     ; &M-27421; [25-42]
+      (=jis-x0208@1983   . #x394A)     ; &I-J83-394A; [25-42]
       (=ks-x1001         . #x4E6D)     ; &I-K0-4E6D; [46-77]
       (=daikanwa         . 27421)      ; &I-M-27421;
       )
      ((shinjigen-2       . 6038)
-      (=jis-x0208-1990   . #x394A)     ; &GT-35308; [25-42]
+      (=jis-x0208@1990   . #x394A)     ; &GT-35308; [25-42]
       (=gt               . 35308)      ; &I-GT-35308;
       (=gt-pj-1                  . #x394A)     ; &I-GT-35308; [25-42]
       (=ucs@jis                  . #x7D5E)     ; &GT-35308;
@@ -3860,7 +3860,7 @@
       (total-strokes      . 12)
       (shinjigen-2       . 6040)
       (=ks-x1001         . #x4B34)     ; &GT-35305; [43-20]
-      (=jis-x0208-1990   . #x652C)     ; &I-J90-652C; [69-12]
+      (=jis-x0208@1990   . #x652C)     ; &I-J90-652C; [69-12]
       (=gt               . 35305)      ; &I-GT-35305;
       (=gt-pj-1                  . #x652C)     ; &I-GT-35305; [69-12]
       (=daikanwa         . 27449)      ; &I-M-27449;
@@ -3868,8 +3868,8 @@
       )
      ((ideographic-strokes . 7)
       (total-strokes      . 13)
-      (=jis-x0208-1978   . #x652C)     ; &J83-652C; [69-12]
-      (=jis-x0208-1983   . #x652C)     ; &I-J83-652C; [69-12]
+      (=jis-x0208@1978   . #x652C)     ; &J83-652C; [69-12]
+      (=jis-x0208@1983   . #x652C)     ; &I-J83-652C; [69-12]
       )
      ((ideographic-strokes . 6)
       (total-strokes      . 12)
@@ -5251,7 +5251,7 @@
     (total-strokes      . 13)
     (=ucs              . #x7D9B)       ; 綛
     (->subsumptive
-     ((=jis-x0208-1978   . #x6539)     ; &M-27534; [69-25]
+     ((=jis-x0208@1978   . #x6539)     ; &M-27534; [69-25]
       (=daikanwa         . 27534)      ; &I-M-27534;
       )
      ((=gt               . 35366)      ; &GT-35366;
@@ -5259,8 +5259,8 @@
       )
      ((=ucs@unicode      . #x7D9B)     ; &UU+7D9B;
       )
-     ((=jis-x0208-1983   . #x6539)     ; &GT-35367; [69-25]
-      (=jis-x0208-1990   . #x6539)     ; &I-J90-6539; [69-25]
+     ((=jis-x0208@1983   . #x6539)     ; &GT-35367; [69-25]
+      (=jis-x0208@1990   . #x6539)     ; &I-J90-6539; [69-25]
       (=gt               . 35367)      ; &I-GT-35367;
       (=gt-pj-1                  . #x6539)     ; &I-GT-35367; [69-25]
       (=jef-china3       . #x5FE1)     ; &I-JC3-5FE1;
@@ -5535,33 +5535,46 @@
 (define-char
   '((ideographic-radical . 120)        ; ⽷
     (=ucs              . #x7D9F)       ; 綟
+    ))
+(define-char
+  '((ideographic-radical . 120)        ; ⽷
+    (ideographic-strokes . 8)
+    (total-strokes      . 14)
+    (<-denotational
+     ((=ucs              . #x7D9F)     ; 綟
+      ))
     (->subsumptive
-     ((ideographic-strokes . 8)
-      (total-strokes      . 14)
-      (=big5             . #xE374)     ; &B-E374;
+     ((=big5             . #xE374)     ; &B-E374;
       (->subsumptive
-       ((=jis-x0208-1978    . #x6546)  ; &M-27540; [69-38]
+       ((=jis-x0208@1978    . #x6546)  ; &M-27540; [69-38]
        (=daikanwa          . 27540)    ; &I-M-27540;
        )
        ((=cns11643-2       . #x4C7B)   ; &C2-4C7B; [44-91]
        ))
       )
-     ((ideographic-strokes . 8)
-      (total-strokes      . 14)
-      (=ucs@unicode      . #x7D9F)     ; &UU+7D9F;
-      )
-     ((ideographic-strokes . 7)
-      (total-strokes      . 13)
-      (=jis-x0208-1983   . #x6546)     ; &GT-35449; [69-38]
-      (=jis-x0208-1990   . #x6546)     ; &I-J90-6546; [69-38]
-      (=gt               . 35449)      ; &I-GT-35449;
-      (=gt-pj-1                  . #x6546)     ; &I-GT-35449; [69-38]
-      (=jef-china3       . #x5FE2)     ; &I-JC3-5FE2;
-      (=ucs@jis                  . #x7D9F)     ; &GT-35449;
+     ((=ucs@unicode      . #x7D9F)     ; &UU+7D9F;
       ))
     ))
 (define-char
   '((ideographic-radical . 120)        ; ⽷
+    (ideographic-strokes . 7)
+    (total-strokes      . 13)
+    (<-denotational
+     ((=ucs              . #x7D9F)     ; 綟
+      ))
+    (<-simplified@JP
+     ((=jis-x0208@1978   . #x6546)     ; &M-27540; [69-38]
+      (=daikanwa         . 27540)      ; &I-M-27540;
+      ))
+    (=jis-x0208@1983   . #x6546)       ; &GT-35449; [69-38]
+    (=jis-x0208@1990   . #x6546)       ; &I-J90-6546; [69-38]
+    (=gt               . 35449)        ; &I-GT-35449;
+    (=gt-pj-1          . #x6546)       ; &I-GT-35449; [69-38]
+    (=jef-china3       . #x5FE2)       ; &I-JC3-5FE2;
+    (=ucs@jis          . #x7D9F)       ; &GT-35449;
+    ))
+(define-char
+  '((ideographic-radical . 120)        ; ⽷
     (ideographic-strokes . 8)
     (total-strokes      . 14)
     (=ucs              . #x7DA0)       ; 綠
@@ -5986,13 +5999,13 @@
     (total-strokes      . 14)
     (=ucs              . #x7DAE)       ; 綮
     (->subsumptive
-     ((=jis-x0208-1978   . #x653B)     ; &M-27569; [69-27]
+     ((=jis-x0208@1978   . #x653B)     ; &M-27569; [69-27]
       (=cns11643-2       . #x4C7D)     ; &I-C2-4C7D; [44-93]
       (=big5             . #xE376)     ; &I-B-E376;
       (=daikanwa         . 27569)      ; &I-M-27569;
       )
-     ((=jis-x0208-1983   . #x653B)     ; &GT-35486; [69-27]
-      (=jis-x0208-1990   . #x653B)     ; &I-J90-653B; [69-27]
+     ((=jis-x0208@1983   . #x653B)     ; &GT-35486; [69-27]
+      (=jis-x0208@1990   . #x653B)     ; &I-J90-653B; [69-27]
       (=gt               . 35486)      ; &I-GT-35486;
       (=gt-pj-1                  . #x653B)     ; &I-GT-35486; [69-27]
       (=jef-china3       . #x5FE3)     ; &I-JC3-5FE3;
@@ -6577,12 +6590,12 @@
     (->subsumptive
      ((shinjigen-1       . 6096)
       (shinjigen-2       . 6096)
-      (=jis-x0208-1978   . #x486C)     ; &M-27604; [40-76]
-      (=jis-x0208-1983   . #x486C)     ; &I-J83-486C; [40-76]
+      (=jis-x0208@1978   . #x486C)     ; &M-27604; [40-76]
+      (=jis-x0208@1983   . #x486C)     ; &I-J83-486C; [40-76]
       (=daikanwa         . 27604)      ; &I-M-27604;
       )
      ((=ks-x1001         . #x5D7C)     ; &GT-35549; [61-92]
-      (=jis-x0208-1990   . #x486C)     ; &I-J90-486C; [40-76]
+      (=jis-x0208@1990   . #x486C)     ; &I-J90-486C; [40-76]
       (=gt               . 35549)      ; &I-GT-35549;
       (=gt-pj-1                  . #x486C)     ; &I-GT-35549; [40-76]
       (=ucs@jis                  . #x7DCB)     ; &GT-35549;
@@ -6809,8 +6822,8 @@
     (total-strokes      . 14)
     (=ucs              . #x7DCF)       ; 総
     (->subsumptive
-     ((=jis-x0208-1978   . #x416D)     ; &GT-35531; [33-77]
-      (=jis-x0208-1983   . #x416D)     ; &I-J83-416D; [33-77]
+     ((=jis-x0208@1978   . #x416D)     ; &GT-35531; [33-77]
+      (=jis-x0208@1983   . #x416D)     ; &I-J83-416D; [33-77]
       (=gt               . 35531)      ; &I-GT-35531;
       (=gt-pj-5                  . #x6D25)     ; &I-GT-35531; [77-05]
       (=daikanwa         . 27620)      ; &I-M-27620;
@@ -6821,7 +6834,7 @@
        (=daikanwa          . 27844)    ; &I-M-27844;
        ))
       (shinjigen-2       . 6088)
-      (=jis-x0208-1990   . #x416D)     ; &GT-35532; [33-77]
+      (=jis-x0208@1990   . #x416D)     ; &GT-35532; [33-77]
       (=gt               . 35532)      ; &I-GT-35532;
       (=gt-pj-1                  . #x416D)     ; &I-GT-35532; [33-77]
       (=ucs@jis                  . #x7DCF)     ; &GT-35532;
@@ -7465,15 +7478,15 @@
     (->subsumptive
      ((shinjigen-1       . 6116)
       (shinjigen-2       . 6116)
-      (=jis-x0208-1978   . #x6549)     ; &GT-35635; [69-41]
-      (=jis-x0208-1983   . #x6549)     ; &I-J83-6549; [69-41]
+      (=jis-x0208@1978   . #x6549)     ; &GT-35635; [69-41]
+      (=jis-x0208@1983   . #x6549)     ; &I-J83-6549; [69-41]
       (=gt               . 35635)      ; &I-GT-35635;
       (=gt-k             . 11999)      ; &I-GT-K11999;
       (=gt-pj-1                  . #x6549)     ; &I-GT-35635; [69-41]
       (=daikanwa         . 27645)      ; &I-M-27645;
       )
      ((=ks-x1001         . #x727D)     ; &J90-6549; [82-93]
-      (=jis-x0208-1990   . #x6549)     ; &I-J90-6549; [69-41]
+      (=jis-x0208@1990   . #x6549)     ; &I-J90-6549; [69-41]
       (=ucs@jis                  . #x7DDD)     ; &J90-6549;
       )
      ((=gb12345                  . #x3C29)     ; &UU+7DDD; [28-09]
@@ -8073,13 +8086,13 @@
       (total-strokes      . 16)
       (shinjigen-1       . 6134)
       (shinjigen-2       . 6136)
-      (=jis-x0208-1978   . #x305E)     ; &J83-305E; [16-62]
-      (=jis-x0208-1983   . #x305E)     ; &I-J83-305E; [16-62]
+      (=jis-x0208@1978   . #x305E)     ; &J83-305E; [16-62]
+      (=jis-x0208@1983   . #x305E)     ; &I-J83-305E; [16-62]
       )
      ((ideographic-strokes . 10)
       (total-strokes      . 16)
       (=ks-x1001         . #x6A55)     ; &GT-35707; [74-53]
-      (=jis-x0208-1990   . #x305E)     ; &I-J90-305E; [16-62]
+      (=jis-x0208@1990   . #x305E)     ; &I-J90-305E; [16-62]
       (=gt               . 35707)      ; &I-GT-35707;
       (=gt-pj-1                  . #x305E)     ; &I-GT-35707; [16-62]
       (=ucs@jis                  . #x7DEF)     ; &GT-35707;
@@ -10737,16 +10750,17 @@
     (=ucs              . #x7E35)       ; 縵
     (=big5             . #xC167)       ; &I-B-C167;
     (->subsumptive
-     ((=jis-x0208-1978   . #x655C)     ; &M-27829; [69-60]
-      (=jis-x0208-1983   . #x655C)     ; &I-J83-655C; [69-60]
-      (=daikanwa         . 27829)      ; &I-M-27829;
+     ((=daikanwa         . 27829)      ; &M-27829;
       )
      ((=gt               . 35897)      ; &GT-35897;
       (=gt-pj-5                  . #x6F2A)     ; &GT-35897; [79-10]
       )
      ((=cns11643-1       . #x7471)     ; &C1-7471; [84-81]
       )
-     ((=jis-x0208-1990   . #x655C)     ; &GT-35898; [69-60]
+     ((=jis-x0208@1978   . #x655C)     ; &J83-655C; [69-60]
+      (=jis-x0208@1983   . #x655C)     ; &I-J83-655C; [69-60]
+      )
+     ((=jis-x0208@1990   . #x655C)     ; &GT-35898; [69-60]
       (=gt               . 35898)      ; &I-GT-35898;
       (=gt-pj-1                  . #x655C)     ; &I-GT-35898; [69-60]
       (=ucs@jis                  . #x7E35)     ; &GT-35898;
@@ -11526,8 +11540,14 @@
     (=ucs              . #x7E4B)       ; 繋
     (->subsumptive
      ((morohashi-daikanwa      ho 486)
-      (=jis-x0208-1983   . #x3752)     ; &GT-35822; [23-50]
-      (=jis-x0208-1990   . #x3752)     ; &I-J90-3752; [23-50]
+      (<-simplified@JP
+       ((=jis-x0208@1978    . #x3752)  ; &M-27940; [23-50]
+       (=ks-x1001          . #x4D28)   ; &I-K0-4D28; [45-08]
+       (=jis-x0212         . #x545A)   ; &I-JSP-545A; [52-58]
+       (=daikanwa          . 27940)    ; &I-M-27940;
+       ))
+      (=jis-x0208@1983   . #x3752)     ; &GT-35822; [23-50]
+      (=jis-x0208@1990   . #x3752)     ; &I-J90-3752; [23-50]
       (=gt               . 35822)      ; &I-GT-35822;
       (=gt-pj-1                  . #x3752)     ; &I-GT-35822; [23-50]
       (=ucs@jis                  . #x7E4B)     ; &GT-35822;
@@ -11560,8 +11580,8 @@
     (total-strokes      . 17)
     (=ucs              . #x7E4D)       ; 繍
     (->subsumptive
-     ((=jis-x0208-1983   . #x3D2B)     ; &GT-35841; [29-11]
-      (=jis-x0208-1990   . #x3D2B)     ; &I-J90-3D2B; [29-11]
+     ((=jis-x0208@1983   . #x3D2B)     ; &GT-35841; [29-11]
+      (=jis-x0208@1990   . #x3D2B)     ; &I-J90-3D2B; [29-11]
       (=gt               . 35841)      ; &I-GT-35841;
       (=gt-pj-1                  . #x3D2B)     ; &I-GT-35841; [29-11]
       (=ucs@jis                  . #x7E4D)     ; &GT-35841;
@@ -12195,7 +12215,7 @@
     (=ucs              . #x7E61)       ; 繡
     (=big5             . #xC2B8)       ; &I-B-C2B8;
     (->subsumptive
-     ((=jis-x0208-1978   . #x3D2B)     ; &M-27913; [29-11]
+     ((=jis-x0208@1978   . #x3D2B)     ; &M-27913; [29-11]
       (=ks-x1001         . #x6239)     ; &I-K0-6239; [66-25]
       (=jis-x0212        . #x5457)     ; &I-JSP-5457; [52-55]
       (=jis-x0213-1-2000  . #x7A36)    ; &I-JX1-7A36; [90-22]
@@ -12611,7 +12631,7 @@
     (->subsumptive
      ((=big5             . #xC3B4)     ; &B-C3B4;
       (->subsumptive
-       ((=jis-x0208-1978    . #x3752)  ; &M-27940; [23-50]
+       ((=jis-x0208@1978    . #x3752)  ; &M-27940; [23-50]
        (=ks-x1001          . #x4D28)   ; &I-K0-4D28; [45-08]
        (=jis-x0212         . #x545A)   ; &I-JSP-545A; [52-58]
        (=daikanwa          . 27940)    ; &I-M-27940;