contrib/bc/Test/mul.b


1
2
3
4
5
6
7
8
9
10
11
12
13

scale = 20
for (i=0; i<10000; i++) {
  for (j=1; j<100; j++) b=i*j
}
b
for (i=0; i<10000; i++) {
  for (j=1000000000000000000000000000000000000000000000000000000000000000000; \
       j<1000000000000000000000000000000000000000000000000000000000000000100; \
       j++) b=i*j
}
b
quit