main-cellular ( -- )


Vocabulary
rosetta-code.one-d-cellular

Inputs
None

Outputs
None

Definition
USING: bit-arrays kernel math ;

IN: rosetta-code.one-d-cellular

: main-cellular ( -- )
?{ f t t t f t t f t f t f t f t f f t f f } 10
[ dup print-cellular step ] times print-cellular ;