main=putStr$f"1" f s=take 95$"1=2-"++s++'\n':f("(2-"++s++")")