edit list.hs add function yzip