blob: c17c63e7248adb085e176f1e527dadb72ae92c86 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
Inductive sig2 (A : Type) (P Q : A -> Prop) : Type :=
exist2 : forall x : A, P x -> Q x -> {x : A | P x & Q x}
For sig2: Argument A is implicit
For exist2: Argument A is implicit
For sig2: Argument scopes are [type_scope type_scope type_scope]
For exist2: Argument scopes are [type_scope function_scope function_scope _ _
_]
exists x : nat, x = x
: Prop
fun b : bool => if b then b else b
: bool -> bool
|
