Section REC_COP3_EFFECT.
(* invariants *)
Variable c0 : Config.
Variable s0 s1 s2 s3 s4 : Site.
Hypothesis rt_true : rt c0 s2 = false.

Lemma rcop3_trans_rt :
Int (rt (rec_copy3_trans c0 s1 s2) s0) =
(if eq_site_dec s0 s2
then  (Int (rt c0 s0) + 1)%Z
else  Int (rt c0 s0)).