projects
/
helm.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
1c12d49
)
...
author
Enrico Tassi
<enrico.tassi@inria.fr>
Sat, 8 Sep 2007 22:58:03 +0000
(22:58 +0000)
committer
Enrico Tassi
<enrico.tassi@inria.fr>
Sat, 8 Sep 2007 22:58:03 +0000
(22:58 +0000)
matita/library/decidable_kit/fgraph.ma
patch
|
blob
|
history
diff --git
a/matita/library/decidable_kit/fgraph.ma
b/matita/library/decidable_kit/fgraph.ma
index cceaa386a4b9c2b3b7e89b9632338aafdb39f85e..b2aca796bae2d40db20dab3066a21c68bf6668c0 100644
(file)
--- a/
matita/library/decidable_kit/fgraph.ma
+++ b/
matita/library/decidable_kit/fgraph.ma
@@
-183,7
+183,7
@@
intros 2 (d m); elim m 0; simplify; [intros (x); cases x; reflexivity]
intros (n IH x); elim x; rewrite > mem_multss; simplify; [reflexivity]
rewrite > mem_finType; simplify; rewrite > IH; reflexivity;
qed.
-
+(*
axiom uniq_concat : ∀d:eqType.∀l1,l2. uniq d (l1@l1) = (andb (uniq ? l1) (andb (uniq ? l2) ())).
lemma uniq_mkpermr : ∀d:finType.∀m. uniq ? (mkpermr d m) = true.
@@
-261,4
+261,4
@@
Canonical Structure set_finType := FinType (can_uniq can_sval).
Definition iset_of_fun (f : G -> bool_finType) : setType :=
locked Sett (fgraph_of_fun f).
-
+*)