ext b
L : Language
μ : Type v
inst✝⁴ : (k : ℕ) → Primcodable (L.Func k)
inst✝³ : (k : ℕ) → Primcodable (L.Rel k)
inst✝² : UniformlyPrimcodable L.Func
inst✝¹ : UniformlyPrimcodable L.Rel
inst✝ : Primcodable μ
w : Edge L μ (false, Sum.inr (Sum.inr (Sum.inl ()))) → WType (Edge L μ)
⊢ (fun t => Bool.rec (w false) (w true) t) = w
case h
L : Language
μ : Type v
inst✝⁴ : (k : ℕ) → Primcodable (L.Func k)
inst✝³ : (k : ℕ) → Primcodable (L.Rel k)
inst✝² : UniformlyPrimcodable L.Func
inst✝¹ : UniformlyPrimcodable L.Rel
inst✝ : Primcodable μ
w : Edge L μ (false, Sum.inr (Sum.inr (Sum.inl ()))) → WType (Edge L μ)
b : Bool
⊢ Bool.rec (w false) (w true) b = w b