Não consigo pensar em uma mentalidade funcional para resolver esse problema de uma maneira simples que também funcione para listas muito longas. Se você tem uma lista como:

["one", "two", "three", "four", "five"]

Posso dizer com simplicidade o tamanho da palavra mais longa:

maximum $ map length ["one", "two", "three", "four", "five"]

Como eu modificaria a instrução anterior para retornar a stringtrês?