typo
This commit is contained in:
parent
93a32bd9bc
commit
177c2732b6
1 changed files with 1 additions and 1 deletions
|
@ -21,7 +21,7 @@ def map' {α β : Type} (f : α → β) : List α → List β
|
|||
| [] => []
|
||||
| x :: xs => f x :: map' f xs
|
||||
|
||||
theorem fuse {α β γ} : ∀ (xs : List α) (f : α → β) (g :β → γ),
|
||||
theorem fuse {α β γ} : ∀ (xs : List α) (f : α → β) (g : β → γ),
|
||||
(map' g ∘ map' f) xs = map' (g ∘ f) xs := by
|
||||
intro xs f g
|
||||
induction xs
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue