mirror of
https://github.com/achlipala/frap.git
synced 2024-11-10 00:07:51 +00:00
SepCancel: now less conservative
This commit is contained in:
parent
60c21c07ec
commit
c9d7a69287
1 changed files with 1 additions and 1 deletions
|
@ -277,7 +277,7 @@ Module Make(Import S : SEP).
|
|||
|
||||
Ltac forAllAtoms p k :=
|
||||
match p with
|
||||
| ?q * ?r => (forAllAtoms q k || forAllAtoms r k) || fail 2
|
||||
| ?q * ?r => forAllAtoms q k || forAllAtoms r k
|
||||
| _ => k p
|
||||
end.
|
||||
|
||||
|
|
Loading…
Reference in a new issue