11 lines
224 B
Text
11 lines
224 B
Text
|
import standard
|
||
|
|
|
||
|
|
definition f {A : Type} {B : Type} (f : A → B → Prop) ⦃C : Type⦄ {R : C → C → Prop} {c : C} (H : R c c) : R c c
|
||
|
|
:= H
|
||
|
|
|
||
|
|
variable g : Prop → Prop → Prop
|
||
|
|
variable H : true ∧ true
|
||
|
|
|
||
|
|
check f g H
|
||
|
|
|