Tener dificultades para entender cómo usar nubBy

Question

Tengo un problema donde tengo que manipular una lista de flotantes. [[Flotador]]. esta lista de flotadores es de longitud 4. Quiero eliminar duplicados donde se prueban los primeros 3 elementos, pero ignore el 4to. Esta es la última parte de un problema de varias partes y he estado golpeando mi cabeza en una pared por un tiempo tratando de entender cómo usar esto. No puedo encontrar ninguna información útil.

fixDuplicates :: [[Float]] -> [[Float]] 
fixDuplcates [[]] = [[]] 
fixDuplicates x = nubBy ? 

Answer 1

nubBy toma una función a utilizar para la comparación de elementos para la igualdad. Su definición de igualdad es que dos listas son iguales si sus primeros tres elementos coinciden. Una implementación directa de esto es:

fixDuplicates xs = nubBy firstThreeMatch xs 
    where firstThreeMatch ys zs = take 3 ys == take 3 zs