Programação Funcional e Concorrente com Scheme

notas de aula - Jerônimo C. Pellegrini
(list-map - ’(0 1 2 -3))
(0 -1 -2 3)
O procedimento passado para list-map deve aceitar exatamente um argumento, de
outra forma não haveria como a função ser aplicada.
( define list-map
( lambda ( funcao lista )
(if ( null lista )
lista
( cons ( funcao ( car lista ))
( list-map funcao ( cdr lista ))))))
O padrão define um procedimento map, que é mais geral que o que acabamos de
construir: o procedimento passado para map pode ter qualquer aridade (quantidade de
argumentos), e podemos passar diversas listas depois do procedimento:
( map expt ’(1 3 2)
(1 27 16)
’(2 3 4))
A aridade do procedimento (neste exemplo, 2) deve ser igual ao número de listas. A
nova lista conterá em cada posição i o resultado da aplicação do procedimento, tendo
como argumentos a lista de i-ésimos elementos das listas. No exemplo acima, o primeiro
elemento da lista resultante é (expt 1 2), o segundo (expt 3 3) e o terceiro (expt 2 4).
O procedimento list-reduce toma um procedimento binário, uma lista, e aplica o
procedimento a cada elemento da lista, acumulando o resultado:
(list-reduce * -1 ’(10 20 30))
6000
O primeiro argumento de list-reduce é o procedimento a ser usado; o segundo é o
valor a ser devolvido caso a lista seja vazia; o terceiro é a lista sobre a qual a operação
será aplicada.
Versão Preliminar
(list-reduce * -1 ’())
-1
[ 27 de outubro de 2010 at 15:47 ]
31