diff options
Diffstat (limited to 'contrib/correctness/preuves.v')
-rw-r--r-- | contrib/correctness/preuves.v | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/contrib/correctness/preuves.v b/contrib/correctness/preuves.v index 730a25fd4..55cafbf8d 100644 --- a/contrib/correctness/preuves.v +++ b/contrib/correctness/preuves.v @@ -37,6 +37,13 @@ Save. Global Variable i : Z ref. Debug on. Correctness if0 { `0 <= i` } (if !i>0 then i:=!i-1 else tt) { `0 <= i` }. + +(**********************************************************************) + +Global Variable i : Z ref. +Debug on. +Correctness assert0 { `0 <= i` } begin assert { `i=2` }; i:=!i-1 end { `i=1` }. + (**********************************************************************) Correctness echange |