Skip to content
Snippets Groups Projects
Commit 22f5cdcd authored by Ralf Jung's avatar Ralf Jung
Browse files

bump Iris

parent 999ce2e3
No related branches found
No related tags found
No related merge requests found
Pipeline #
coq-iris https://gitlab.mpi-sws.org/FP/iris-coq 02bc52b4d905eb635940ff8545d59676ad44ea8c
coq-iris https://gitlab.mpi-sws.org/FP/iris-coq 15be3526bf8e9cff9a8cf7b97973367e0f697b6e
......@@ -33,8 +33,7 @@ Section fn.
intros tid vl. destruct n' as [|n']; simpl; [done|]. unfold typed_body.
do 12 f_equiv. f_contractive. do 17 f_equiv.
- rewrite !cctx_interp_singleton /=. do 5 f_equiv.
rewrite !tctx_interp_singleton /tctx_elt_interp /=. repeat f_equiv. apply Hty.
by rewrite (ty_size_ne _ _ _ (Hty _)).
rewrite !tctx_interp_singleton /tctx_elt_interp /=. repeat (apply Hty || f_equiv).
- rewrite /tctx_interp !big_sepL_zip_with /=. do 3 f_equiv.
cut ( n tid p i, Proper (dist (S n) ==> dist n)
(λ (l : list _), ty, l !! i = Some ty tctx_elt_interp tid (p ty))%I).
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment