Commit 72a2b8d5 authored by Robbert Krebbers's avatar Robbert Krebbers

One more occurence...

parent 394075cc
...@@ -628,7 +628,7 @@ Ltac iSpecializePat_go H1 pats := ...@@ -628,7 +628,7 @@ Ltac iSpecializePat_go H1 pats :=
fail "iSpecialize:" H1 "not found" fail "iSpecialize:" H1 "not found"
|solve_to_wand H1 |solve_to_wand H1
|lazymatch m with |lazymatch m with
| GSpatial => notypeclasses refine (add_modal_id _ _) | GSpatial => class_apply add_modal_id
| GModal => iSolveTC || fail "iSpecialize: goal not a modality" | GModal => iSolveTC || fail "iSpecialize: goal not a modality"
end end
|first |first
......
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