mirror of https://github.com/nmvdw/HITs-Examples
union idem used for comprehension
This commit is contained in:
parent
0f44ee009b
commit
91899aef6f
|
@ -54,9 +54,7 @@ Section operations.
|
|||
- apply nl.
|
||||
- apply nr.
|
||||
- intros; simpl.
|
||||
destruct (P x).
|
||||
+ apply idem.
|
||||
+ apply nl.
|
||||
apply union_idem.
|
||||
Defined.
|
||||
|
||||
Definition single_product {A B : Type} (a : A) : FSet B -> FSet (A * B).
|
||||
|
|
Loading…
Reference in New Issue