i:{{(x;.y)}." "\x}'0:"i/12"
c:(*/b:6*|/#''i)#0
g:{
 c&:0N
 {
  (l;r):x
  ck:b/#'x
  $[~^c@ck;:c@ck;]
  $[~#l;:~#r;]
  $[("#"=*l)&~#r;:0;]
  $["."=*l;:o(1_l;r);]
  n:*r
  d:l?"."
  k:$[n&(n>#l)|((~^d)&d<n)|l[n]="#";0;o(1_n_l;1_r)]
  $["#"=*l;:c[ck]:k;]
  :c[ck]:k+o(1_l;r)}x}
+/g'i
+/g'{("?"/5#,x;,/5#,y)}.'i