Trabalho final da disciplina Paradigmas de Programação (INE5416) da UFSC.
O problema pode ser jogado aqui.
- Execute o comando:
swipl -s .\main.pl - No Prolog, use o comando:
solution(Problem). - Veja a solução e use
;para exibir mais soluções - Ao final use o comando
halt.
Problem = [client(amarelo, fluminense, abacaxi, tina, advogada, maquiagem),
client(branco, baiana, laranja, ana, cozinheira, cortar),
client(vermelho, mineira, maracuja, mariana, tradutora, alisar),
client(verde, paulista, limao, vivian, dentista, tingir),
client(azul, gaucha, morango, claudia, publicitaria, manicure)]