valid=: (1":0,:3#1)&(0:=1(E.S+#@]<2:*e.S~")S=:+/on) cands=: ]`([:I.'.'"_=[)`[}"1 e.S&'.'>@,@{@#(<'01')"_ sumup=: ({~2:=#@~.)"1@|:@('.'"_,valid"1#])@cands wd@,@wd@>sumup^:(11"_>e.&'.'S)"1@|:^:2^:_@:>&.><;._1^:2(,stdin)2#LF