mirror of
https://github.com/AdaCore/why3.git
synced 2026-02-12 12:34:55 -08:00
13 lines
103 B
Plaintext
13 lines
103 B
Plaintext
|
|
|
|
module M
|
|
|
|
use ref.Ref
|
|
|
|
val x : ref int
|
|
|
|
let f () : int
|
|
ensures { result = !x }
|
|
= !x
|
|
|
|
end |