proposition: Lemma rcop2_trans_D : (rt c0 s0 = false -> D_queue (bm c0 s0 owner)) -> rt (rec_copy2_trans c0 s2) s0 = false -> D_queue (bm (rec_copy2_trans c0 s2) s0 owner).
proof: Proof. simpl in |- *; case (eq_site_dec s2 s0); intro. rewrite e; rewrite true_set_rec_table; intros; discriminate H0. rewrite inch_set_rec_table. intros; apply D_collect; auto. trivial. Qed.
imports: init table_act mess_act