Usando fold o como fold

Usando fold o como fold

de Juan Manuel Rodriguez Otormin -
Número de respuestas: 1

Buenas, me gustaría saber si el siguiente código cuenta como "como foldr"

takeWhile' :: (a -> Bool) -> [a] -> [a]
takeWhile' f l1 = foldr funcAux [] l1
    where funcAux x l | f x = x:l
                      | otherwise = []

Gracias