proposition: Remark rcop1_trans_sigma_inc : sigma_ctrl_inc s0 (bm (rec_copy1_trans c0 s1 s2)) = sigma_ctrl_inc s0 (bm c0).
proof: Proof. unfold sigma_ctrl_inc in |- *; apply sigma_simpl; intros; apply rcop1_trans_ctrl_inc; auto. Qed.
imports: init table_act mess_act