Kim Morrison semorrison
semorrison
/ Functors_pointwise_equal.lean
Created
January 28, 2017 15:54
— forked from leodemoura/Functors_pointwise_equal.lean
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| meta def blast : tactic unit := using_smt $ return () | |
| structure Category := | |
| (Obj : Type) | |
| (Hom : Obj → Obj → Type) | |
| structure Functor (C : Category) (D : Category) := | |
| (onObjects : C^.Obj → D^.Obj) | |
| (onMorphisms : Π { X Y : C^.Obj }, | |
| C^.Hom X Y → D^.Hom (onObjects X) (onObjects Y)) |
semorrison
/ casting.lean
Created
January 27, 2017 12:10
— forked from leodemoura/casting.lean
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| meta def blast : tactic unit := using_smt $ return () | |
| structure Category := | |
| (Obj : Type) | |
| (Hom : Obj → Obj → Type) | |
| structure Functor (C : Category) (D : Category) := | |
| (onObjects : C^.Obj → D^.Obj) | |
| (onMorphisms : Π { X Y : C^.Obj }, | |
| C^.Hom X Y → D^.Hom (onObjects X) (onObjects Y)) |