1p ( m -- n )

Vocabulary

project-euler.031.private

Inputs

m

an object

Outputs

n

an object

Definition

USING: kernel ;

IN: project-euler.031.private

: 1p ( m -- n ) drop 1 ;