proposition: Remark del_trans_sigma_dec : s0 <> owner -> sigma_ctrl_dec s0 (bm (delete_trans c0 s1)) = sigma_ctrl_dec s0 (bm c0).
proof: Proof. intros; unfold sigma_ctrl_dec in |- *. apply sigma_simpl; intros. rewrite del_trans_ctrl_dec; apply case_ineq; auto. Qed.
imports: init table_act mess_act