count-triplets ( limit -- count )

Vocabulary

rosetta-code.pythagorean-triples

Inputs

limit

an object

Outputs

count

an object

Definition

USING: kernel ;

IN: rosetta-code.pythagorean-triples

: count-triplets ( limit -- count )
    <0-triplets-count> swap base all-triplets ;