summaryrefslogtreecommitdiff
path: root/Test/AbsHoudini/quant5.bpl
blob: fb73a13723e9f827c228dc35e96f59f3deec6858 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
// RUN: %boogie -noinfer -contractInfer -printAssignment -inlineDepth:1 -abstractHoudini:HoudiniConst -z3opt:MBQI=true "%s" > "%t"
// RUN: %diff "%s.expect" "%t"
function {:existential true} {:absdomain "Intervals"} b1(x: int) : bool;

procedure foo ()
{
  var arr: [int] int;
  assume (forall x: int :: arr[x] == 0);
  arr[5] := 1;

  assert (exists x: int :: arr[x] == 1 && b1(x));
}