free c:channel.

fun h(bitstring):bitstring.

const a:bitstring.

event A(bitstring).

query x:bitstring; event(A(x)) ==> event(A(x)) && x <> a.

process
  in(c,x:bitstring);
  event A(x)

(* EXPECTPV
RESULT event(A(x_1)) ==> event(A(x_1)) && x_1 ≠ a is false.
0.008s (user 0.008s + system 0.000s), max rss 7160K
END *)
