main=putStr$do x<-[0,0,1];"!@#$% ^"++drop x" &*()\n)(*& ^ %$#@!\n"