spec sp =
sort s
op f:s->s
. forall x:s . f(x) = x
then
. exists x:s . f(x) = x
with s |-> s
end
spec sp1 =
sp hide f
end