diff options
Diffstat (limited to 'Test/z3api/boog13.bpl')
-rw-r--r-- | Test/z3api/boog13.bpl | 56 |
1 files changed, 28 insertions, 28 deletions
diff --git a/Test/z3api/boog13.bpl b/Test/z3api/boog13.bpl index 9cd873c6..3fe58fd7 100644 --- a/Test/z3api/boog13.bpl +++ b/Test/z3api/boog13.bpl @@ -1,28 +1,28 @@ -type ref;
-// 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;
-}
-
-
-
+type ref; +// 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; +} + + + |