sums-triangle ( -- seq )

Vocabulary

project-euler.150.private

Inputs

None

Outputs

seq

an object

Definition

USING: kernel ranges sequences ;

IN: project-euler.150.private

: sums-triangle ( -- seq )
    0 1000 [1..b] [ [ next ] replicate partial-sums ] map nip ;
    inline