patrick/advent-of-code-2021
1
0
Fork 0
mirror of https://github.com/Smaug123/advent-of-code-2021 synced 2025-10-05 20:18:41 +00:00
Code Issues Packages Projects Releases Wiki Activity

Remove some Mathematica nonanswers

Browse Source
This commit is contained in:
Smaug123
2021-12-20 12:56:49 +00:00
parent b98c513ec2
commit 6422623795
3 changed files with 0 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
day_3/day_3.m
View File

@@ -1,7 +0,0 @@
(* ::Package:: *)
nums=Import[StringJoin[NotebookDirectory[], "/input.txt"],"Table"];
part1 = 1##&@@Tr[1##&@@@(#/."up"->-"down")]&;
part2=1##&@@Rest@Fold[Function[{state,elt},Switch[elt[[1]],"forward",state+{0,elt[[2]],state[[1]] elt[[2]]},"down",MapAt[elt[[2]]+#&,state,1],"up",MapAt[#-elt[[2]]&,state,1]]],{0,0,0},#]&;

7
day_4/day_4.m
View File

@@ -1,7 +0,0 @@
(* ::Package:: *)
nums=Import[StringJoin[NotebookDirectory[], "/input.txt"],"Table"];
part1 = 1##&@@Tr[1##&@@@(#/."up"->-"down")]&;
part2=1##&@@Rest@Fold[Function[{state,elt},Switch[elt[[1]],"forward",state+{0,elt[[2]],state[[1]] elt[[2]]},"down",MapAt[elt[[2]]+#&,state,1],"up",MapAt[#-elt[[2]]&,state,1]]],{0,0,0},#]&;

7
day_5/day_5.m
View File

@@ -1,7 +0,0 @@
(* ::Package:: *)
nums=Import[StringJoin[NotebookDirectory[], "/input.txt"],"Table"];
part1 = 1##&@@Tr[1##&@@@(#/."up"->-"down")]&;
part2=1##&@@Rest@Fold[Function[{state,elt},Switch[elt[[1]],"forward",state+{0,elt[[2]],state[[1]] elt[[2]]},"down",MapAt[elt[[2]]+#&,state,1],"up",MapAt[#-elt[[2]]&,state,1]]],{0,0,0},#]&;