Definition d_i := minusw s'_i y_i.Definition rrr_i := minusw x_i_in_Z_ y_i.Definition r_i := ltw l'_i M_in_Z_ rrr_i (minusw rrr_i M_in_Z_).(* notation *)

Definition r''0 := ltw r'0 M_in_Z_ r'0 (minusw r'0 M_in_Z_).(* only needed after the loop *)
(* KE EP TOGETHER> *)

Definition r'0' := ltw d0 c_in_Z_ r0 (minusw r0 M_in_Z_).(* needed in loop *)

Definition r''0' := ltw r'0' M_in_Z_ r'0' (minusw r'0' M_in_Z_).Definition g' := r''0.

Lemma r_Si_eq_a : _Z r_Si = (d_Si + (h mod M * 2 ^ w + l mod 2 ^ p mod M) mod 2 ^ p) mod 2 ^ w.