Handbook
Glossary
abc ( p q -- triplet )
Vocabulary
project-euler.009.private
Inputs
p
an
object
q
an
object
Outputs
triplet
an
object
Definition
USING:
kernel
make
math
sorting
;
IN:
project-euler.009.private
:
abc
( p q -- triplet )
[
2dup
*
,
[
sq
]
bi@
[
-
2
/
,
]
[
+
2
/
,
]
2bi
]
{
}
make
sort
;