Instructions
Implémente les opérations de base sur les listes.
Dans les langages fonctionnels, les opérations sur les listes telles que length, map et reduce sont très courantes.
Implémente une série d'opérations de base sur les listes, sans utiliser les fonctions existantes.
Le nombre et les noms exacts des opérations à implémenter dépendent du parcours, afin d'éviter les conflits avec des noms existants, mais les opérations générales que tu implémenteras incluent :
-
append (étant donné deux listes, ajouter tous les éléments de la seconde liste à la fin de la première) ;
-
concatenate (étant donné une série de listes, combiner tous les éléments de toutes les listes en une seule liste aplatie) ;
-
filter (étant donné un prédicat et une liste, renvoyer la liste de tous les éléments pour lesquels predicate(item) est vrai) ;
-
length (étant donné une liste, renvoyer le nombre total d'éléments qu'elle contient) ;
-
map (étant donné une fonction et une liste, renvoyer la liste des résultats de l'application de function(item) à tous les éléments) ;
-
foldl (étant donné une fonction, une liste et un accumulateur initial, replier (réduire) chaque élément dans l'accumulateur en partant de la gauche) ;
-
foldr (étant donné une fonction, une liste et un accumulateur initial, replier (réduire) chaque élément dans l'accumulateur en partant de la droite) ;
-
reverse (étant donné une liste, renvoyer une liste contenant tous les éléments d'origine, mais dans l'ordre inverse).
Remarque : l'ordre dans lequel les arguments sont passés aux fonctions de repli (foldl, foldr) est important.
La commande apply de Tcl
Les cas de test peuvent sembler déroutants.
On attend de toi que tu implémentes ceci :
set myList {alpha beta gamma delta}
listOps::filter $myList {{word} {expr {[string length $word] == 4}}
Pourquoi ce dernier argument comporte-t-il autant d'accolades ?
Rappelons que la commande proc est définie ainsi :
proc procName argList body
Tcl dispose d'une commande apply :
apply func ?arg1 arg2 ...?
ce « func » est une liste de deux éléments, {argList body}, qui est essentiellement une proc anonyme (ou « lambda »).
La commande apply invoque cette proc anonyme en lui passant les arguments dont elle a besoin.
Par exemple, ces extraits sont équivalents :
# using proc
proc myReverse {str} {return [string reverse $str]}
puts [myReverse "Hello, World!"]
# using apply
puts [apply {{str} {string reverse $str}} "Hello, World!"]
# or, store the func in a variable
set func {{str} {string reverse $str}}
puts [apply $func "Hello, World!"]
Avec apply, il est plus simple de faire circuler des blocs de code.
Références : apply, proc.
