The function SB-BIGNUM::BIGNUM-NEGATE-LOOP is undefined.

[Paul F. Dietz]

(defun f347 (e)
  (gcd (lcm 16797479187613784404 16375 e)
       (lcm e 2251799813685256 -345365948257)))

(f347 7262782904704998) ==>

The function SB-BIGNUM::BIGNUM-NEGATE-LOOP is undefined.
[...]
  0: ("undefined function" 393569660082624575768025840458853378286776775125 3 393569660082624575768025840458853378286776775125)
  1: (SB-BIGNUM::NEGATE-BIGNUM-BUFFER-IN-PLACE 393569660082624575768025840458853378286776775125 3)
  2: (SB-BIGNUM:BIGNUM-GCD #<unavailable argument> #<unavailable argument>)
  3: (SB-KERNEL:TWO-ARG-GCD 998845890866128765093208170694744134500 256737717765706273558471343125249170761928)
  4: (SB-INT:SIMPLE-EVAL-IN-LEXENV (F347 7262782904704998) #<NULL-LEXENV>)
[...]

[Stas Boukarev (stassats)]

Can't reproduce.

[Paul F. Dietz (paul-f-dietz)]

Hmm. Nor can I. Invalid.