「クラスを抽出」というリファクタリングがあるとしたらどういうものだろうか ref: https://qiita.com/snipsnipsnip/items/3a8d018d683d2c54ea15

file0.txt

   interface R {
      $(D1)
      $(V1)
    }

file1.txt

    class S {
      private R r;

      $(V2)

      public S(R r) {
         this.r = r;
      }

      $(rへの移譲でD1を実装)
      $(rへの移譲でV1を実装)
      $(M)
      $(D2)
    }