turing.inc.php のバックアップ(No.3)

チューリングマシンエミュレータ †

ロジャー・ペンローズの「皇帝の新しい心」のチューリングマシンを実装。

１を加える。３＋１

#turing(prog)
Start→10
10[0]→[0] R 10
10[1]→[1] R 20
20[0]→[1] Stop
20[1]→[1] R 20
#turing(30)
ooo111oooooo ←初期値

Turing's program

Start→10
10[0]→[0] R 10
10[1]→[1] R 20
20[0]→[1] Stop
20[1]→[1] R 20

Turing's Execution

Start_____oooooooooooooooooooo|6|0,oooooooooooooooooooooooooooooo
1006______oooooooooooooooooooo|6|0,oooooooooooooooooooooooooooooo
ERROR

ooo111oooooo

[凍結解除]

↑

互除法 †

最大公約数を求める。６と９で３

Turing's program

Start→100
100[0]→[0] R 100
100[1]→[1] L 101
101[0]→[1] R 102
101[1]→[1] L 101
102[0]→[0] R 110
102[1]→[0] R 103
103[0]→[0] R 104
103[1]→[1] R 103
104[0]→[0] R 104
104[1]→[0] R 105
105[0]→[0] L 107
105[1]→[1] L 106
106[0]→[0] L 106
106[1]→[1] L 101
107[0]→[0] L 107
107[1]→[1] L 108
108[0]→[0] L 109
108[1]→[1] L 108
109[0]→[0] R 102
109[1]→[1] L 101
110[0]→[0] Stop
110[1]→[1] R 110

Turing's Execution

Start_____oooooooooooooooooooo|1|1,oooooooooooooooooooooooooooooo
101_______oooooooooooooooooooo|1|1,oooooooooooooooooooooooooooooo
111_______oooooooooooooooooooo|1|,ooooooooooooooooooooooooooooooo
12,_______oooooooooooooooooooo|,|oooooooooooooooooooooooooooooooo
ERROR

ooooooo111111ooooo111111111oooooo