1

Tengo ese ejercicio en Haskell y me explota, no se que me falta modificar, no podemos usar recursividad, entonces lo hice así pero me falla, alguien me pude dar una mano? gracias

type Sueldo = Float
type Nombre = String
type Empleado = (Nombre , Sueldo)

nombre :: Empleado-> Nombre
nombre = fst

sueldo :: Empleado -> Sueldo
sueldo = snd

--i) Escribir una función sueldosMayores :: Float -> [Empleado] -> [Sueldo] que, dados
--un monto y una lista de empleados, devuelve la lista de los sueldos mayores al monto.
 
sueldosMayores :: Float -> [Empleado] -> [Sueldo]
sueldosMayores   [] = [] 
sueldosMayores x =  filter (( x <).(sueldo)) []

2 respuestas 2

1

A veces queda más claro si usas una compresión de listas:

sueldosMayores :: Float -> [Empleado] -> [Sueldo]
sueldosMayores monto empleados = 
    [s | s <- map sueldo empleados, s > monto]
0

Creo que esta erronea la definicion de la funcion sueldosMayores, prueba esto:

sueldosMayores :: Float -> [Empleado] -> [Sueldo]
sueldosMayores _ [] = [] 
sueldosMayores x xs = filter ( x <) (map (sueldo) xs)
4
  • 1
    Muchas gracias Nacho
    – Logan
    el 13 jul. 2020 a las 21:16
  • Te sirvio? De ser asi te pido que marques la respuesta como correcta! el 13 jul. 2020 a las 21:21
  • Y creo que la linea sueldosMayores _ [] = [] no es necesaria el 13 jul. 2020 a las 21:25
  • Estoy tratando de hacer un ejercicio con find :: (a -> Bool) -> a -> Maybe a pero no se bien como desarrollarlo
    – Logan
    el 14 jul. 2020 a las 14:54

Tu Respuesta

Al pulsar en “Publica tu respuesta”, muestras tu consentimiento a nuestros términos de servicio, política de privacidad y política de cookies

¿No es la respuesta que buscas? Examina otras preguntas con la etiqueta o formula tu propia pregunta.