374 views
# PLP | Practica 0 Ejercicio 3 ```haskell -- Ejercicio 3: -- Contamos con los tipos Maybe y Either. -- data Maybe a = Nothing | Just a -- data Either a b = Left a | Right b --- a) Definir la función -- Que dado un número devuelve su inverso multiplicativo si está definido, caso contrario da nothing. inverso :: Float -> Maybe Float inverso 0 = Nothing inverso x = Just (1/x) -- Convierte a entero una expresión que puede ser booleana o entera, en el caso de los booleanos 0 es False y 1 es True. aEntero :: Either Int Bool -> Int aEntero (Left x) = x aEntero (Right True) = 1 aEntero (Right False) = 0 ```