Skip to content

Commit

Permalink
Updated the _CoqProject file to reflect the new target file name. Mar…
Browse files Browse the repository at this point in the history
…ked the Forall_tail and Exists_impl functions as local because I eventually plan to have these addded to the Standard Library and do not want naming conflics.
  • Loading branch information
larryleeelucidsolutions committed Aug 24, 2018
1 parent 7460c06 commit bfcc4f5
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 4 deletions.
4 changes: 2 additions & 2 deletions _CoqProject
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
-R . pigeons
-R . pigeonhole_principle
./base.v
./pigeons.v
./pigeonhole_principle.v
4 changes: 2 additions & 2 deletions pigeonhole_principle.v
Original file line number Diff line number Diff line change
Expand Up @@ -98,7 +98,7 @@ Definition containers_ok (cs : containers) : Prop
element in [x0 :: xs], then [P] is true for
every element in [xs].
*)
Definition Forall_tail
Local Definition Forall_tail
: forall (A : Type) (P : A -> Prop) (x0 : A) (xs : list A), Forall P (x0 :: xs) -> Forall P xs
:= fun _ P x0 xs H
=> let H0
Expand All @@ -119,7 +119,7 @@ Arguments Forall_tail {A} {P} x0 xs.
[P] is true, then there exists an element in
[xs] for which [Q] is true.
*)
Definition Exists_impl
Local Definition Exists_impl
: forall (A : Type) (P Q : A -> Prop),
(forall x : A, P x -> Q x) ->
forall xs : list A,
Expand Down

0 comments on commit bfcc4f5

Please sign in to comment.