"Source: Text/Aggregates/Set.text";
"Line: 463";
"Date: Wed Nov 13 15:56:29 2019";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Aggregates/Set.text, line: 463
// Example: H10E3 ()
print "Example: H10E3";
ei := GetEchoInput();
SetEchoInput(true);
cubes := {@ Integers() | z^3 : z in [1..25] @};
plus := { <x, y, z> : x in [-10..10], y in [-10..10], z in [1..25] |
   y ge x and Abs(x) gt 1 and Abs(y) gt 1 and (x^3+y^3-1) in cubes
   and (x^3+y^3-1) eq cubes[z] };
plus;
SetEchoInput(ei);
