proposition: Remark rinc_trans_xi : forall s0 : Site, xi (rec_inc_trans c0 s1 s2) s0 = xi c0 s0.
proof: Proof. intro; unfold xi in |- *. rewrite rinc_trans_ctrl_copy. rewrite rinc_trans_ctrl_dec. simpl in |- *; rewrite case_ineq; auto. trivial. trivial. Qed.
imports: init table_act mess_act