You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

7 lines
255 B

#!../k
a:"#"=0:"i/10"
K:1+2*k:-1+|/n:(#a;#*a)
t:@[;K/2#k;:;-1]@,/(|'|1_'t+2*m),'t:(|+t),1_t+m:|//t:s#(?t@<t)?t:+/>/t*\:'t:!s:2#1+k
c:#'?'(2##*p)#t@K/k+,/'p-/:'p:n\&,/a
-1+|/c
100/|p@'({x^0N}@,/+h@\:!l:|/#'h:{y@<x y}[+/d*d]'h@H@<H:!h:=t@K/k+d:p-p@'*>c)200