Anonymous user
One-dimensional cellular automata: Difference between revisions
One-dimensional cellular automata (view source)
Revision as of 22:09, 24 December 2013
, 10 years ago→{{header|D}}: Add Déjà Vu example
(→{{header|D}}: Add Déjà Vu example) |
|||
Line 982:
}</lang>
The output is the same as the second version.
=={{header|Dëjà Vu}}==
<lang dejavu>new-state size:
0 ]
repeat size:
random-range 0 2
[ 0
update s1 s2:
for i range 1 - len s1 2:
s1! -- i
s1! i
s1! ++ i
+ +
set-to s2 i = 2
s2 s1
print-state s:
for i range 1 - len s 2:
!print\ s! i
!print ""
same-state s1 s2:
for i range 1 - len s1 2:
if /= s1! i s2! i:
return false
true
run size:
new-state size
new-state size
while true:
update
print-state over
if same-state over over:
return print-state drop
run 60</lang>
{{out}}
<pre>001110011010110111001111110111011111010011000001010111111100
001010011101111101001000011101110001100011000000101100000100
000100010111000110000000010111010001100011000000011100000000
000000001101000110000000001101100001100011000000010100000000
000000001110000110000000001111100001100011000000001000000000
000000001010000110000000001000100001100011000000000000000000
000000000100000110000000000000000001100011000000000000000000
000000000000000110000000000000000001100011000000000000000000
000000000000000110000000000000000001100011000000000000000000</pre>
=={{header|DWScript}}==
| |||