% $Id: zip.erl,v 1.1 2013/12/04 00:38:05 leavens Exp leavens $ -module(zip). -export([zip/2]). -spec zip([S],[T]) -> [{S,T}]. zip([],_) -> []; zip(_,[]) -> []; zip([A|As],[B|Bs]) -> [{A,B}|zip(As,Bs)].