-module a.
-export[m/0].
m()->io:format("A
AA
B
B
BB
A
AAB
BAAB
A").