-- zipping complex tensor with scalar 
zipWith' f t (Scalar x) = (`f` x) `Multilinear.Generic.MultiCore.map` t
zipWith' f t (Scalar x) = (`f` x) `Multilinear.Generic.MultiCore.map` t
zipWith' f t (Scalar x) = (`f` x) `Multilinear.Generic.MultiCore.map` t