Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
7 changes: 3 additions & 4 deletions test-suite/bug3.v
Original file line number Diff line number Diff line change
@@ -1,9 +1,8 @@
Declare ML Module "coq-paramcoq.plugin".

Require Import PeanoNat.
Require Import Recdef.
From Stdlib Require Import PeanoNat Recdef.
Set Implicit Arguments.
Require Import Lia.
From Stdlib Require Import Lia.

Fixpoint subS (n m : nat) {struct n} : nat :=
match n return nat with
Expand Down Expand Up @@ -90,7 +89,7 @@ Global Parametricity Tactic := ((destruct_reflexivity; fail)
|| (destruct_reflexivity_with_nat_arg_pattern; fail)
|| auto).

Require Import ProofIrrelevance.
From Stdlib Require Import ProofIrrelevance.

(* Parametricity Recursive GcdS qualified. *) (* FIXME *)

Expand Down
4 changes: 1 addition & 3 deletions test-suite/bug4.v
Original file line number Diff line number Diff line change
@@ -1,8 +1,6 @@

Declare ML Module "coq-paramcoq.plugin".

Require Import PeanoNat.
Require Import PArith.
From Stdlib Require Import PeanoNat PArith.

Print BinPosDef.Pos.sub_mask.

Expand Down
5 changes: 2 additions & 3 deletions test-suite/bug5.v
Original file line number Diff line number Diff line change
@@ -1,7 +1,6 @@
Declare ML Module "coq-paramcoq.plugin".

Require Import PeanoNat.
Require Import Recdef.
From Stdlib Require Import PeanoNat Recdef.
Set Implicit Arguments.


Expand Down Expand Up @@ -76,7 +75,7 @@ Proof.
Defined.


Require Import ProofIrrelevance.
From Stdlib Require Import ProofIrrelevance.
Parametricity Recursive sig_rec.

Ltac destruct_reflexivity :=
Expand Down
2 changes: 1 addition & 1 deletion test-suite/exmNotParametric.v
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
From Coq Require Import ClassicalFacts.
From Stdlib Require Import ClassicalFacts.
Inductive False_R : False -> False -> Prop :=.

Inductive or_R (A₁ A₂ : Prop) (A_R : A₁ -> A₂ -> Prop) (B₁ B₂ : Prop)
Expand Down
4 changes: 2 additions & 2 deletions test-suite/features.v
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@ Require Import Parametricity.

(** Separate compilation: *)
Parametricity nat as test.
Require List.
From Stdlib Require List.

Parametricity Recursive List.rev.
Check rev_R.
Expand Down Expand Up @@ -51,7 +51,7 @@ End Test.

(** Opaque terms. **)

Require ProofIrrelevance.
From Stdlib Require ProofIrrelevance.

Lemma opaque : True.
trivial.
Expand Down
3 changes: 1 addition & 2 deletions test-suite/wadler.v
Original file line number Diff line number Diff line change
@@ -1,5 +1,4 @@

Require Import List.
From Stdlib Require Import List.
Require Import Parametricity.

Lemma nat_R_equal :
Expand Down
Loading