blob: 6940e82019a406f81755202dec2bfe765e7d22cb (
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
|
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);
}
|