Rem  Fibonacci
Rem  Generates (pairs of) numbers in the Fibonacci
Rem  series where the next number is the sum of the
Rem  previous two.   It begins 1, 1, 2, 3, 5, 8,...

Turing
0,0;0,0,R
0,1;1,0,R
1,0;2,0,R
1,1;1,1,R
2,1;3,0,R
3,0;4,0,R
3,1;3,1,R
4,0;5,0,L
4,1;4,1,R
5,1;6,0,L
6,0;7,0,L
6,1;6,1,L
7,0;8,1,R
7,1;7,1,L
8,0;21,1,R
8,1;9,0,R
9,0;10,0,R
9,1;9,1,R 
10,0;5,1,L
10,1;10,1,R
20,0;21,0,R
20,1;21,1,R
21,0;22,1,L
21,1;21,1,R
22,1;23,0,L
23,0;24,0,R
23,1;23,1,L
24,1;25,0,R
25,0;26,0,R
25,1;25,1,R
26,0;27,1,L
26,1;26,1,R
27,0;28,0,L
27,1;27,1,L
28,0;29,1,R
28,1;28,1,L
29,0;40,0,L
29,1;25,0,R
40,0;41,0,L
40,1;40,1,L
41,0;50,0,R
41,1;42,1,L
42,0;0,0,R
42,1;42,1,L
50,0;51,0,R
51,0;52,0,R
51,1;51,1,R
52,0;0,0,S
52,1;52,1,R

Tape
001111010100000000000000000000000000
Rem  This input will find the fourth new number in
Rem  the series using two 1's to start it off
Rem  These 'seed' values may be altered to produce
Rem  a different series

End