free c: channel [private].

const a: bitstring.
const b: bitstring.

reduc f(b) = a.

event e.

query event(e) ==> false.

process
    (out(c, a); event e) | (in(c, =f(a)); 0)

(* query event(e) ==> false. is false, that is,
event e is reachable. That shows that f(a) is not evaluated before
the communication. Otherwise, the input would disappear and 
the communication would not take place. *)

(* EXPECTPV
RESULT not event(e) is false.
0.000s (user 0.000s + system 0.000s), max rss 7256K
END *)
