s=" shark";main=putStr(do x<-((++s)<$>words"Baby Mommy Daddy Grandma Grandpa")++["Let's go hunt","Run away","Safe at last","It's the end"];("aaa">>x++',':(s>>" doo")++"\n")++x++"!\n")