Lista 2 LISP (turma A)

Instruções:

• coloque apenas as funções pedidas (mais as funções auxiliares) no arquivo "ra123456.lsp" se seu RA é 123456. Não coloque no arquivo os seus testes.
• coloque o seguinte encantamento no inicio do arquivo (substitua "123456" pelo seu RA) Note the o "123456" é um string, entre aspas. (setf pacote (or (find-package "123456") (make-package "123456"))) (in-package "123456") (export '(palavras divida))
• me mande um email com o titulo "MC336 lista 2" e com o arquivo como attachment Isso é importante. Precisa ser ATTACHMENT - verifique que seu emailer não inclue no corpo da mensagem attachments em texto.

Problemas

• 1. Escreva a função palavras que dado um string que contem varias palavras (separadas por um ou mais brancos) retorna uma lista com todas as palavras do string, ordenadas pela ordem do dicionário (ordem lexicografica), sem repetições, e em minuculas apenas (desconsidere a diferença entre maiúsuclas e minúsculas). As palavras são strings e não devem ter brancos. (palavras "ouviram Do Ipiranga um do margens placidas DO poVO ") retorna ("do" "ipiranga" "margens" "ouviram" "placidas" "povo" "um")
• 2. Um arquivo contem varias listas da forma (jose pedro 50) que significa que jose deve a pedro 50 reais.

  Escreva a função divida que dado um string com o nome de um arquivo que contem as dividas retorna o nome da pessoa que esta devendo mais que as outras (dívida liquida). Se jose deve a pedro 50 mas maria deve a jose 30 então a dívida liquida de jose é 20.