part1 :: [Part]
part1 = [
    "Pol",
    "Sand",
    "Wester",
    "Karl",
    "Gustav",
    "Nils",
    "Lund" ]
part1 :: [Part]
part1 = [
    "Pol",
    "Sand",
    "Wester",
    "Karl",
    "Gustav",
    "Nils",
    "Lund" ]
part1 = [
    "Pol",
    "Sand",
    "Wester",
    "Karl",
    "Gustav",
    "Nils",
    "Lund" ]