Section ForallNorm.
Variable T : Type.
Variable P : T -> Prop.
(* use: rewrite ?Forall_norm *)
Definition Forall_norm := (@Forall_appP, @Forall_singletonP, @Forall_consP, @Forall_nilP).

Lemma repeat_appP {X: Type} {x: X} {n m: nat} :
repeat x n ++ repeat x m = repeat x (n+m).