# busy5b.tm
# input: blank tape

A _ B 1 right
A 1 D _ left
B _ C 1 left
B 1 D 1 right
C _ A 1 left
C 1 C 1 left
D _ F 1 right
D 1 E 1 right
E _ A 1 right
E 1 B _ right