Remark rcop1_trans_xi :
 forall s0 : Site, xi (rec_copy1_trans c0 s1 s2) s0 = xi c0 s0.Remark rcop1_trans_yi :
 forall s0 : Site, yi (rec_copy1_trans c0 s1 s2) s0 = yi c0 s0.

Lemma rcop1_trans_D : D_queue (bm c0 s0 owner) -> D_queue (bm (rec_copy1_trans c0 s1 s2) s0 owner).