case func =>
  rintro rfl; simp; rintro rfl h; simp
  funext i; exact map_inj hb he (congr_fun h i)
L : Language
L' : Language
L₁ : Language
L₂ : Language
L₃ : Language
ξ : Type u_1
ξ' : Type u_2
ξ₁ : Type u_3
ξ₂ : Type u_4
ξ₃ : Type u_5
n n₁ n₂ n₃ : ℕ
ω : Rew L ξ₁ n₁ ξ₂ n₂
b✝ : Fin n₁ → Fin n₂
e✝ : ξ₁ → ξ₂
b : Fin n₁ → Fin n₂
e : ξ₁ → ξ₂
hb : Function.Injective b
he : Function.Injective e
k : ℕ
f : L.Func k
v : Fin k → Semiterm L ξ₁ n₁
arity✝ : ℕ
a✝¹ : L.Func arity✝
a✝ : Fin arity✝ → Semiterm L ξ₁ n₁
⊢ k = arity✝ →
    HEq f a✝¹ → (HEq (fun i => (map b e) (v i)) fun i => (map b e) (a✝ i)) → k = arity✝ ∧ HEq f a✝¹ ∧ HEq v a✝
no goals