anchor.diff:      class function InternalDivideByBase(Mag: PLimb; Base: Integer; var Size: Integer): UInt32; static;
       // Internal function multiplying by 16 bit integer and then adding 16 bit value. Used by parser.
       class procedure InternalMultiply16(const Left: TMagnitude; var Result: TMagnitude; LSize: Integer; Right: Word); static;
  +
       // Internal function multiplying by a base and adding a digit. Condition: ADigit < ABase. Size is updated if necessary.
  +    // Cf. code of TryParse on how to set up Value.
       class procedure InternalMultiplyAndAdd16(Value: PLimb; ABase, ADigit: Word; var Size: Integer); static;
  +
       // Internal function negating magnitude (treating it as two's complement).
       class procedure InternalNegate(Source, Dest: PLimb; Size: Integer); static;
   
  
positive.code: 
    {$IFDEF PUREPASCAL}
      {$IFDEF CPU64BITS}                                          // 64PP = 64 bit, Pure Pascal
        KaratsubaThreshold             =   96;    // Checked
        ToomCook3Threshold             =  272;    // Checked
        BurnikelZieglerThreshold       =   91;    // Checked
        BurnikelZieglerOffsetThreshold =    5;    // Unchecked
        KaratsubaSqrThreshold          =   48;    // Unchecked
      {$ELSE CPU32BITS}                                           // 32PP = 32 bit, Pure Pascal
        KaratsubaThreshold             =   56;    // Checked
        ToomCook3Threshold             =  144;    // Checked
        BurnikelZieglerThreshold       =   91;    // Checked
        BurnikelZieglerOffsetThreshold =    5;    // Unchecked
  
negative.code:     {$ENDIF CPU64BITS}
    {$ELSE !PUREPASCAL}
      {$IFDEF CPU64BITS}                                          // 64A  = 64 bit, Assembler
        KaratsubaThreshold             =  128;    // Checked
        ToomCook3Threshold             = 1024;    // Checked
        BurnikelZieglerThreshold       =  160;    // Checked
        BurnikelZieglerOffsetThreshold =   80;    // Unchecked
        KaratsubaSqrThreshold          =  256;    // Unchecked
      {$ELSE CPU32BITS}                                           // 32A  = 32 bit, Assembler
        KaratsubaThreshold             =   64;    // Checked
        ToomCook3Threshold             =  256;    // Checked
        BurnikelZieglerThreshold       =   80;    // Checked
        BurnikelZieglerOffsetThreshold =   40;    // Unchecked
  