From: Clyne Sullivan Date: Tue, 7 Dec 2021 19:49:00 +0000 (-0500) Subject: day7: fix file extension X-Git-Url: https://code.bitgloo.com/?a=commitdiff_plain;h=0b3e007095b6c478b5c250ce01ca79a8e9533c50;p=clyne%2Fadvent-of-code.git day7: fix file extension --- diff --git a/day7/maxima.mac b/day7/maxima.mac new file mode 100644 index 0000000..a1c2d18 --- /dev/null +++ b/day7/maxima.mac @@ -0,0 +1,10 @@ +load("descriptive")$ +load("in.mac")$ /* Should define `input` list of numbers. */ + +calcfuel(pos, distmod) := + lreduce("+", map(lambda([n], distmod(abs(pos - n))), input))$ + +calcfuel(median(input), lambda([x],x)); +calcfuel(floor(mean(input)), lambda([x], (x*(x+1)/2))); +calcfuel(floor(mean(input)) + 1, lambda([x], (x*(x+1)/2))); + diff --git a/day7/maxima.mx b/day7/maxima.mx deleted file mode 100644 index 4625fdc..0000000 --- a/day7/maxima.mx +++ /dev/null @@ -1,10 +0,0 @@ -load("descriptive")$ -batchload("./in.mx")$ /* Should define `input` list of numbers. */ - -calcfuel(pos, distmod) := - lreduce("+", map(lambda([n], distmod(abs(pos - n))), input))$ - -calcfuel(median(input), lambda([x],x)); -calcfuel(floor(mean(input)), lambda([x], (x*(x+1)/2))); -calcfuel(floor(mean(input)) + 1, lambda([x], (x*(x+1)/2))); -