ЗП
а так прийдется вешать дополнительный fmap
Size: a a a
2020 November 10
ЗП
ЗП
мне как раз надо функцию вещать после
ЗП
fmap go $ init $ zip (inits xs) (tails xs)к
fmap go $ init $ zip (inits xs) (tails xs)а какая вообще тут разница будет между
fmap go $ init $ zip (inits xs) (tails xs)
и
init $ fmap go $ zip (inits xs) (tails xs)
и
init $ zipWith go (inits xs) (tails xs)
и
zipWith go (inits xs) (init (tails xs))
и
zipWith go (init (inits xs)) (tails xs)
никакой, все эти функции дадут одинаковый результат
fmap go $ init $ zip (inits xs) (tails xs)
и
init $ fmap go $ zip (inits xs) (tails xs)
и
init $ zipWith go (inits xs) (tails xs)
и
zipWith go (inits xs) (init (tails xs))
и
zipWith go (init (inits xs)) (tails xs)
никакой, все эти функции дадут одинаковый результат
ЗП
зависит от go)
ЗП
а какая вообще тут разница будет между
fmap go $ init $ zip (inits xs) (tails xs)
и
init $ fmap go $ zip (inits xs) (tails xs)
и
init $ zipWith go (inits xs) (tails xs)
и
zipWith go (inits xs) (init (tails xs))
и
zipWith go (init (inits xs)) (tails xs)
никакой, все эти функции дадут одинаковый результат
fmap go $ init $ zip (inits xs) (tails xs)
и
init $ fmap go $ zip (inits xs) (tails xs)
и
init $ zipWith go (inits xs) (tails xs)
и
zipWith go (inits xs) (init (tails xs))
и
zipWith go (init (inits xs)) (tails xs)
никакой, все эти функции дадут одинаковый результат
fn :: [a] -> [([a], a, [a])]
fn xs =
zipWith go (L.inits xs) (L.tails xs)
where
go y ys = case ys of
z:zs -> (y, z, zs)
[] -> error "Error"
в кейс с Error не должно попасть, а для этого мне и надо init
ЗП
да вроде даже с error не будет никакой проблемы, последний элемент просто не будет потребляться, поэтому абсолютно не важно, error там или нет
будет
ЗП
fn [1,2,3]ЗП
уже выпадет в кейс
ЗП
ЗП
это в хаскель
ЗП
проверь