зеркало из https://github.com/microsoft/ivy.git
29 строки
334 B
XML
29 строки
334 B
XML
#lang ivy1.7
|
|
|
|
type t
|
|
interpret t -> int
|
|
|
|
function f(X:t) : t
|
|
|
|
function foo(X:t) = f(X) = X
|
|
|
|
# definition f(X) = X
|
|
|
|
function g(X:t) : t
|
|
var p : t
|
|
|
|
function h(X:t) : t
|
|
definition h(Z) = Z
|
|
function bar(X:t) = f(X) = h(X)
|
|
|
|
var q : bool
|
|
|
|
object test3 = {
|
|
relation r(X:t)
|
|
definition r(X) = (X <= p)
|
|
axiom r(p)
|
|
}
|
|
|
|
# result: OK
|
|
|