+ (math-sub (cons 'bigneg (math-bignum-big (- (1+ a)))) aka (- 1 a)
+ (math-sub (cons 'bigneg (math-bignum-big (- (1+ a))))
aka (- 1 a)
Hmmm... martin