
fun enc(bitstring,bitstring):bitstring.
fun dec(bitstring,bitstring):bitstring.

equation forall x:bitstring,k:bitstring; dec(enc(x,k),k) = x;
	 forall x:bitstring,k:bitstring; enc(dec(x,k),k) = x [convergent].

process 0

(* EXPECTPV
0.004s (user 0.004s + system 0.000s), max rss 6736K
END *)
