Rem  Triangular
Rem  Finds the nth triangular number
Rem  (where 'n' is given on the tape)

Turing
0,0;0,0,R
0,1;1,0,R
1,0;2,0,R
1,1;1,1,R
2,0;3,1,L
2,1;2,1,R
3,0;4,0,L
3,1;3,1,L
4,0;10,1,L
4,1;5,1,L
5,0;6,1,R
5,1;5,1,L
6,1;1,0,R  
10,0;11,0,R
10,1;10,1,L
11,1;12,0,R
12,0;13,0,R
12,1;1,0,R
13,0;0,0,S
13,1;13,1,R

Tape
00000011110000000000000000

End