Create tpArbol.hs