blob: ce058a6d346dd920ef692cff371ccc7462a45fe6 (
plain)
1
2
3
4
5
6
7
8
9
|
Inductive sig2 (A : Type) (P Q : A -> Prop) : Type :=
exist2 : forall x : A, P x -> Q x -> {x : A | P x & Q x}
Arguments sig2 [A%type_scope] _%type_scope _%type_scope
Arguments exist2 [A%type_scope] _%function_scope _%function_scope
exists x : nat, x = x
: Prop
fun b : bool => if b then b else b
: bool -> bool
|
