OCaml (option informatique) · Chapitre 3 · Exercice de TD
Miroir d'un arbre
Types sommes et arbres · niveau 2
Énoncé
Écrire miroir a qui renvoie l'arbre symétrique (fils gauche et droit échangés, récursivement).
Corrigé
let rec miroir a =
match a with
| Vide -> Vide
| Noeud (g, x, d) -> Noeud (miroir d, x, miroir g)Le miroir de l'arbre vide est vide ; sinon on garde l'étiquette et on échange les deux sous-arbres après les avoir eux-mêmes mis en miroir. La fonction renvoie un nouvel arbre, sans modifier l'original (les valeurs sont immuables).
Exercices semblables
- Hauteur d'un arbre corrigé
- Compter les feuilles corrigé
- Évaluer une expression arithmétique corrigé
- Appartenance dans un arbre binaire de recherche corrigé
- Insertion dans un ABR corrigé