13 lines
375 B
Text
13 lines
375 B
Text
def my_eq {A : Type _} (a b : A) : Prop := true
|
|
|
|
theorem id_map_is_right_neutral₁ {A : Type} (map : A -> A) :
|
|
my_eq (Function.comp.{1, 1, _} map map) map :=
|
|
sorry
|
|
|
|
theorem id_map_is_right_neutral₂ {A : Type} (map : A -> A) :
|
|
my_eq (Function.comp map map) map :=
|
|
sorry
|
|
|
|
theorem id_map_is_right_neutral₃ {A : Type} (map : A -> A) :
|
|
my_eq (map ∘ map) map :=
|
|
sorry
|