diff options
| author |  mikebarnett <unknown> | 2009-07-15 21:03:41 +0000 |
|---|---|---|
| committer | mikebarnett <unknown> | 2009-07-15 21:03:41 +0000 |
| commit | ce1c2de044c91624370411e23acab13b0381949b (patch) | |
| tree | 592539996fe08050ead5ee210c973801611dde40 /Test/z3api/boog13.bpl | |
Initial set of files.
Diffstat (limited to 'Test/z3api/boog13.bpl')
| -rw-r--r-- | Test/z3api/boog13.bpl | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/Test/z3api/boog13.bpl b/Test/z3api/boog13.bpl new file mode 100644 index 00000000..a4f854f5 --- /dev/null +++ b/Test/z3api/boog13.bpl @@ -0,0 +1,25 @@ +// types
+type Wicket;
+var favorite: Wicket;
+var v: Wicket;
+
+function age(w:Wicket) returns (int);
+
+axiom (exists v:Wicket :: age(v)<8 &&
+ (forall v:Wicket
:: age(v)==7)
+
+ );
+
+
+// procedure
+procedure SetToSeven(p: Wicket);
+ modifies favorite
;
+
+ ensures favorite==p;
+
+implementation SetToSeven(l: Wicket) {
+ favorite:=favorite;
+}
+
+
+
|