Commit 15be3526 authored by Ralf Jung's avatar Ralf Jung
Browse files

update std++

parent 97d4205d
coq-stdpp https://gitlab.mpi-sws.org/robbertkrebbers/coq-stdpp 3103b7bf52d0275f2938d9af44ab2d0db89a6251 coq-stdpp https://gitlab.mpi-sws.org/robbertkrebbers/coq-stdpp 0671cb48dd1f893c48672de216847d46d5263e04
...@@ -222,9 +222,7 @@ Ltac f_contractive := ...@@ -222,9 +222,7 @@ Ltac f_contractive :=
end; end;
try reflexivity. try reflexivity.
Ltac solve_contractive := Ltac solve_contractive := solve_proper_core ltac:(fun _ => first [f_contractive | f_equiv]).
preprocess_solve_proper;
solve [repeat (first [f_contractive|f_equiv]; try eassumption)].
(** Fixpoint *) (** Fixpoint *)
Program Definition fixpoint_chain {A : ofeT} `{Inhabited A} (f : A A) Program Definition fixpoint_chain {A : ofeT} `{Inhabited A} (f : A A)
......
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