33 lines
354 B
Awk
33 lines
354 B
Awk
|
BEGIN{ FS = "," }
|
||
|
{
|
||
|
for(i=1;i<=NF;i++){
|
||
|
f[i] = $i
|
||
|
}
|
||
|
}
|
||
|
END{
|
||
|
n = NF
|
||
|
|
||
|
incn = 0
|
||
|
|
||
|
for(g=1;g<=80;g++){
|
||
|
incn=0
|
||
|
for(i=1;i<=n;i++){
|
||
|
if(!f[i]){
|
||
|
f[i] = 6
|
||
|
incn++
|
||
|
f[n+incn]=8
|
||
|
}
|
||
|
else{
|
||
|
f[i]--
|
||
|
}
|
||
|
}
|
||
|
n = length(f)
|
||
|
# printf "day %d ", g
|
||
|
for(i=1;i<=n;i++){
|
||
|
# printf "%d, ", f[i]
|
||
|
}
|
||
|
# print ""
|
||
|
}
|
||
|
print "total ", length(f)
|
||
|
}
|