diff --git a/day2.hs b/day2.hs index 236d459..d86bfea 100644 --- a/day2.hs +++ b/day2.hs @@ -3,7 +3,7 @@ b i|i>80=i-87|let=i-64 a%b=q$mod(a-b)3 q 2=6 q i=3-3*i -o#p=1+(mod(o+p)3) +o#p=1+mod(o+p)3 y[o,_,p]=v[o,0,o#p] v[x,_,z]=z+x%z main=interact$show.((,).(sum.m v)<*>(sum.m y)).m(m(b.fromEnum)).lines