candidates-triplets ( seed -- candidates )


Vocabulary
rosetta-code.pythagorean-triples

Inputs
seedan object


Outputs
candidatesan object


Definition


: candidates-triplets ( seed -- candidates )
{
{ { 1 2 2 } { -2 -1 -2 } { 2 2 3 } }
{ { 1 2 2 } { 2 1 2 } { 2 2 3 } }
{ { -1 -2 -2 } { 2 1 2 } { 2 2 3 } }
} [ next-triplet ] with map ;