e =  () => tape[machine.pos] = undefined
p0 = () => tape[machine.pos] = 0
p1 = () => tape[machine.pos] = 1
r =  () => machine.pos++
l =  () => machine.pos--
