Programação Funcional e Concorrente com Scheme

notas de aula - Jerônimo C. Pellegrini
Na seção 1.6.2 construimos um pequeno programa que aproxima a razão áurea.
Podemos encarar a série de aproximações como uma stream.
Cada vez que um novo elemento da stream deve ser calculado usaremos next-phi:
( define next-phi
( lambda ( valor )
(+ 1 (/ 1 valor ))))
A stream inicia com 2.0; usamos stream-map para determinar como o resto da stream
é construída.
( define phi-stream
( lambda ()
( define approx-stream
( stream-cons 2.0
approx-stream ))
( stream-map next-phi approx-stream )))
O procedimento phi-stream retorna a stream de aproximações, e podemos usar
stream-take para extrair partes dela.
(define phi-approx (phi-stream))
(stream-take phi-approx 10)
(2.0
1.5
1.6666666666666665
1.6
1.625
1.6153846153846154
1.619047619047619
1.6176470588235294
1.6181818181818182
1.6179775280898876)
Versão Preliminar
9.4 estruturas de dados com custo amortizado
(esta seção é um rascunho)
[ 27 de outubro de 2010 at 15:47 ]
223