# Test vectors for MP functions
#
-# $Id: mp,v 1.6 2000/07/09 21:33:40 mdw Exp $
+# $Id: mp,v 1.8 2000/10/08 12:17:06 mdw Exp $
add {
5 4 9; 5 -4 1; -5 4 -1; -5 -4 -9;
}
gcd {
-
# --- Simple tests ---
- 16 12 4 -2 3;
+ 16 12 4 -11 15;
12 16 4 -1 1;
- 693 609 21 -181 206;
+ 693 609 21 -7 8;
4398082908043 90980984098081324 1 -32483863573352089 1570292150447;
# --- Negative argument tests ---
- 16 -12 4 -2 -3;
- -16 12 4 2 3;
+ 16 -12 4 -11 -15;
+ -16 12 4 11 15;
-12 -16 4 1 -1;
-12 16 4 1 1;
- -693 609 21 181 206;
- 693 -609 21 -181 -206;
+ -693 609 21 7 8;
+ 693 -609 21 -7 -8;
# --- Zero argument tests ---
# --- Random number tests ---
829561629303257626084392170900075 32498098450983560651904114638965
- 5 -22841190347053190672253237276815 583054885752979049202923618992482;
+ 5 -29340810037249902802634060204608 748967211613630574419802053172497;
5509672937670943767152343650729669537671508
398326674296699796695672966992514673531
17
- -191606556147997561067126486929677861359
- 2650310725368604614586643627755316700713319;
+ -4158709420138833210339208344965073815
+ 57523460582278135926717203882531035926727;
324098408098290809832490802984098208098324
23430980840982340982098409823089098443