diff options
| author |  Checkmate50 <dgeisler50@gmail.com> | 2016-01-04 19:26:36 -0800 |
|---|---|---|
| committer | Checkmate50 <dgeisler50@gmail.com> | 2016-01-04 19:26:36 -0800 |
| commit | 6fad4313b1a4e7f8e6cfcd12b92126a3d9ad58d0 (patch) | |
| tree | 7404eda3568a7f271ea2827f8e1603c139c5b452 /float_test.bpl | |
| parent | a1c9e11736bda4bf8ea4bf431523b9b975b01670 (diff) | |
Added several test cases and some basic documentation for fp usage
Diffstat (limited to 'float_test.bpl')
| -rw-r--r-- | float_test.bpl | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/float_test.bpl b/float_test.bpl index ebd0ab47..fbf8e4e3 100644 --- a/float_test.bpl +++ b/float_test.bpl @@ -1,5 +1,13 @@ -procedure F(n: float) returns(r: float) - ensures r == n; -{ - r := n; +//Translation from addsub_double_exact.c +//Should Verify +procedure main() returns () { + var x : float(11 53); + var y : float(11 53); + var z : float(11 53); + var r : float(11 53); + x := fp(10000000 11 53); + y := x + fp(1 11 53); + z := x - fp(1 11 53); + r := y - z; + assert r == fp(2 11 53); }
\ No newline at end of file |