main=interact f f x|x<"AA"="A\nAA\nB\nB\nBB\nA" f _="AAB\nBAAB\nA"