3 BEGIN { unshift @INC, './lib', '../lib';
4 require Config; import Config;
17 @args = split(/:/,$_,99);
19 $try = "\$x = new Math::BigInt \"$args[0]\";";
22 } elsif ($f eq "bneg") {
24 } elsif ($f eq "babs") {
27 $try .= "\$y = new Math::BigInt \"$args[1]\";";
29 $try .= "\$x <=> \$y;";
41 $try .= "Math::BigInt::bgcd(\$x, \$y);";
42 } else { warn "Unknown op"; }
44 #print ">>>",$try,"<<<\n";
46 if ("$ans1" eq $ans) { #bug!
49 print "not ok $test\n";
50 print "# '$try' expected: '$ans' got: '$ans1'\n";
66 000000 0000000 00000:+0
135 +9999999:+1:+10000000
136 +99999999:+1:+100000000
137 +999999999:+1:+1000000000
138 +9999999999:+1:+10000000000
139 +99999999999:+1:+100000000000
146 +10000000:-1:+9999999
147 +100000000:-1:+99999999
148 +1000000000:-1:+999999999
149 +10000000000:-1:+9999999999
150 +123456789:+987654321:+1111111110
151 -123456789:+987654321:+864197532
152 -123456789:-987654321:-1111111110
153 +123456789:-987654321:-864197532
174 +99999999:+1:+99999998
175 +999999999:+1:+999999998
176 +9999999999:+1:+9999999998
177 +99999999999:+1:+99999999998
184 +10000000:-1:+10000001
185 +100000000:-1:+100000001
186 +1000000000:-1:+1000000001
187 +10000000000:-1:+10000000001
188 +123456789:+987654321:-864197532
189 -123456789:+987654321:-1111111110
190 -123456789:-987654321:+864197532
191 +123456789:-987654321:+1111111110
201 +123456789123456789:+0:+0
202 +0:+123456789123456789:+0
212 +10101:+10101:+102030201
213 +1001001:+1001001:+1002003002001
214 +100010001:+100010001:+10002000300020001
215 +10000100001:+10000100001:+100002000030000200001
216 +11111111111:+9:+99999999999
217 +22222222222:+9:+199999999998
218 +33333333333:+9:+299999999997
219 +44444444444:+9:+399999999996
220 +55555555555:+9:+499999999995
221 +66666666666:+9:+599999999994
222 +77777777777:+9:+699999999993
223 +88888888888:+9:+799999999992
224 +99999999999:+9:+899999999991
240 +1000000000:+9:+111111111
241 +2000000000:+9:+222222222
242 +3000000000:+9:+333333333
243 +4000000000:+9:+444444444
244 +5000000000:+9:+555555555
245 +6000000000:+9:+666666666
246 +7000000000:+9:+777777777
247 +8000000000:+9:+888888888
248 +9000000000:+9:+1000000000
249 +35500000:+113:+314159
250 +71000000:+226:+314159
251 +106500000:+339:+314159
252 +1000000000:+3:+333333333
257 +999999999999:+9:+111111111111
258 +999999999999:+99:+10101010101
259 +999999999999:+999:+1001001001
260 +999999999999:+9999:+100010001
261 +999999999999999:+99999:+10000100001
296 +999999999999:+999:+0
297 +999999999999:+9999:+0
298 +999999999999999:+99999:+0