File tree 16 files changed +35
-39
lines changed
16 files changed +35
-39
lines changed Original file line number Diff line number Diff line change 1
- Require Import Coq.Bool. Bool.
2
- Require Import Arith. PeanoNat.
1
+ From Coq Require Import Bool.
2
+ From Coq Require Import PeanoNat.
3
3
Require Import ExtLib.Tactics.Consider.
4
4
Require Import ExtLib.Data.Nat.
5
5
6
- Require Import Coq.ZArith. ZArith.
7
- Require Import Coq.micromega. Lia.
6
+ From Coq Require Import ZArith.
7
+ From Coq Require Import Lia.
8
8
9
9
Set Implicit Arguments .
10
10
Set Strict Implicit .
Original file line number Diff line number Diff line change 1
- Require Import Coq.Classes . DecidableClass.
1
+ From Coq.Classes Require Import DecidableClass.
2
2
3
3
Definition decideP (P : Prop ) {D : Decidable P} : {P} + {~P} :=
4
4
match @Decidable_witness P D as X return (X = true -> P) -> (X = false -> ~P) -> {P} + {~P} with
Original file line number Diff line number Diff line change 1
- Require Import Coq.Classes . EquivDec.
1
+ From Coq.Classes Require Import EquivDec.
2
2
3
3
Theorem EquivDec_refl_left {T : Type } {c : EqDec T (@eq T)} :
4
4
forall (n : T), equiv_dec n n = left (refl_equal _).
9
9
reflexivity.
10
10
Qed .
11
11
12
- Export Coq. Classes . EquivDec.
12
+ Export EquivDec.
Original file line number Diff line number Diff line change 1
- Require Import Coq.Lists. List Coq.Arith. PeanoNat.
1
+ From Coq Require Import List PeanoNat.
2
2
Require Import Relations RelationClasses.
3
3
Require Import ExtLib.Core.RelDec.
4
4
Require Import ExtLib.Data.SigT.
Original file line number Diff line number Diff line change 1
- Require Import Coq.Lists.List.
2
- Require Coq.Classes .EquivDec.
1
+ From Coq Require Import List EquivDec.
3
2
Require Import ExtLib.Core.RelDec.
4
3
Require Import ExtLib.Structures.Monoid.
5
4
Require Import ExtLib.Structures.Reducible.
@@ -20,7 +19,7 @@ Section EqDec.
20
19
Proof .
21
20
red. unfold Equivalence.equiv, RelationClasses.complement.
22
21
intros.
23
- change (x = y -> False) with (x <> y ).
22
+ change (x = y -> False) with (not (x = y) ).
24
23
decide equality. eapply EqDec_T.
25
24
Qed .
26
25
End EqDec.
Original file line number Diff line number Diff line change 1
- Require Import Coq.Lists. List.
2
- Require Import Coq.ZArith. ZArith.
3
- Require Import Coq.micromega. Lia.
1
+ From Coq.Lists Require Import List.
2
+ From Coq.ZArith Require Import ZArith.
3
+ From Coq.micromega Require Import Lia.
4
4
5
5
(** For backwards compatibility with hint locality attributes. *)
6
6
Set Warnings "-unsupported-attributes".
Original file line number Diff line number Diff line change 1
- Require Import Coq.Lists. List.
2
- Require Import Coq.Arith. PeanoNat.
1
+ From Coq.Lists Require Import List.
2
+ From Coq.Arith Require Import PeanoNat.
3
3
4
4
Set Implicit Arguments .
5
5
Set Strict Implicit .
Original file line number Diff line number Diff line change 1
- Require Coq.Arith. Arith.
1
+ From Coq.Arith Require Arith.
2
2
Require Import ExtLib.Core.RelDec.
3
3
Require Import ExtLib.Structures.Monoid.
4
4
Require Import ExtLib.Tactics.Consider.
Original file line number Diff line number Diff line change 1
- Require Import Coq.Classes . Morphisms.
2
- Require Import Coq.Relations. Relations.
1
+ From Coq.Classes Require Import Morphisms.
2
+ From Coq.Relations Require Import Relations.
3
3
4
4
Set Implicit Arguments .
5
5
Set Strict Implicit .
Original file line number Diff line number Diff line change 1
- Require Coq.Classes . EquivDec.
1
+ From Coq.Classes Require EquivDec.
2
2
Require Import ExtLib.Structures.EqDep.
3
3
Require Import ExtLib.Tactics.Injection.
4
4
Require Import ExtLib.Tactics.EqDep.
Original file line number Diff line number Diff line change 1
- Require Import Coq.Strings.String.
2
- Require Import Coq.Program .Program .
3
- Require Import Coq.Arith.PeanoNat.
1
+ From Coq Require Import String Program PeanoNat.
4
2
5
3
Require Import ExtLib.Tactics.Consider.
6
4
Require Import ExtLib.Core.RelDec.
Original file line number Diff line number Diff line change 1
- Require Coq.Strings.Ascii.
2
- Require Coq.Strings.String.
3
- Require Import Coq.Strings.String.
4
- Require Import Coq.Program .Wf.
5
- Require Import Coq.PArith.BinPos.
6
- Require Import Coq.ZArith.ZArith.
1
+ From Coq Require Ascii.
2
+ From Coq Require Import String.
3
+ From Coq.Program Require Import Wf.
4
+ From Coq Require Import BinPos.
5
+ From Coq Require Import ZArith.
7
6
Require Import ExtLib.Structures.Monoid.
8
7
Require Import ExtLib.Structures.Reducible.
9
8
Require Import ExtLib.Programming.Injection.
Original file line number Diff line number Diff line change 1
- Require Import Coq.Classes . RelationClasses.
2
- Require Coq.Arith. Wf_nat.
1
+ From Coq.Classes Require Import RelationClasses.
2
+ From Coq.Arith Require Wf_nat.
3
3
4
4
Set Implicit Arguments .
5
5
Set Strict Implicit .
@@ -34,4 +34,4 @@ Section measure.
34
34
35
35
Definition well_founded_mlt : well_founded mlt :=
36
36
@well_founded_compose T nat m lt Wf_nat.lt_wf.
37
- End measure.
37
+ End measure.
Original file line number Diff line number Diff line change 1
- Require Coq.Logic. Eqdep_dec.
1
+ From Coq.Logic Require Eqdep_dec.
2
2
Require EquivDec.
3
3
Require Import ExtLib.Core.RelDec.
4
4
Require Import ExtLib.Tactics.Consider.
@@ -12,18 +12,18 @@ Section Classes.
12
12
13
13
Theorem UIP_refl : forall {x : A} (p1 : x = x), p1 = refl_equal _.
14
14
intros.
15
- eapply Coq.Logic. Eqdep_dec.UIP_dec. apply EquivDec.equiv_dec.
15
+ eapply Eqdep_dec.UIP_dec. apply EquivDec.equiv_dec.
16
16
Qed .
17
17
18
18
Theorem UIP_equal : forall {x y : A} (p1 p2 : x = y), p1 = p2.
19
- eapply Coq.Logic. Eqdep_dec.UIP_dec. apply EquivDec.equiv_dec.
19
+ eapply Eqdep_dec.UIP_dec. apply EquivDec.equiv_dec.
20
20
Qed .
21
21
22
22
Lemma inj_pair2 :
23
23
forall (P:A -> Type) (p:A) (x y:P p),
24
24
existT P p x = existT P p y -> x = y.
25
25
Proof .
26
- intros. eapply Coq.Logic. Eqdep_dec.inj_pair2_eq_dec; auto.
26
+ intros. eapply Eqdep_dec.inj_pair2_eq_dec; auto.
27
27
Qed .
28
28
29
29
Theorem equiv_dec_refl_left : forall a, @EquivDec.equiv_dec _ _ _ dec a a = left eq_refl.
Original file line number Diff line number Diff line change 1
- Require Import Coq.Relations. Relations.
1
+ From Coq.Relations Require Import Relations.
2
2
Require Import ExtLib.Data.Fun.
3
3
Require Import ExtLib.Structures.Functor.
4
4
Original file line number Diff line number Diff line change 1
- Require Import Coq.Classes . EquivDec.
1
+ From Coq.Classes Require Import EquivDec.
2
2
Require Import ExtLib.Structures.EqDep.
3
- Require Coq.Logic. Eqdep_dec.
3
+ From Coq.Logic Require Eqdep_dec.
4
4
5
5
Set Implicit Arguments .
6
6
Set Strict Implicit .
You can’t perform that action at this time.
0 commit comments