summaryrefslogtreecommitdiff
path: root/Test/AbsHoudini/quant5.bpl
blob: d511e9ac9e548b5e852bf5eca54056db1a211bfc (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));
}