(* l'origine et la destination d'un message copy sont distincts *)

(* Specifications: *)
Lemma copy_diff_site :
forall (c0 : Config) (s1 s2 : Site),
legal c0 -> In_queue Message copy (bm c0 s1 s2) -> s1 <> s2.
Lemma first_copy_diff_site :
forall (c0 : Config) (s1 s2 : Site),
legal c0 -> first Message (bm c0 s1 s2) = value Message copy -> s1 <> s2.