xref: /freebsd/contrib/bc/tests/bc/scripts/print2.bc (revision 78ae60b4) 
1#! /usr/bin/bc -q
2
3l = line_length()
4
5max = 128
6scale = 0
7
8obase=2
92^99
102^100
112^105
12
13for (i = 2; i < max; ++i)
14{
15	obase=i
16	if (obase < 17)
17	{
18		1 * i^(l - 1)
19		1 * i^l
20		1 * i^(l + 1)
21	}
22	else if (obase >= 17 && obase <= 100)
23	{
24		l2 = l/3
25		1 * i^(l2 - 1)
26		1 * i^l2
27		1 * i^(l2 + 1)
28	}
29	else
30	{
31		l2 = l/4
32		1 * i^(l2 - 1)
33		1 * i^l2
34		1 * i^(l2 + 1)
35	}
36}
37
38if (maxobase() > 2^18)
39{
40	obase=2^18
41	1 * i^(100)
42	1 * i^(101)
43	1 * i^(103)
44}
45else
46{
47	print " 065536 000000 000000 000000 000000 000000 000000 000000 000000 0000\\\n"
48	print "00 000000 000000 000000 000000 000000 000000 000000 000000 000000 00\\\n"
49	print "0000 000000 000000 000000 000000 000000 000000 000000 000000 000000 \\\n"
50	print "000000 000000 000000 000000 000000 000000 000000 000000 000000 000000\n"
51	print " 000032 000000 000000 000000 000000 000000 000000 000000 000000 0000\\\n"
52	print "00 000000 000000 000000 000000 000000 000000 000000 000000 000000 00\\\n"
53	print "0000 000000 000000 000000 000000 000000 000000 000000 000000 000000 \\\n"
54	print "000000 000000 000000 000000 000000 000000 000000 000000 000000 00000\\\n"
55	print "0 000000\n"
56	print " 000002 000000 000000 000000 000000 000000 000000 000000 000000 0000\\\n"
57	print "00 000000 000000 000000 000000 000000 000000 000000 000000 000000 00\\\n"
58	print "0000 000000 000000 000000 000000 000000 000000 000000 000000 000000 \\\n"
59	print "000000 000000 000000 000000 000000 000000 000000 000000 000000 00000\\\n"
60	print "0 000000 000000\n"
61}
62
63halt
64