End REC_COP2_ALT.
Section REC_COP2_RELAT.
(* relation parent *)
Variable c0 : Config.
Variable s2 : Site.
Remark rcop2_trans_parent :
forall s3 s4 : Site, parent (rec_copy2_trans c0 s2) s4 s3 -> parent c0 s4 s3.

Lemma rcop2_trans_parent_cr :
forall s3 s4 : Site,
(parent c0 s3 s4 -> dt c0 s3 < dt c0 s4) ->
parent (rec_copy2_trans c0 s2) s3 s4 ->
dt (rec_copy2_trans c0 s2) s3 < dt (rec_copy2_trans c0 s2) s4.