free c:channel.

event A.
event B.

fun test(nat):bitstring.

fun proj(bitstring):nat
reduc forall i:nat; proj(test(i)) = i.

equation test(0) = test(1).

query event(A); event(B).



process
  in(c,(i:nat,x:bitstring));
  in(c,(j:nat,y:bitstring));
  if i = 3 then
  if (i - 5) > j
  then event A
  else event B

(* EXPECTPV
Error: The destructor proj is not deterministic.
Error: The destructors should be deterministic.
xtime: error in child process (status : 2)
END *)
