One-dimensional cellular automata: Difference between revisions
Content added Content deleted
(Added K example) |
|||
| Line 1,173: | Line 1,173: | ||
<lang javascript>alert(caStep([0,1,1,1,0,1,1,0,1,0,1,0,1,0,1,0,0,1,0,0]));</lang> |
<lang javascript>alert(caStep([0,1,1,1,0,1,1,0,1,0,1,0,1,0,1,0,0,1,0,0]));</lang> |
||
shows an alert with "0,1,0,1,1,1,1,1,0,1,0,1,0,1,0,0,0,0,0,0". |
shows an alert with "0,1,0,1,1,1,1,1,0,1,0,1,0,1,0,0,0,0,0,0". |
||
=={{header|K}}== |
|||
<lang K>f:{2=+/(0,x,0)@(!#x)+/:!3}</lang> |
|||
Example usage: |
|||
<lang K>`0:"_X"@f\0 1 1 1 0 1 1 0 1 0 1 0 1 0 1 0 0 1 0 0 |
|||
_XXX_XX_X_X_X_X__X__ |
|||
_X_XXXXX_X_X_X______ |
|||
__XX___XX_X_X_______ |
|||
__XX___XXX_X________ |
|||
__XX___X_XX_________ |
|||
__XX____XXX_________ |
|||
__XX____X_X_________ |
|||
__XX_____X__________ |
|||
__XX________________ |
|||
</lang> |
|||
=={{header|Liberty BASIC}}== |
=={{header|Liberty BASIC}}== |
||