2 lines
66 B
Haskell
2 lines
66 B
Haskell
extendWith f [] = []
|
|
extendWith f xs@(x:ys) = x : zapWith f xs ys
|
extendWith f [] = []
|
|
extendWith f xs@(x:ys) = x : zapWith f xs ys
|