Section OCCUR.
(* considerations dynamiques sur l'evolution du nombre d'occurence d'un element dans la liste apres ajout ou retrait *)
Variable data : Set.
Hypothesis eq_data_dec : eq_dec data.

Lemma input_diff_card :
forall (d d' : data) (q : queue data),
d <> d' ->
card data eq_data_dec d (input data d' q) = card data eq_data_dec d q.