fast_palindrome.turingmachine

name: Fast binary palindrome
init: copy
accept: done

copy,_,_
l2b,_,_,-,<

copy,1,_
copy,1,1,>,>

copy,0,_
copy,0,0,>,>

l2b,_,0
l2b,_,0,-,<

l2b,_,1
l2b,_,1,-,<

l2b,_,_
merge,_,_,<,>

merge,0,0
merge,0,_,<,>

merge,1,1
merge,1,_,<,>

merge,1,0
fail,1,_,<,>

merge,0,1
fail,0,_,<,>

fail,0,0
fail,0,_,<,>

fail,1,1
fail,1,_,<,>

fail,1,0
fail,1,_,<,>

fail,0,1
fail,0,_,<,>

merge,_,_
done,_,_,>,-

fail,_,_
fail,_,_,>,-