blob: 024cd50fe67d3045d89c2f3e45f456a55337be7f (
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
// RUN: %boogie -typeEncoding:n -logPrefix:0n "%s" > "%t"
// RUN: %diff "%s.n.expect" "%t"
// RUN: %boogie -typeEncoding:p -logPrefix:0p "%s" > "%t"
// RUN: %diff "%s.p.expect" "%t"
// RUN: %boogie -typeEncoding:a -logPrefix:0a "%s" > "%t"
// RUN: %diff "%s.a.expect" "%t"
// different map type classes with the same arity
const c : [int] bool;
const d : [ref] bool;
const e : <a> [a] bool;
const f : <a> [a] a;
axiom (c[17] ==> c[19]);
axiom (forall<t> x:t :: e[x]);
axiom (!d[null]);
axiom (forall<t> x:t :: f[x] == x);
procedure P() returns () {
var x : <a> [a] bool;
assume !c[19];
assert !c[17];
x := e;
x[true] := false;
x[17] := true;
assert !x[true];
assert !(forall<t> y:t :: x[y]);
assert x != e;
assert f[x] == x;
assert f[17] > 17; // should not be provable
}
type ref;
const null : ref;
|