Remark rdec_trans_xi :
 forall s0 : Site,
 xi (rec_dec_trans c0 s1 s2) s0 =
 (if eq_site_dec owner s2
  then
   if eq_site_dec s0 s1 then (xi c0 s0 - 1)%Z else xi c0 s0
  else xi c0 s0).Remark rdec_trans_yi :
 forall s0 : Site, yi (rec_dec_trans c0 s1 s2) s0 = yi c0 s0.

(* Specifications: *)
Lemma rdec_trans_sigma_xi : sigma_xi (rec_dec_trans c0 s1 s2) = (if eq_site_dec owner s2 then (sigma_xi c0 - 1)%Z else sigma_xi c0).
Lemma rdec_trans_sigma_yi : sigma_yi (rec_dec_trans c0 s1 s2) = sigma_yi c0.
Lemma rdec_trans_D : D_queue (bm c0 s0 owner) -> D_queue (bm (rec_dec_trans c0 s1 s2) s0 owner).
Lemma rdec_trans_alt : alternate (bm c0 s0 owner) -> alternate (bm (rec_dec_trans c0 s1 s2) s0 owner).