pe = () => tape[machine.pos] = 'e'
px = () => tape[machine.pos] = 'x'

states = {
  'b/undefined': [[pe, r, pe, r, p0, r, r, p0, l, l], 'o'],
  'o/1': [[r, px, l, l, l], 'o'],
  'o/0': [[], 'q'],
  'q/any': [[r, r], 'q'],
  'q/undefined': [[p1, l], 'p'],
  'p/x': [[e, r], 'q'],
  'p/e': [[r], 'f'],
  'p/undefined': [[l, l], 'p'],
  'f/any': [[r, r], 'f'],
  'f/undefined': [[p0, l, l], 'o']
}
machine.state = 'b'
