-- Mathlib/Analysis/Convolution.lean
theorem _root_.HasCompactSupport.contDiff_convolution_right {n : ℕ∞} (hcg : HasCompactSupport g)
    (hf : LocallyIntegrable f μ) (hg : ContDiff 𝕜 n g) : ContDiff 𝕜 n (f ⋆[L, μ] g)

Proof state:
case intro.intro
𝕜 : Type u𝕜
G : Type uG
E : Type uE
E' : Type uE'
F : Type uF
inst✝¹¹ : NormedAddCommGroup E
inst✝¹⁰ : NormedAddCommGroup E'
inst✝⁹ : NormedAddCommGroup F
f : G → E
g : G → E'
inst✝⁸ : RCLike 𝕜
inst✝⁷ : NormedSpace 𝕜 E
inst✝⁶ : NormedSpace 𝕜 E'
inst✝⁵ : NormedSpace ℝ F
inst✝⁴ : NormedSpace 𝕜 F
inst✝³ : MeasurableSpace G
inst✝² : NormedAddCommGroup G
inst✝¹ : BorelSpace G
inst✝ : NormedSpace 𝕜 G
μ : Measure G
L : E →L[𝕜] E' →L[𝕜] F
n : ℕ∞
hcg : HasCompactSupport g
hf : LocallyIntegrable f μ
hg : ContDiff 𝕜 (↑n) g
k : Set G
hk : IsCompact k
h'k : ∀ x ∉ k, g x = 0
⊢ ContDiff 𝕜 (↑n) (f ⋆[L, μ] g)

Tactic:
rw [← contDiffOn_univ]

Result:
case intro.intro
𝕜 : Type u𝕜
G : Type uG
E : Type uE
E' : Type uE'
F : Type uF
inst✝¹¹ : NormedAddCommGroup E
inst✝¹⁰ : NormedAddCommGroup E'
inst✝⁹ : NormedAddCommGroup F
f : G → E
g : G → E'
inst✝⁸ : RCLike 𝕜
inst✝⁷ : NormedSpace 𝕜 E
inst✝⁶ : NormedSpace 𝕜 E'
inst✝⁵ : NormedSpace ℝ F
inst✝⁴ : NormedSpace 𝕜 F
inst✝³ : MeasurableSpace G
inst✝² : NormedAddCommGroup G
inst✝¹ : BorelSpace G
inst✝ : NormedSpace 𝕜 G
μ : Measure G
L : E →L[𝕜] E' →L[𝕜] F
n : ℕ∞
hcg : HasCompactSupport g
hf : LocallyIntegrable f μ
hg : ContDiff 𝕜 (↑n) g
k : Set G
hk : IsCompact k
h'k : ∀ x ∉ k, g x = 0
⊢ ContDiffOn 𝕜 (↑n) (f ⋆[L, μ] g) univ

Proof state:
case intro.intro
𝕜 : Type u𝕜
G : Type uG
E : Type uE
E' : Type uE'
F : Type uF
inst✝¹¹ : NormedAddCommGroup E
inst✝¹⁰ : NormedAddCommGroup E'
inst✝⁹ : NormedAddCommGroup F
f : G → E
g : G → E'
inst✝⁸ : RCLike 𝕜
inst✝⁷ : NormedSpace 𝕜 E
inst✝⁶ : NormedSpace 𝕜 E'
inst✝⁵ : NormedSpace ℝ F
inst✝⁴ : NormedSpace 𝕜 F
inst✝³ : MeasurableSpace G
inst✝² : NormedAddCommGroup G
inst✝¹ : BorelSpace G
inst✝ : NormedSpace 𝕜 G
μ : Measure G
L : E →L[𝕜] E' →L[𝕜] F
n : ℕ∞
hcg : HasCompactSupport g
hf : LocallyIntegrable f μ
hg : ContDiff 𝕜 (↑n) g
k : Set G
hk : IsCompact k
h'k : ∀ x ∉ k, g x = 0
⊢ ContDiffOn 𝕜 (↑n) (f ⋆[L, μ] g) univ

Tactic:
exact contDiffOn_convolution_right_with_param_comp L contDiffOn_id isOpen_univ hk
  (fun p x _ hx => h'k x hx) hf (hg.comp contDiff_snd).contDiffOn

Result:
no goals

Proof state:
𝕜 : Type u𝕜
G : Type uG
E : Type uE
E' : Type uE'
F : Type uF
inst✝¹¹ : NormedAddCommGroup E
inst✝¹⁰ : NormedAddCommGroup E'
inst✝⁹ : NormedAddCommGroup F
f : G → E
g : G → E'
inst✝⁸ : RCLike 𝕜
inst✝⁷ : NormedSpace 𝕜 E
inst✝⁶ : NormedSpace 𝕜 E'
inst✝⁵ : NormedSpace ℝ F
inst✝⁴ : NormedSpace 𝕜 F
inst✝³ : MeasurableSpace G
inst✝² : NormedAddCommGroup G
inst✝¹ : BorelSpace G
inst✝ : NormedSpace 𝕜 G
μ : Measure G
L : E →L[𝕜] E' →L[𝕜] F
n : ℕ∞
hcg : HasCompactSupport g
hf : LocallyIntegrable f μ
hg : ContDiff 𝕜 (↑n) g
⊢ ContDiff 𝕜 (↑n) (f ⋆[L, μ] g)

Tactic:
rcases exists_compact_iff_hasCompactSupport.2 hcg with ⟨k, hk, h'k⟩

Result:
case intro.intro
𝕜 : Type u𝕜
G : Type uG
E : Type uE
E' : Type uE'
F : Type uF
inst✝¹¹ : NormedAddCommGroup E
inst✝¹⁰ : NormedAddCommGroup E'
inst✝⁹ : NormedAddCommGroup F
f : G → E
g : G → E'
inst✝⁸ : RCLike 𝕜
inst✝⁷ : NormedSpace 𝕜 E
inst✝⁶ : NormedSpace 𝕜 E'
inst✝⁵ : NormedSpace ℝ F
inst✝⁴ : NormedSpace 𝕜 F
inst✝³ : MeasurableSpace G
inst✝² : NormedAddCommGroup G
inst✝¹ : BorelSpace G
inst✝ : NormedSpace 𝕜 G
μ : Measure G
L : E →L[𝕜] E' →L[𝕜] F
n : ℕ∞
hcg : HasCompactSupport g
hf : LocallyIntegrable f μ
hg : ContDiff 𝕜 (↑n) g
k : Set G
hk : IsCompact k
h'k : ∀ x ∉ k, g x = 0
⊢ ContDiff 𝕜 (↑n) (f ⋆[L, μ] g)