zmagajna

-module(palin).

-export([server/1]).

% palindrome problem
%
% palindrome("Madam I\'m Adam.") = true
palindrome(Xs) -> palin(nocaps(nopunct(Xs))).

nopunct([]) -> [];