f z xs = foldl (*) z xs