pyth ( -- )

Vocabulary

rosetta-code.pythagorean-triples

Inputs

None

Outputs

None

Definition

USING: kernel math.functions ranges sequences ;

IN: rosetta-code.pythagorean-triples

: pyth ( -- )
    8 [1..b]
    [ 10^ dup count-triplets pprint-triplet-count ] each ;