finish p13

p13: Run-length encoding of a list (direct solution).