sierpinski ( n -- )

Vocabulary

rosetta-code.sierpinski-triangle

Inputs

n

an object

Outputs

None

Definition

USING: io kernel ;

IN: rosetta-code.sierpinski-triangle

: sierpinski ( n -- ) [ { "*" } " " ] dip (sierpinski) print ;