count:()
p0[`value`auto`manual`copy`link]:(0;0;"value+:1";".k.copy _d";".k.link _d")
p0[.;`c]:`data`check`button`button`button
p0..l:$I:0
copy:{`show$~@[~new[];`d`t`l;:;(".k.count ",i;".k.count[",i,";_i]:_v ._i";i:$-1+#count,:. x)]}
link:{`show$~.[~new[];();:;.~x]}
new:{`$".k.p",$I+:1}
.t..t:"{if[.k.count[x;`auto];.k.count[x;`value]+:1]}'!#.k.count;"
\t 1
copy`.k.p0