Letras formadas a partir de la palabra más larga

Escribe una función que devuelva true si todas las cadenas de un arreglo pueden formarse usando únicamente los caracteres de la cadena más larga.

Ejemplos

canForm(["mast", "manifest", "met", "fan"]) ➞ true

canForm(["may", "master", "same", "reams"]) ➞ false

canForm(["may", "same", "reams", "mastery"]) ➞ true

Notas

Habrá una única cadena que será la más larga.