Open fidel-ml opened 2 years ago
antes de meterme a corregir el ejercicio. yo ramaMasLarga la tengo así, está bien?
ramaMasLarga EmptyT = []
ramaMasLarga (NodeT e a1 a2) = e : elMasLargo (ramaMasLarga a1) (ramaMasLarga a2)
elMasLargo :: [a] -> [a] -> [a]
elMasLargo a b = if length a > length b
then a
else b
Claro. Fijate que PRIMERO hace la recursión y DESPUÉS decide. Vos empezás preguntando sobre la estructura que tenés, en lugar de mandarte a la recursión...
Es EXACTAMENTE la misma corrección que hicimos para
ramaMasLarga
en la Pr3... :(