Solution 1: Pointfree version, using List.drop and List.take
List.drop
List.take
sublist start end = List.drop (start - 1) >> List.take (end - start + 1)