Programação Funcional e Concorrente com Scheme

notas de aula - Jerônimo C. Pellegrini
( define make-svg-image
( lambda ( objects )
( append ( list ’svg
’ version 1.1
’xmlns " http :// www .w3.org /2000/ svg ")
objects )))
( define image
( make-svg-image ( list ( make-svg-triangle 0 0
(xml-write-tag image)
200 200
0 200
" blue "
" rgb (255 ,0 ,0) "
Versão Preliminar
3)
( make-svg-line 0 100
100 100
" green "
" green "
5))))
")
[ 27 de outubro de 2010 at 15:47 ]
75