summaryrefslogtreecommitdiff
path: root/Test/test20/Coercions.bpl
blob: cab68149a8735be82ee56f28bf00262a98ce9f3c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17


type C, D, E _;

const x:int;
const c:C;
const d:D;

axiom (x:int > 0);
axiom (x:int < 0);
axiom (x:E <a>[a]int < 0);   // impossible coercion

axiom (c:D == d);            // impossible coercion

axiom (15:D == d);           // impossible coercion
axiom (15:E int == d);       // impossible coercion
axiom ((18*15):int == 0);