(U+6B6F): Use `->subsumptive'.

(<CJK RADICAL J-SIMPLIFIED TOOTH>): Copied from
u02E00-CJK-Radical-Supplement.el.

diff --git a/lisp/utf-2000/Ideograph-R077-Stop.el b/lisp/utf-2000/Ideograph-R077-Stop.el
index e014b47..fafdc5a 100644 (file)
--- a/lisp/utf-2000/Ideograph-R077-Stop.el
+++ b/lisp/utf-2000/Ideograph-R077-Stop.el
@@ -1018,25 +1018,43 @@
   '((ideographic-radical . 77) ; ⽌
     (ideographic-strokes . 8)
     (total-strokes      . 12)
-    (<-simplified@JP/Jouyou
-     ((=ucs              . #x9F52)     ; 齒
-      (=jis-x0208        . #x736F)     ; &I-J90-736F; [83-79]
-      ))
-    (shinjigen-2       . 9882)
     (=ucs              . #x6B6F)       ; 歯
-    (=jis-x0208                . #x3B75)       ; &I-J90-3B75; [27-85]
-    (=gt               . 66384)        ; &I-GT-66384;
-    (=gt-k             . 09061)        ; &I-GT-K09061;
-    (=gt-pj-1          . #x3B75)       ; &I-GT-66384; [27-85]
-    (=daikanwa         . 16323)        ; &I-M-16323;
+    (->subsumptive
+     ((<-simplified@JP/Jouyou
+       ((=ucs              . #x9F52)   ; 齒
+       (=jis-x0208         . #x736F)   ; &I-J90-736F; [83-79]
+       ))
+      (<-vulgar
+       ((=ucs              . #x9F52)   ; 齒
+       (=daikanwa          . 48583)    ; &I-M-48583;
+       ))
+      (<-vulgar*sources
+       songyuan-yilai-suzipu daikanwa)
+      (=jis-x0208        . #x3B75)     ; &GT-66384; [27-85]
+      (=gt               . 66384)      ; &I-GT-66384;
+      (=gt-k             . 09061)      ; &I-GT-K09061;
+      (=gt-pj-1                  . #x3B75)     ; &I-GT-66384; [27-85]
+      (=daikanwa         . 16323)      ; &I-M-16323;
+      (=ucs@unicode      . #x6B6F)     ; &GT-66384;
+      )
+     ((shinjigen-1       . 9882)
+      (shinjigen-2       . 9882)
+      )
+     ((=cns11643-3       . #x3C47)     ; &C3-3C47; [28-39]
+      ))
     ))
 (define-char
-  '((=>ucs             . #x6B6F)       ; 歯
-    (morohashi-daikanwa        16323 0 1)
-    (ideographic-radical . 77) ; ⽌
-    (ideographic-strokes . 8)
-    (total-strokes      . 12)
-    (=cns11643-3       . #x3C47)       ; &C3-3C47; [28-39]
+  '((<-denotational
+     ((=ucs              . #x6B6F)     ; 歯
+      ))
+    (name              . "CJK RADICAL J-SIMPLIFIED TOOTH")
+    (general-category  symbol other) ; Informative Category
+    (bidi-category     . "ON")
+    (mirrored          . nil)
+    (<-identical@component
+     ((=ucs              . #x6B6F)     ; 歯
+      ))
+    (=ucs              . #x2EED)       ; ⻭
     ))
 (define-char
   '((ideographic-radical . 77) ; ⽌