blob: 762a354fcb8083540e5b27d019ff8f5999fb9c56 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
// RUN: %boogie -noinfer -contractInfer -printAssignment -inlineDepth:1 -abstractHoudini:PredicateAbs %s > %t
// RUN: %diff %s.expect %t
function {:existential true} b1(x: bool) : bool;
procedure main()
{
var i: int;
var x: int;
var arr: [int] int;
i := 0;
while(*)
invariant b1((i >= 0) && (forall j: int :: (0 <= j && j < i) ==> arr[j] == 0));
{
havoc x;
assume x == 0;
arr[i] := x;
i := i + 1;
}
havoc x;
assume x >= 0 && x < i;
assert b1(arr[x] == 0);
}
|