(* -- 2 : Le resultat de "tri_ins" est une permutation de son entree *)
(*   ie : meme nombre d'occurrences de chaque element                *)

Theorem nocc_Cons_Cons :
forall (n m p : nat) (x : list nat),
nocc n (Cons nat m (Cons nat p x)) = nocc n (Cons nat p (Cons nat m x)).