samer@4: % zip - Polymorphic zip using zipwith(@tuple,...)
samer@12: %
samer@12: % zip :: seq(A1), seq(A2), ... -> seq(cell {A1,A2,..}).
samer@12: % zip :: cells(A1), cells(A2), ... -> cells(cell {A1,A2,..}).
samer@4: function y=zip(varargin)
samer@4: 	y=zipwith(@tuple,varargin{:});
samer@4: end