proposition: Remark rcop2_trans_sigma_copy : s0 <> owner -> sigma_ctrl_copy s0 (bm (rec_copy2_trans c0 s2)) = sigma_ctrl_copy s0 (bm c0).
proof: Proof. intros; unfold sigma_ctrl_copy in |- *. apply sigma_simpl; intros. rewrite rcop2_trans_ctrl_copy. apply case_ineq; trivial. Qed.
imports: init table_act mess_act