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_st_rt :
((st c0 s0 > 0)%Z -> rt c0 s0 = true) ->
(st (rec_copy3_trans c0 s1 s2) s0 > 0)%Z ->
rt (rec_copy3_trans c0 s1 s2) s0 = true.