josephus-2 ( n -- m )

Vocabulary

rosetta-code.josephus-problem

Inputs

n

an object

Outputs

m

an object

Definition

USING: math ;

IN: rosetta-code.josephus-problem

:: josephus-2 ( n -- m ) n n log2 2^ - 2 * ;