diff options
author | Clément Pit--Claudel <clement.pitclaudel@live.com> | 2015-08-28 21:05:19 -0700 |
---|---|---|
committer | Clément Pit--Claudel <clement.pitclaudel@live.com> | 2015-08-28 21:05:19 -0700 |
commit | f3cfd7a9994af3518655bc4d1d77eeb3619b0999 (patch) | |
tree | f060144b2b1eb9adaf4e176f3b06f977acee9a67 /Test/VerifyThis2015 | |
parent | 95a42a224dff8eae383d93beb37a3da6a28bb0f3 (diff) |
Implement workarounds for some tests that fail with /autoTriggers.
The issues here are mostly with induction (wrt. to trigger selection and
quantifier splitting) and with expressions like P(i, j-1) where no good choices
are available.
Diffstat (limited to 'Test/VerifyThis2015')
-rw-r--r-- | Test/VerifyThis2015/Problem2.dfy | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Test/VerifyThis2015/Problem2.dfy b/Test/VerifyThis2015/Problem2.dfy index 1c7deffd..86b4a019 100644 --- a/Test/VerifyThis2015/Problem2.dfy +++ b/Test/VerifyThis2015/Problem2.dfy @@ -315,7 +315,7 @@ lemma GcdDecrease(a: int, b: int) ensures Gcd(a, b) == Gcd(a - b, b)
{
var k := Gcd(a - b, b);
- assert DividesBoth(k, a-b, b) && forall m :: DividesBoth(m, a-b, b) ==> m <= k;
+ assert DividesBoth(k, a-b, b) && forall m, mm :: mm == a - b ==> DividesBoth(m, mm, b) ==> m <= k; // WISH: auto-generate 'mm'
var n := DividesProperty(k, a-b);
assert n*k == a-b;
var p := DividesProperty(k, b);
|