Si bien no esta mal resuelto no esta bien usado el fold aca, piensen que en esta funcion ustedes quieren saber si un usuario es el mejor segun un determinado criterio (porque estan usando esta funcion como condicion del find, entonces imagino que su razonamiento pasaba por ese lado), entonces la condicion que tendrian que expresar en este punto es que ese usuario sea mejor que todos los elementos de la lista, lo cual es mas natural expresar con un all que con un fold
https://github.com/LucasGaleano/paradigmas_TPs/blob/fe8db325dcaf6665f2002e2456ba4034e9f7bb76/blockChain.hs#L178
Si bien no esta mal resuelto no esta bien usado el fold aca, piensen que en esta funcion ustedes quieren saber si un usuario es el mejor segun un determinado criterio (porque estan usando esta funcion como condicion del find, entonces imagino que su razonamiento pasaba por ese lado), entonces la condicion que tendrian que expresar en este punto es que ese usuario sea mejor que todos los elementos de la lista, lo cual es mas natural expresar con un all que con un fold