main=readLn>>=f")";f x@ ~(c:y)n=putStrLn((x>>"M(")++show n++x)>>[f(c:x)$n+11,f y$n-10]!!div n 101