One-dimensional cellular automata: Difference between revisions

Content added Content deleted
(GP)
Line 1,466: Line 1,466:
Gen. 9: __##________________
Gen. 9: __##________________
</pre>
</pre>
=={{header|PARI/GP}}==
This version defines the fixed cells to the left and right as dead; of course other versions are possible. This function generates one generation from a previous one, passed as a 0-1 vector.
<lang parigp>step(v)=my(u=vector(#v),k);u[1]=v[1]&v[2];u[#u]=v[#v]&v[#v-1];for(i=2,#v-1,k=v[i-1]+v[i+1];u[i]=if(v[i],k==1,k==2));u;</lang>

=={{header|Perl 6}}==
=={{header|Perl 6}}==