{R : Type u_1} →
  {A : Type u_2} →
    {p : A → Prop} →
      [inst : CommSemiring R] →
        [inst_1 : StarRing R] →
          [inst_2 : MetricSpace R] →
            [inst_3 : IsTopologicalSemiring R] →
              [inst_4 : ContinuousStar R] →
                [inst_5 : Ring A] →
                  [inst_6 : StarRing A] →
                    [inst_7 : MetricSpace A] →
                      [inst_8 : Algebra R A] →
                        {motive : IsometricContinuousFunctionalCalculus R A p → Sort u} →
                          (t : IsometricContinuousFunctionalCalculus R A p) →
                            ([toContinuousFunctionalCalculus : ContinuousFunctionalCalculus R A p] →
                                (isometric : ∀ (a : A) (ha : p a), Isometry ⇑(cfcHom ha)) → motive ⋯) →
                              motive t