replace-positions-with-* ( str positions -- str )

Vocabulary

project-euler.051.private

Inputs

str	an object
positions	an object

Outputs

str

an object

Definition

USING: kernel sequences ;

IN: project-euler.051.private

: replace-positions-with-* ( str positions -- str )
    [ *-if-index ] curry map-index ;