main=interact$foldr(%)""
'0'%x=shows(sum[1|')'<-x]-sum[1|'('<-x])x
p%x=p:x