UpsKrn.ArbreBinaire.Union


Fonction Optimiser(Invariant, NulAbsorbant) Union(A : Nul Ou ArbreBinaire(Nul Ou TypeElement)) Retourner Nul Ou ArbreBinaire(Nul Ou TypeElement);

Description

La méthode Union permet de construire un arbre binaire par union des éléments de deux arbres binaires. Les doublons ne sont pas supprimés.

Si le premier arbre binaire est nul ou si le second arbre binaire est nul, alors le résultat est l'arbre binaire.

Exemple


/****************************************************************/

Fonction ComparerCaractere(C1 : Nul Ou Caractere, C2 : Nul Ou Caractere) Retourner ComparaisonObjet

/* Objet : Compare les caracteres. */

/****************************************************************/

Debut

Si C1==Nul Ou C2==Nul Alors


	Retourner ComparaisonNul;

Fin Si

Si C1<C2 Alors


	Retourner ComparaisonAvant;

Fin Si

Si C1>C2 Alors

	Retourner ComparaisonApres;

Fin Si

Retourner ComparaisonEgal;

Fin Fonction



Principal

/*******/

Variable

/******/

	A1 : ArbreBinaireDe Caractere;

	A2 : ArbreBinaireDe Caractere;

	A3 : ArbreBinaireDe Caractere;



Debut

/* Construction d'un arbre a trois éléments. */

A1=ArbreBinaire(ComparerCaractere, Faux);

A1+="A";

A1+="B";

A1+="C";

A2=ArbreBinaire(ComparerCaractere, Faux);

A2+="A";

A2+="C";

A2+="D";

A3=A1.Union(A2);

/* A3 contient 'A', 'A', 'B', 'C', 'C', 'D'. */

Fin Principal

Voir aussi

Exclusion, Intersection et Soustraction pour connaître les autres opérateurs ensemblistes sur les arbres binaires.

Traduction


-	-	-	-	-	-	-	-	-