Abelian sandpile model: Difference between revisions

m
→‎{{header|Perl 6}}: Slightly better update
m (→‎{{header|Perl 6}}: Slightly better update)
Line 1,247:
}
unless $hide-progress {
print join ''"\e[1;1H", @buffer.map( { @color[$_ min 4] } ).join
}
} until $done;
 
print join ''"\e[1;1H", @buffer.map( { @color[$_ min 4] } ).join;
 
cleanup;</lang>
10,333

edits