splitQ s
= unko
id id s
where unko c1 c2 [] = c2 $ c1' : []
where c1' = c1 []
unko c1 c2 (x:xs)
| x
== '?' = unko
id (c2
. (c1
[] :
)) xs
c3BsaXRRIDo6IFN0cmluZyAtPiBbU3RyaW5nXQpzcGxpdFEgcyAgPSB1bmtvIGlkIGlkIHMgd2hlcmUKICAgIHVua28gYzEgYzIgW10gPSBjMiAkIGMxJyA6IFtdCiAgICAgICAgd2hlcmUgYzEnID0gYzEgW10KICAgIHVua28gYzEgYzIgKHg6eHMpCiAgICAgICAgfCB4ID09ICc/JyAgPSB1bmtvIGlkIChjMiAuIChjMSBbXSA6KSkgeHMKICAgICAgICB8IG90aGVyd2lzZSA9IHVua28gKGMxIC4gKHggOikpIGMyIHhzCgptYWluID0gcHJpbnQgJCB0YWtlIDEwICQgc3BsaXRRICQgY3ljbGUgIjIxMz80NjQ2ND82OTg/Ig==