source:
CIVL/examples/experimental/contract.cvl@
afc300c
| Last change on this file since afc300c was 9803bc1, checked in by , 11 years ago | |
|---|---|
|
|
| File size: 204 bytes | |
| Line | |
|---|---|
| 1 | #include<civlc.cvh> |
| 2 | |
| 3 | double f(double x) |
| 4 | $requires x > 0; |
| 5 | $ensures $true; |
| 6 | ; |
| 7 | |
| 8 | double g(double x) |
| 9 | $requires x > 0; |
| 10 | $ensures $result >= 0; |
| 11 | { |
| 12 | return g(x)*g(x); |
| 13 | } |
| 14 | |
| 15 | double main() { |
| 16 | return g(2); |
| 17 | } |
Note:
See TracBrowser
for help on using the repository browser.
