(U+970D): Apply new conventions for glyph granularity.

diff --git a/lisp/utf-2000/Ideograph-R173-Rain.el b/lisp/utf-2000/Ideograph-R173-Rain.el
index b5663d9..fab4fd5 100644 (file)
--- a/lisp/utf-2000/Ideograph-R173-Rain.el
+++ b/lisp/utf-2000/Ideograph-R173-Rain.el
@@ -1712,15 +1712,14 @@
       (=daikanwa         . 42321)      ; &I-M-42321;
       (=shinjigen@rev    .  8965)      ; &GT-56813;
       (->subsumptive
-       ((==ucs@jis         . #x970D)   ; &R-GT-56813;
-       (==jis-x0208        . #x7039)   ; &R-GT-56813; [80-25]
-       (==jis-x0213-1      . #x7039)   ; &R-GT-56813; [80-25]
-       (==gt               . 56813)    ; &R-GT-56813;
-       (==daikanwa         . 42321)    ; &R-GT-56813;
-       (==shinjigen@rev    .  8965)    ; &R-GT-56813;
+       ((===daikanwa       . #xA551)   ; &R2-M-42321;
        )
-       ((==ucs@unicode     . #x970D)   ; &R-UU+970D;
-       (==gb2312           . #x3B74)   ; &R-UU+970D; [27-84]
+       ((===jis-x0208      . #x7039)   ; &R2-J90-7039; [80-25]
+       (===jis-x0213-1     . #x7039)   ; &R2-J90-7039; [80-25]
+       )
+       ((===gt             . #xDDED)   ; &R2-GT-56813;
+       )
+       ((===ucs@unicode            . #x970D)   ; &R2-UU+970D;
        ))
       )
      ((=cns11643-1       . #x7277)     ; &C1-7277; [82-87]