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

update Iris

parent af8b10ef
Branches
Tags
No related merge requests found
Pipeline #
coq-iris https://gitlab.mpi-sws.org/FP/iris-coq 398bae9d092b6568cf8d504ca98d8810979eea33
coq-iris https://gitlab.mpi-sws.org/FP/iris-coq 2e2c5c25aea886acc7d0925d435fe856ffa6ac14
......@@ -376,7 +376,7 @@ End type_contractive.
(* Tactic automation. *)
Ltac f_type_equiv :=
first [ ((eapply ty_size_type_dist || eapply ty_shr_type_dist || eapply ty_own_type_dist); try reflexivity) |
match goal with | |- @dist_later ?A ?n ?x ?y =>
match goal with | |- @dist_later ?A _ ?n ?x ?y =>
destruct n as [|n]; [exact I|change (@dist A _ n x y)]
end ].
Ltac solve_type_proper :=
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment