08.02.2015 Views

Programação Funcional e Concorrente com Scheme

Programação Funcional e Concorrente com Scheme

Programação Funcional e Concorrente com Scheme

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

notas de aula - Jerônimo C. Pellegrini<br />

nomes primeiro no quadro local, e depois no quadro anterior (que neste caso é o quadro<br />

global). Assim, os valores usados para x e y serão 0.5 e 7.<br />

x --> 10<br />

y --> 7<br />

x --> 0.5<br />

As formas especiais let, let* e letrec são “açúcar sintático” para lambda, por isso<br />

também criam quadros <strong>com</strong> as variáveis que introduzem.<br />

Sabendo os <strong>com</strong>primentos dos lados de um triângulo, podemos calcular sua área<br />

usando a fórmula de Heron:<br />

A = √ s(s − a)(s − b)(s − c)<br />

onde s é o semiperímetro, (a + b + c)/2.<br />

Os dois procedimentos <strong>Scheme</strong> a seguir implementam a fórmula de Heron.<br />

( define semi-perimeter<br />

( lambda (s1 s2 s3)<br />

(/ (+ s1 s2 s3) 2)))<br />

( define area-tri / sides<br />

( lambda (a b c)<br />

( let ((s ( semi-perimeter a b c )))<br />

( sqrt (* s (- s a)<br />

(- s b)<br />

(- s c ))))))<br />

Ao definirmos estes dois procedimentos no REPL, adicionamos seus dois nomes ao<br />

ambiente global, <strong>com</strong>o mostra a figura a seguir:<br />

Versão Preliminar<br />

[ 27 de outubro de 2010 at 15:47 ]<br />

85

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!