Commit 918aa45d authored by Ralf Jung's avatar Ralf Jung

more lemmas moved

parent 66d82e37
Pipeline #19401 passed with stage
in 18 minutes and 46 seconds
...@@ -9,6 +9,6 @@ build: [make "-j%{jobs}%"] ...@@ -9,6 +9,6 @@ build: [make "-j%{jobs}%"]
install: [make "install"] install: [make "install"]
remove: ["rm" "-rf" "%{lib}%/coq/user-contrib/iris_examples"] remove: ["rm" "-rf" "%{lib}%/coq/user-contrib/iris_examples"]
depends: [ depends: [
"coq-iris" { (= "dev.2019-08-13.5.c1d6ef7f") | (= "dev") } "coq-iris" { (= "dev.2019-08-14.0.ffccb508") | (= "dev") }
"coq-autosubst" { = "dev.coq86" } "coq-autosubst" { = "dev.coq86" }
] ]
...@@ -9,12 +9,6 @@ From iris.bi.lib Require Import fractional. ...@@ -9,12 +9,6 @@ From iris.bi.lib Require Import fractional.
From iris_examples.logatom.herlihy_wing_queue Require Import spec. From iris_examples.logatom.herlihy_wing_queue Require Import spec.
Set Default Proof Using "Type". Set Default Proof Using "Type".
(** * Some library lemmas ***************************************************)
Lemma replicate_S_end {A} (n : nat) (x : A) :
replicate (S n) x = replicate n x ++ [x].
Proof. induction n as [|n IH]; [ done | by rewrite /= -IH ]. Qed.
(** * Some array-related notations ******************************************) (** * Some array-related notations ******************************************)
Notation "new_array: sz" := Notation "new_array: sz" :=
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment