xk+1 ( n xk -- xk+1 )

Vocabulary

project-euler.255.private

Inputs

n	an object
xk	an object

Outputs

xk+1

an object

Definition

USING: kernel math ;

IN: project-euler.255.private

: xk+1 ( n xk -- xk+1 ) [ ⌈a/b⌉ ] keep + 2 /i ;