r_retard[m={d} and z=MAXC(x,z)];
r_ech3[m={d} and m1={r}];
r_ech2[m={d} and m1={r} and x=MAXC(x,z)];
succ[m={d,a}];
s_retard[m={d,a} and m1={r}];
rej_retard[m={r} and m1={a}];
r_succ[m={d}];
rejet[m={r}];
dem[m={d}];