solve_day1 :: (test: bool) {
    contents := read_entire_file(ifx test then "inputs/day1_test.txt" else "inputs/day1.txt");
    lines := split(contents, cast(u8) #char "\n");

    numbers: [..]s64;

    part1 := 0;
    part2 := 0;

    for lines {
        array_add(*numbers, string_to_int(it));
    }

    for 1..numbers.count - 1 {
        if numbers[it] > numbers[it - 1]  part1 += 1;
    }

    for 3..numbers.count - 1 {
        sum1 := numbers[it - 1] + numbers[it - 2] + numbers[it - 3];
        sum2 := numbers[it - 1] + numbers[it - 2] + numbers[it];

        if sum2 > sum1  part2 += 1;
    }

    print("Part 1: %\n", part1);
    print("Part 2: %\n", part2);
}