One-dimensional cellular automata: Difference between revisions

Content added Content deleted
Line 3,005: Line 3,005:
StringBuffer new
StringBuffer new
l size loop: i [
l size loop: i [
l at(i 1 -) '#' ==
l at( i 1- ) '#' ==
l at(i 1 +) '#' == +
l at( i 1+ ) '#' == +
l at(i) '#' == + 2 ==
l at( i ) '#' == +
ifTrue: [ '#' ] else: [ '_' ] over add
2 == ifTrue: [ '#' ] else: [ '_' ] over add
] ;
] ;