fun hash(bitstring): bitstring.

free c: channel.
free x,n,m: bitstring [private].

noninterf x among (n, hash(m)).

process
	out(c, (m, x))

(* EXPECTPV
RESULT Non-interference x among (n[], hash(m[])) cannot be proved.
0.016s (user 0.008s + system 0.008s), max rss 8424K
END *)
