2and3 ( n -- ? )

Vocabulary

project-euler.032.private

Inputs

n

an object

Outputs

?

an object

Definition

USING: kernel math math.parser sequences ;

IN: project-euler.032.private

: 2and3 ( n -- ? )
    number>string 2 cut-slice 3 cut-slice [ string>number ] tri@
    [ * ] dip = ;