Definition pred1 (a1 : T) := SimplPred (xpred1 a1).Definition pred2 (a1 a2 : T) := SimplPred (xpred2 a1 a2).Definition pred3 (a1 a2 a3 : T) := SimplPred (xpred3 a1 a2 a3).Definition pred4 (a1 a2 a3 a4 : T) := SimplPred (xpred4 a1 a2 a3 a4).Definition predU1 (a1 : T) p := SimplPred (xpredU1 a1 p).Definition predC1 (a1 : T) := SimplPred (xpredC1 a1).Definition predD1 p (a1 : T) := SimplPred (xpredD1 p a1).

Lemma eq_frel f f' : f =1 f' -> frel f =2 frel f'.