Compare commits

...

1 Commits

Author SHA1 Message Date
Kim Morrison
f4a238fc13 chore: fix explicitness of List.bind_map 2024-06-21 21:24:13 +10:00

View File

@@ -1275,7 +1275,7 @@ theorem map_bind (f : β → γ) (g : α → List β) :
| [] => rfl
| a::l => by simp only [bind_cons, map_append, map_bind _ _ l]
theorem bind_map {f : α β} {g : β List γ} (l : List α) : (map f l).bind g = l.bind (fun a => g (f a)) := by
theorem bind_map (f : α β) (g : β List γ) (l : List α) : (map f l).bind g = l.bind (fun a => g (f a)) := by
induction l <;> simp [bind_cons, append_bind, *]
theorem map_eq_bind {α β} (f : α β) (l : List α) : map f l = l.bind fun x => [f x] := by