Global Instance forall_relation_params:
  Params (@forall_relation) 3.

(* Specifications: *)
Lemma forall_relation_rintro {A B} (R: forall a:A, relation (B a)) f g: RIntro (forall a, R a (f a) (g a)) (forall_relation R) f g.
Lemma forall_relation_relim {A B} (R: forall a:A, relation (B a)) f g a P Q: RElim (R a) (f a) (g a) P Q -> RElim (forall_relation R) f g P Q.