On 2/5/07, Barton Willis <willisb at unk.edu> wrote:
> (cond ((null lchar1)
> (cond ((not (zerop lmin)) (go out))
> (t (merror "Factor ran out of primes."))))
> ((> algcont 1066)
> (cond ((ziredup minpoly*)(setq trl* tr)(setq modulus nil)
> (return 'splitcase))
> (t (merror "The minimal poly must be irreducible over
> the integers.")))))
>
> but I don't know what a good value would be for the magic number.
I think it's OK to increase the magic number, although I wouldn't
remove the test entirely. I'll admit I really don't know what's going
on in this function.
best
Robert