summaryrefslogtreecommitdiff
path: root/float_test14.bpl
blob: 9b5dab0a624eb0170a4caf7d1f8b88d7e9c5d6a4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Translation from inv_square_false-unreach-call.c
//Should Verify

procedure main() returns () {
	var x : float;
	var y : float;
	var z : float;
	
	havoc x;
	assume(x >= fp(-1) && x <= fp(1));
	
	if (x <= fp(-.00000000000000000001) || x >= fp(.00000000000000000001)) {
		y := x * x;
		assert(y != fp(0));
		z := fp(1) / y;
	}
}