Recherche(Cle):

 touve = faux ; sortir = faux; i = 0;

 TQ(!touve ET ! sortir)

   Lecture_Enregistrement(i)

   SI(cle = Enregistrement.cle)

     trouve = vrai;

   SI(cle < Enregistrement.cle)

     sortir = vrai;

   SI(cle > Enregistrement.cle)

     incerementer(i);

 FTQ

 Insertion(Enregistrement):

 trouve = Recherche(Enregistrement.cle);

 SI(!trouve)

   SI(espace_vide_est_suffisant)

     Translation_a_droite();

     Inserer(Enregistrement);

   SINON

     Allouer_un_block();

     Translation_a_droite();

     Inserer(Enregistrement);

 SINON

    Enregistrement_deja_existe;

 Supression(cle):

 trouve = Recherche(cle);

 SI(trouve)

   Translation_a_gauche();

   SI(espace_vide_est_superieur_a_taille_de_block)

     Suprimmer_dernier_block();

 SINON

   Enrigestement_deja_existe;