wd@((4-5*#){.'.'}.@,@,.1":1+{.@>)L:1{::(,"0<)/a:$~3,~do}:1!:1]3