(euler117) ( n -- m )

Vocabulary

project-euler.117.private

Inputs

n

an object

Outputs

m

an object

Definition

USING: kernel math sequences ;

IN: project-euler.117.private

: (euler117) ( n -- m )
    [ V{ 1 } clone ] dip over [ next ] curry times last ;