A293654 Integers not represented by cyclotomic binary forms.

[Brendan]

The Maple code for A293654 makes no sense at all:

g := 1;

for m from 1 to 1000 do

   for n from 3 to 50 do

      for x from -50 to 50 do

         for y from -50 to 50 do

               if (F[n] = m, max(abs(x), abs(y)) > 1

               then r[g] := m; m := m+1; n := 3;

                     x := -50; y := -50; g := g+1; fi;

 od; od; od; od;

for t to 519 do print(r[{t}] = r[t]) od;

s[1] := 1; s[2] := 2; g := 2;

for i from 1 to 518 do

    for j from r[i]+1 to r[i+1]-1 do

    g := g+1; s[g] := j

od; od;

for t to 481 do s[t] od;

The line "if (F[n] = m, max(abs(x), abs(y)) > 1" has unbalanced parens but there is no way to add another ")" to make something which is syntactically legal.  More seriously, that line mentions an array/list F which is not mentioned anywhere else.

Can anyone suggest a fix or alternative code?

Brendan.

[Christian Sievers]

I don't speak maple, but the code in the related A296095 seems to define F

and has a similar condition with a ")" after "> 1" and an extra "`and`" after the "if". 

HTH

Christian

[Brendan]

Thanks, that solves it.  It seems to be based on some assumptions about the limits of the search, but I'm not going to try to explore that.  I'll just restructure it into better code.

Brendan.

--
You received this message because you are subscribed to the Google Groups "SeqFan" group.
To unsubscribe from this group and stop receiving emails from it, send an email to seqfan+un...@googlegroups.com.
To view this discussion visit https://groups.google.com/d/msgid/seqfan/922082f0-7410-4aa5-9605-efdebb5b0252n%40googlegroups.com.