main=mapM(putStrLn.f.show)[1..1000] f x=max(filter(`elem`"369")x>>"Clap")x