read def of zip/combine. haskell syntax is better. slow