i:`$''" "\'(0:"i/25")^'":"
n:#k:?,/i
r:,/{x[0],/:1_x}'i
g:{k?(,/r@&|/'x=r)^x}'k
x*n-x:*|*{3 3~/:x[;0 1]}#{
 x:3(?,/g@)/x
 t:{x,&1<#'=(,/g@x)^x}/x
 u:(!n)^t
 #'(t^t^,/g u;u^u^,/g t;t)}'!n