cfrac-estimate ( cfrac terms -- number )

Vocabulary

rosetta-code.continued-fraction

Inputs

cfrac	an object
terms	an object

Outputs

number

an object

Definition

USING: kernel math ranges sequences ;

IN: rosetta-code.continued-fraction

:: cfrac-estimate ( cfrac terms -- number )
    terms cfrac cfrac-a terms 1 - 1 [a..b]
    [ :> n n cfrac cfrac-b swap / n cfrac cfrac-a + ] each ;