Soluciones ejercicios Haskell mumuki UNC (7. Alternativas: Guardas y Patrones) - https://mumuki.io/introalgo-unc/lessons/191-programacion-funcional-alternativas-guardas-y-patrones

soluciones.hs

--Ejercicio 1: Guardas: Básico
minimoEntre x y | x <= y = x
                | y <= x = y

--Ejercicio 2: Otherwise
cantidadDePochoclosParaMinutosDeCine minutos | minutos < 40 = 2
                                             | minutos > 200 = 10
                                             | otherwise = ceiling (minutos / 20)

--Ejercicio 3: Orden de las Condiciones
horasDuerme persona | estudiaIngenieria persona = 4
                    | programa persona = 6

--Ejercicio 4: No todo lo que brilla es Oro
siempreDiceLaVerdad persona = esChico persona || esBorracho persona

--Ejercicio 6: Cuando los patrones no encajan
esCero 0 = True
esCero otro = False

--Ejercicio 7: Variable Anónima
estadoDeAnimo "Viernes" = "¡Estoy enamorado!"
estadoDeAnimo _ = "Meh :S"

--Ejercicio 8: Pausa: Volvieron los tipos
esVocalCerrada :: Char -> Bool

--Ejercicio 9: Puntos Para Setenta!
puntosParaSetenta :: (Eq a, Fractional a) => a-> a 
puntosParaSetenta 1 = 5.5
puntosParaSetenta 10 = 0.5
puntosParaSetenta 11 = 0.5
puntosParaSetenta 12 = 0.5
puntosParaSetenta a = a

--Ejercicio 11: Tipando tuplas
distanciaAlOrigen parOrdenado = sqrt((fst parOrdenado)^2 + snd (parOrdenado)^2)

--Ejercicio 12: Pattern Matching con Tuplas
poderSoldado (_, fuerza, destreza) = fuerza * destreza