f:=method(s,"{".. if(1==a:=s size/2+.5,s,f(s slice(0,a)).. f(s slice(a))).."}");f(File standardInput readLine)print