End DEF_FIFO.
Section BELONG.
(* quelques lemmes sur des considerations plus dynamiques, l'existence d'un element dans la liste apres ajout ou retrait d'un element *)
Variable data : Set.

Lemma in_q_input :
forall (d' d : data) (q : queue data),
d <> d' -> In_queue data d (input data d' q) -> In_queue data d q.