Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
Why3
why3
Commits
208a0fb9
Commit
208a0fb9
authored
Jul 18, 2014
by
Jean-Christophe Filliâtre
Browse files
cleaning up
parent
9c961777
Changes
1
Hide whitespace changes
Inline
Side-by-side
examples/vstte10_max_sum.mlw
View file @
208a0fb9
...
...
@@ -40,7 +40,8 @@ module MaxAndSum2
let max_sum (a: array int) (n: int)
requires { n = length a /\ forall i:int. 0 <= i < n -> a[i] >= 0 }
ensures { let (s, m) = result in s = sum a 0 n /\ is_max a 0 n m /\ s <= n * m }
ensures { let (s, m) = result in
s = sum a 0 n /\ is_max a 0 n m /\ s <= n * m }
= let s = ref 0 in
let m = ref 0 in
for i = 0 to n - 1 do
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment